VB动态添加的控件数组怎么响应事件?
比如我已经loadcommand(10)把10个按钮都弄上去了,怎么饿让这10个按钮都可以分别响应事件呢?...
比如我已经load command(10)
把10个按钮都弄上去了,怎么饿让这10个按钮都可以分别响应事件呢? 展开
把10个按钮都弄上去了,怎么饿让这10个按钮都可以分别响应事件呢? 展开
1个回答
展开全部
Private Sub Command_Click(Index As Integer)
'Index是控件属性。可以说是指定代号,就是那个括号里的数(Index)
'点下去之后看看这个command的代号(Index)是多少
Select Case Index '检查代号(Index)是多少
Case 0 '如果代号(Index)是0,
MsgBox "1号" '那就执行代号(Index)为0的按钮控件!(数组从0排起的)
Case 1
MsgBox "2号"
Case 2
MsgBox "3号"
Case 3
MsgBox "4号 "
Case 4
MsgBox "5号 "
……中间省略……
Case 9
MsgBox "10号 "
End Select '把正确的都选出来了,任务结束
End Sub
'Index是控件属性。可以说是指定代号,就是那个括号里的数(Index)
'点下去之后看看这个command的代号(Index)是多少
Select Case Index '检查代号(Index)是多少
Case 0 '如果代号(Index)是0,
MsgBox "1号" '那就执行代号(Index)为0的按钮控件!(数组从0排起的)
Case 1
MsgBox "2号"
Case 2
MsgBox "3号"
Case 3
MsgBox "4号 "
Case 4
MsgBox "5号 "
……中间省略……
Case 9
MsgBox "10号 "
End Select '把正确的都选出来了,任务结束
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询