高手请进（小弟非常着急，在线等待）

Question

listbox控件的style设置为1-checkbox.如何默认设置为全部选中

Answer 1

不能在初始化的时候用Selected()属性逐个设置为全中的么？一下子全选的设置好像没有的8？

Answer 2

Private Sub Form_Load()
List1.AddItem "a"
List1.AddItem "a"
List1.AddItem "a"
List1.AddItem "a"
List1.AddItem "a"
List1.AddItem "a"
List1.AddItem "a"
List1.AddItem "a"
List1.AddItem "a"
For i = 0 To List1.ListCount - 1
'List1.ListIndex = i
List1.Selected(i) = True
Next
End Sub