VB基础类
求助！控件数组问题。。
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区兄弟姐妹们，帮我看看这个程序哪里出错啦！
Private Sub Command1_Click(Index As Integer)
Timer1.Enabled = True
Command1.Enabled = False
Command2.Enabled = True
End Sub
Private Sub Command2_Click(Index As Integer)
Timer1.Enabled = False
Command1.Enabled = True
Command2.Enabled = False
Command1.Enabled = True
Text1.Text = Label2.Caption + "" + Label3.Caption + "" + Label4.Caption + "" + Label5.Caption
End Sub
Private Sub Command3_Click(Index As Integer)
End
End Sub
Private Sub Form_Load()
Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
Randomize
Label2.Caption = Fix(Rnd * 90) + 10
Label3.Caption = Fix(Rnd * 90) + 10
Label4.Caption = Fix(Rnd * 90) + 10
Label5.Caption = Fix(Rnd * 90) + 10
End Sub
Private Sub Command1_Click(Index As Integer)
Timer1.Enabled = True
Command1.Enabled = False
Command2.Enabled = True
End Sub
Private Sub Command2_Click(Index As Integer)
Timer1.Enabled = False
Command1.Enabled = True
Command2.Enabled = False
Command1.Enabled = True
Text1.Text = Label2.Caption + "" + Label3.Caption + "" + Label4.Caption + "" + Label5.Caption
End Sub
Private Sub Command3_Click(Index As Integer)
End
End Sub
Private Sub Form_Load()
Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
Randomize
Label2.Caption = Fix(Rnd * 90) + 10
Label3.Caption = Fix(Rnd * 90) + 10
Label4.Caption = Fix(Rnd * 90) + 10
Label5.Caption = Fix(Rnd * 90) + 10
End Sub
...全文
相关推荐
QT控件数组创建的一种方法
使用QTfor语句创建控件数组（button[i]），方便大量控件调用，本程序以Qpushbutton为例，语言简洁
C#-实现控件数组
实现控件数组 方便赋值
C#实现控件数组的方法
本文举例介绍了C#实现控件数组的方法，青睐于以前VB6.0控件数组的朋友可以下来看下哈。
vb.net2010代码创建控件数组
vb.net界面上不支持控件数组，但是可以通过代码创建控件类型的数据变量，并在代码中赋予其各个属性值，来完成控件数组的创建。 相信对于使用过VB6.0的朋友们会有些帮助。
使用控件数组
摘录自《Visual Basic6.0高级编程》书籍中的局部关于控件数组的使用方面的片段。 个人在摘录时，均抽取里面觉得较为重点的实例进行摘抄，希望能对各位有共同爱好的朋友提供点帮助。
