vb6.0怎么用for函数新建很多个按钮?
发布网友
发布时间：3小时前
共3个回答
热心网友
时间：4分钟前
按钮是设计时自己添加的，for 循环属于代码了，你想在程序运行后通过代码再来添加控件是行不通的，除非在这之前你建了N个按钮，通过代码显示或隐藏还差不多```个人理解！
热心网友
时间：6分钟前
使用控件数组。先把弄一个控件。把index=0.然后在写循环
For i = Command1.Count To Command1.Count + 3 Step 1
Load Command1(i)
With Command1(i) '设置其共同属性
.Visible = True
.Enabled = False
.Width = 300
.Height = 300
.Caption = ""
.Left = arr(Int(Rnd * counts))
.Top = 900
End With
Next
热心网友
时间：4分钟前
在窗体上新建一个commandbutton，caption为0，index为0，form中load事件中的代码：
for i = 1 to 3 '再创建3个按钮.
load command1(i)
command1(i).visible = True
command1(i).move command1(i-1).left + command1(i-1).width,command1(0).top
command1(i).Caption = i
next
按钮的Click事件：
Private Sub Command1_Click(Index as integer)
msgbox "你单击了第" & Index & “个按钮！”
end Sub
