ItemSelected example for Visual Basic

Private Sub LEADImgList1_ItemSelected(ByVal nIndex As Long)
    Form1.Caption = Form1.Caption & LEADImgList1.Item(nIndex).Text & " was selected!"
End Sub