VB6.0中 怎样在窗体中添加一个复选框数组（含N个复选框）

使用“复制/粘贴”复选框对象就可以了。

先在窗体中插入一个复选框对象，紧接着CTRL+C复制，然后CTRL+V粘贴，“已有一个控件为'Check1'，创建一个控件数组吗？“，要回答“是”。如果需要多个，就继续CTRL+V，直到够数为止。

Dim i As Integer

For i = 1 To 3

Load Check1(i)

Check1(i).Caption = "Check" &CStr(i + 1)

Check1(i).Top = Check1(i - 1).Top + 500

Check1(i).Left = Check1(0).Left

Check1(i).Visible = True

Next

---