Question

vb 6.0中如何用代码实现全部选中listbox的复选框

我想实现的是，在listbox中的全部记录的复选框被全部选中。
代码要高效的，我的listbox有n多记录，listbox style中好像没有没人的选项。急。

Answer 1

For I = 0 To List1.ListCount - 1
List1.Selected(I) = True
Next

Answer 2

一○○度仁兄正解。