永发信息网

VB.net Handles 问题

答案:2  悬赏:50  手机版
解决时间 2021-01-27 01:44
public test () As TextBox = {TextBox0, TextBox1 ,TextBox2 ,TextBox 3,TextBox4 .....TextBox80}

Private Sub TextBox0_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles test (0).TextChanged,test (2).TextChanged............,test (79).TextChanged

需要的代码

End Sub
如上面代码所示,Handles 后面跟的控件能批量或者使用吗?按照上面写的编译通不过!
本人菜鸟,有没有其他的方法啊,谢谢了!
最佳答案
对于批量的对象就用循环好了,一个一个复制粘贴并不是很好的解决方案。
首先写好事件处理函数。
Private Sub TextBoxChanged(sender As Object, e As EventArgs)
'一些代码
End Sub

下面是主函数
Dim tests() As TextBox '数组或集合字段名称用复数
Dim num As Integer = 80 '控件总个数
ReDim tests(num)
For i = 0 To tests.Count - 1
Dim item As New TextBox
test(i) = item
AddHandler item.TextChanged, AddressOf TextBoxChanged '绑定对象事件到处理函数
Next

手机写的可能难免有错,理解就行
全部回答
private sub button1_click(byval sender as system.object, byval e as system.eventargs) handles button1.click end sub 这是一个完整的button的click事件的定义 你后边不该加括号吧
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
已知t是实数,若a,b是关于x的一元二次方程x^2-
管理的不同层次所需信息各有什么特点
今年河北省美术联考考了240分,请问河北省有
上海吃鱼吃死人了吗
颤笃速的意思是什么啊?知道的请说下!
哪个星球最小在太阳系中
LOL召唤师峡谷哪里有蛇,我怎么没发现啊
求一个经典搞笑的小品,最好参演人多一点
求我爱发明中的钓鱼神器文字资料 嘤嘤嘤 我是
我在来浙投10000w,9月中旬到期,今天一直打不
【电焊机功率】电焊机的功率是如何计算?
火屑的意思是什么啊?知道的请说下!
长桥街道办事处地址在哪,我要去那里办事
电容CL10B 104KBNC是什么含义
账销案存资产、已按有关制度规定完全摊销并规
推荐资讯
龙腾系列欢乐号地址在哪,我要去那里办事
国鑫宾馆(重庆万州)地址在什么地方,想过去办
今年植树节,福乐村开展植树造林活动,6人3天共
禄禄的意思是什么啊?知道的请说下!
参加跳绳比赛的人数是参加踢毽子比赛人数的1/
张掖市鑫瑞机电有限公司地址在什么地方,我要
黄岩岛现在的归属权?
三万存银行一个月多少利息
大师在哪里
玛利亚 凯丽和一个男歌手合唱的when never yo
域名是唯一的!如何能保证其不重复?
广州市火车南站打的到省人民医院要多少钱
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?