0

我找到了许多限制用户输入字母字符的方法,但我想更具体一些。我正在制作一个二进制计算器,我希望用户只能填写数字“0”和“1”。

4

3 回答 3

1

虽然有很多方法可以做到这一点,但我喜欢这种方法:

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
    Dim valid_values As String = "01"
    If Not valid_values.Contains(e.KeyChar) Then
        e.Handled = True
    End If
End Sub
于 2013-05-23T17:19:33.050 回答
0

这将确保按下的键是 0 或 1。否则它将表现得好像没有按下任何键。

Private Sub txtBox_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtBox.KeyDown

If Not (e.KeyCode = Keys.0 OR e.KeyCode = Keys.1) Then
   e.Handled = True
EndIf 

End Sub
于 2013-05-23T17:31:29.917 回答
0

应用于 textbox_keypress 事件..

Private Sub txtbox_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtbox.KeyPress 
  Dim k As Byte = Asc(e.KeyChar)    

  If Not (e.KeyChar = "0" Or e.KeyChar = "1" Or k = 8 Or k = 13) Then e.Handled = True

End Sub
于 2013-05-23T17:32:43.210 回答