ListSelect
Dim i As Integer For i = 0 To List1.ListCount - 1 If List1.Selected(i) Then MsgBox List1.List(i) & " is selected." End If Next I
Dim i As Integer
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then
MsgBox List1.List(i) & " is selected."
End If
Next I
( listselect.html )- by Paolo Puglisi
- Modifica del 17/12/2023