vb.net限制输入数字 vb中怎么限制输入的位数

VB.NET怎么限制中英文输入长度

Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress

If System.Text.Encoding.Default.GetByteCount(TextBox1.Text) = 11 And e.KeyChar Chr(8) Then

e.Handled = True

Else

e.Handled = False

End If

End Sub

这个不太完善，是假设原来文本长度已经有11就不允许继续输入，因为判断当下输入的是汉字还是英文很麻烦。

e.KeyChar Chr(8)这句是保证任何时候Backspace键都要有效。

希望能对你有所帮助。

相关问答

Q1: vb.net 中如何限制 inputbox 中只能输入数字，而非符号，字母?

第一，对话框的提示内容中说明一下，其次，对话框关闭后，检查其返回值是否数字，如果不是就再显示该对话框，使用循环形式

Q2: VB.NET ，文本框限制输入数字个数。例如不低于5位数而不大于11位数。违反则有提示。

input type="text" maxlength="11" /这是控制最大输入字数至于不能少于11个字，需要在点击保存按钮时，通过.length来控制

Q3: 限制文本框只能输入数字、小数点的几种方法

powered by 25175.netVB.net中使文本框只能输入数字首先添加好文本框控件TextBox后把属性IMEMode的值改成Disable，这样在该文本框中就不能使用中文输入法了。然后对文本框的KeyPress事件添加以下代码 Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Textbox1.KeyPress If Char.IsDigit(e.KeyChar) Or e.KeyChar = Chr(8) Then e.Handled = False Else e.Handled = True End If End Sub 如果文本需要输入小数的话，就要能够输入小数点"."，而且小数点只能输入一次，此时可以将上面的函数改为下面的格式： Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Textbox1.KeyPress If Char.IsDigit(e.KeyChar) or e.KeyChar = Chr(8) or e.KeyChar = "." Then If e.KeyChar = "." And InStr(TextBox1.Text, ".") 0 Then e.Handled = True Else e.Handled = False End If Else e.Handled = True End If End Sub 如果文本需要输入负数的话，就要能够输入负号"-"，而且只能是文本框输入的第一个字符，此时又可以将上面的函数改为下面的格式： Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Textbox1.KeyPress If Char.IsDigit(e.KeyChar) Or e.KeyChar = "." Or e.KeyChar = Chr(8) Then If e.KeyChar = "." And InStr(TextBox1.Text, ".") 0 Then e.Handled = True Else e.Handled = False End If ElseIf e.KeyChar = "-" And TextBox1.Text = "" Then e.Handled = False Else e.Handled = True End If End Sub 这时文本框可以用来输入正的或负的整数及小数。当有多个文本框需要做输入限制时，可以在以上代码Handles后面加上多个文本框的KeyPress事件，各事件之间用逗号隔开，例如 Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Textbox1.KeyPress,Textbox2.KeyPress,Textbox3.KeyPress 对于要判断文本框内容的函数，就要把代码进行修改，使其能够同时处理多个文本框，也就是把上面后两段程序中的TextBox1.Text改为CType(sender, TextBox).Text，这样一来就能够对号入座了，比如上面能够输入负号的代码就可以改成： Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Textbox1.KeyPress,Textbox2.KeyPress,Textbox3.KeyPress If Char.IsDigit(e.KeyChar) Or e.KeyChar = "." Or e.KeyChar = Chr(8) Then If e.KeyChar = "." And InStr(CType(sender, TextBox).Text, ".") 0 Then e.Handled = True Else e.Handled = False End If ElseIf e.KeyChar = "-" And CType(sender, TextBox).Text = "" Then e.Handled = False Else e.Handled = True End If End Sub 这样一来四个文本框就都只能输入正的或负的整数及小数了。

关于vb.net限制输入数字和vb中怎么限制输入的位数的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。