作者mathlinka (Linka)
看板Visual_Basic
标题Re: [.NET] 有很多个textbox要共用一个事件?
时间Sun Nov 6 13:56:33 2011
※ 引述《xhole (春风少年兄)》之铭言：
: 请输入专案类型(网站专案或者应用程式专案)：.net 4.0
: 我有很多个textbox
: 因为我只要他能输入数字 所以每当text#.text改变的时候
: 就跑一个sub去检查输入是否为数字
: 自己去google以後发现可以用
: handles textbox#.textchanged来连结多个textbox到同一个sub
: 但是我有81个textbox, 想问一下除了一个一个新增textbox以外 有没有更方便的方法?
参考看看
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
For i As Integer = 1 To 2
Dim txt As TextBox = FindControl(Me, "TextBox" & i)
AddHandler txt.TextChanged, AddressOf TextBox_TextChanged
Next
End Sub
Private Sub TextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
MsgBox(CType(sender, TextBox).Name & " : " & CType(sender, TextBox).Text)
End Sub
Private Function FindControl(ByVal ParentControl As Control, ByVal ControlName As String) As Control
For Each obj As Object In ParentControl.Controls
If obj.Name = ControlName Then
Return obj
Else
If FindControl(obj, ControlName) IsNot Nothing Then
Return FindControl(obj, ControlName)
End If
End If
Next
Return Nothing
End Function
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 114.43.71.221
1F：→ MOONRAKER:…addhandler这招不错，可是不是有me.findcontrol()好用 11/06 19:17
2F：→ MOONRAKER:了，为什麽要再写一个… 11/06 19:17