Ok. Instead of List.text, it is List1.text
VB Code:
  1. Private Sub List1_DblClick()

  2.  
  3.   MsgBox List1.text

  4.  
  5. End Sub