Private Sub Form_Load()
'Add ITems in the List
Private Sub List1_Click()
MsgBox "youve selected: " & List1.List(List1.ListIndex) & vbCrLf & "with an Item Index of: " & List1.ListIndex
List1.Selected is Boolean, this will just tell you if an item is selected and returns you a boolean answer..
List1.ListIndex - this will show you what INDEX in the list what you have just selected
List1.List(List1.ListIndex) - this will show you the TEXT you have selected..
if I am not wrong I think there is no SelectedItems method in ListBox however List View has this method. As used by jhai_salvador, you can use ListBox1.Selected method if you want to know if the Listbox is selected.
Text1.Text = List1.List(List1.ListIndex)
to show Text of selected list in Text1.
If you want to use the list as Integer then use
Dim intList as Integer
intList = List1.List(List1.ListIndex)
Text1 = intList