VB限制TextBox控件只输入数字

乱编乱写 5833 Views 0 Comments

在VB中如何限制TextBox控件只能输入数字

先给TextBox控件添加KeyPress事件,代码:

Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii <> 8 And KeyAscii < 48 Or KeyAscii > 57 Then
   Beep
   KeyAscii = 0
    End If
End Sub

代码很简单,就是判断KeyAscii值是否在48-57之间,是的话就是数字就输入,否则就不是

过在输入的时候有时候会用到退格键,所以还得在加上一个KeyAscii <> 8 来判断是否是退格键

标签: 代码,

表情

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址
loading