如何为动态控件数组 添加事件,,?
定义了个动态控件数组
怎么使用这个控件数组里面控件的事件?

[解决办法]
事件后面有个参数Index就是当前控件的索引值,比如
private sub text1_click(index as integer)
msgbox text1(index).text
end sub
[解决办法]
事件后面有个参数Index就是当前控件的索引值,比如
private sub text1_click(index as integer)
msgbox text1(index).text
end sub
[解决办法]
事件后面有个参数Index就是当前控件的索引值,比如
private sub text1_click(index as integer)
msgbox text1(index).text
end sub

[解决办法]
后面来的继续拷贝啊
[解决办法]
事件后面有个参数Index就是当前控件的索引值,比如
private sub text1_click(index as integer)
text1(index).text= "顶者有分 "
msgbox text1(index).text
end sub

[解决办法]
事件后面有个参数Index就是当前控件的索引值,比如
private sub text1_click(index as integer)
text1(index).text= "下面的加油 "
msgbox text1(index).text
end sub
[解决办法]
无语………………
[解决办法]
事件后面有个参数Index就是当前控件的索引值,比如
private sub text1_click(index as integer)
text1(index).text= "下面的加油 "
msgbox text1(index).text
end su
[解决办法]
这年头，人都怎么了？
[解决办法]
晕…………楼上几位“星爷”们啊………………
[解决办法]
事件后面有个参数Index就是当前控件的索引值,比如
private sub text1_click(index as integer)
text1(index).text= "顶者有分 "
msgbox text1(index).text
end sub

呵呵，真是拷贝的世界啊，尤其是百度知道吧，看过几眼再也不去了。
[解决办法]
这就是星星的魅力啊
[解决办法]

具体的说它们用的是同一个事件 不能添加其它

若单一控件 一般会是这样写： private sub command1_click()
组： private sub command1_click(index as integer)

事件内用各自的 index 属性区分开来 所有的事件过程都写在同一个事件内
[解决办法]
顶下

[解决办法]
因为它们用共同的名字，具体区别就是靠INDEX

所以你写代码的时候只要区别这个就够了
private sub text1_click(index as integer)
select case index
case 0
msgbox "000 "
case 1
msgbox "111 "
end select
end sub
[解决办法]
两种方法,一直如楼上所说的控件数组,用Load方法添加新控件.
还有一直方法是用Controls.Add方法.
[解决办法]
LZ指的是不是动态产生的对象怎么添加事件? 那就要在声明时用WithEvents关键字.
... ... 好像是吧? 我不用VB好多年.
[解决办法]
Oh Yeah~~Oh Yeah~~Oh Yeah~~

头条帖里冒个泡,提高知名度~~
[解决办法]
chenqiu1024(FutureBoy) ( ) 信誉：98 2007-08-23 08:47:18 得分: 0

LZ指的是不是动态产生的对象怎么添加事件? 那就要在声明时用WithEvents关键字.
... ... 好像是吧? 我不用VB好多年.


我觉得LZ说的也应该是这个啦
前几天刚用了这玩意
[解决办法]
事件后面有个参数Index就是当前控件的索引值,比如
private sub text1_click(index as integer)
text1(index).text= "拷贝无罪 "
msgbox text1(index).text
end sub