控件数组分为动态和静态两种 静态的先往窗体上添加一个比如CommandButton控件 设置其Index=0或1然后右键单击这个按钮选择复制 再右键单击选择粘贴 如此反复需要几个反复几次就OK了
如果是需要的动态 先将其Index设置=0或1 然后用For循环的方式 示例代码如下:
Private Sub Form_Load()
For i = 2 To 5
Load Command1(i)
Command1(i).Visible = True
Command1(i).Left = Command1(i - 1).Left + Command1(i - 1).Width + 20
Next i
End Sub
静态的在电脑中一直要占用内存 而动态的可以卸载 代码如下:
Private Sub Form_Click()
For i = 2 To Command1.UBound
Unload Command1(i)
Next i
End Sub
动态的适合做游戏用 比如每局游戏中出现的敌人不一样 可以用动态的方法先删除掉以前定义的然后再重新生成新的 也可以打死一个敌人的时候 减少一个图片 非常的灵活
需要把数字按钮做成数组控件?
复制在粘贴就自动出来了啊
写单击代码的时候
Private Sub Command1_Click(Index As Integer)
Select Case (Index)
Case 0
MsgBox "第一个按钮"
Case 1
MsgBox "第二个按钮"
End Select
End Sub