如何验证使用VB.net？

Question

我在VB.net中通过数组和循环创建了288个文本框。是否有任何可能的方法来验证KeyPress事件上的每个文本框以确定输入是否为整数？非常感谢你的帮助！

Answer 1

您可以通过在数组函数中添加事件处理程序来完成此操作。

Dim txt As TextBox
AddHandler txt.KeyPress, AddressOf KeyPressToCheckInput

然后编写KeyPress函数

Sub KeyPressToCheckInput(sender As Object, e As KeyPressEventArgs)
  If e.KeyChar <> ChrW(Keys.Back) Then 'checks for backspace
    If Char.IsNumber(e.KeyChar) Then
     'anything you want to do about it'
    Else
     e.Handled = True 'ignores if the character is not a number
    End If
  End If
End Sub