2012-03-06 126 views

回答

9

不幸的是,你必須遍歷所有元素。以下是一些示例代碼:

Dim k As Long 
Dim s As String 

For k = 0 To List1.ListCount - 1 
    If List1.Selected(k) Then 
     s = List1.List(k) 
     ' ... do something 
    End If 
Next 
+0

現在這就是我要找的。謝謝! – kimbebot 2012-03-06 08:19:14

相關問題