# Re: ListBox的属性Style设为' 2' 为核取方块,核取方块如何使用?

Posted by SuBird on April 29, 1999 at 13:50:27:

In Reply to: ListBox的属性Style设为' 2' 为核取方块,核取方块如何使用? posted by jeff on April 29, 1999 at 10:08:03:

: ListBox的属性Style设为' 2' 为核取方块,核取方块如何使用?
: 在ListBox的属性Style设为' 2' 为核取方块时
: 如何知道ListBox的项目中那一项目已经被核取?

Re:
由Selected(index)=Boolean可知哪个ListItem被选取
再由List(index)得知该名称为何，期间可由ListCount控制回圈去判断所有列示于ListBox的属性，例
With ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) Then
If strSelectItem = "" Then
strSelectItem = .List(i)
Else
strSelectItem = strSelectItem & ";" & . List(i)
End If
End If
Next
End With

Follow Ups: