VB.Net 文本框TextBox只允许输入数字判断
2013-11-15 14:09
429 查看
1. 该判断事件是TextBox的keypress 事件中进行判断的
2. 判断key(e.KeyChar)是不是数字、小数点、或者负号
3. 判断是否多次输入负号或者小数点
代码如下:
If IsNumeric(e.KeyChar) OrElse e.KeyChar = "." OrElse e.KeyChar = "-" Then
Dim strCash As String =TextBox1.Text
If strCash.Contains(".") Then
If strCash.Split(".").Length > 2 Then
e.Handled = True
End If
End If
If strCash.Contains("-") Then
If strCash.Split("-").Length > 2 Then
e.Handled = True
End If
If strCash.Substring(0, 1) <> "-" Then
e.Handled = True
End If
If strCash.Length > 1 Then
If strCash.Substring(1, 1) = "." Then
e.Handled = True
End If
End If
End If
ElseIf Not Asc(e.KeyChar) = Keys.Back Then
e.Handled = True
End If
代码如上,如果有问题,欢迎修改指正
本文出自 “逆风飞扬” 博客,请务必保留此出处http://xinchq2011.blog.51cto.com/2086938/1325184
2. 判断key(e.KeyChar)是不是数字、小数点、或者负号
3. 判断是否多次输入负号或者小数点
代码如下:
If IsNumeric(e.KeyChar) OrElse e.KeyChar = "." OrElse e.KeyChar = "-" Then
Dim strCash As String =TextBox1.Text
If strCash.Contains(".") Then
If strCash.Split(".").Length > 2 Then
e.Handled = True
End If
End If
If strCash.Contains("-") Then
If strCash.Split("-").Length > 2 Then
e.Handled = True
End If
If strCash.Substring(0, 1) <> "-" Then
e.Handled = True
End If
If strCash.Length > 1 Then
If strCash.Substring(1, 1) = "." Then
e.Handled = True
End If
End If
End If
ElseIf Not Asc(e.KeyChar) = Keys.Back Then
e.Handled = True
End If
代码如上,如果有问题,欢迎修改指正
本文出自 “逆风飞扬” 博客,请务必保留此出处http://xinchq2011.blog.51cto.com/2086938/1325184
相关文章推荐
- VB.net文本框只允许输入数字与. 利用正则表达式验证IP地址
- ASp.net 文本框(TextBox)计算,判断输入的是否是数字
- ASP.NET c# textbox 正则表达式 文本框只允许输入数字(验证控件RegularExpressionValidator )
- ASp.net的文本框(TextBox)计算,判断输入的是否是数字
- 在asp.net 中实现只允许数字输入的文本框
- vb.net 限定文本框只能输入数字
- 在c#.net中,如何判断文本框中的值是否是数字?我想验证身份证输入是否正确。
- 文本框TextBox只允许输入数字,不用onkeyup
- VB.NET使文本框只能输入数字
- vb.net限制文本框只能输入数字
- vb.net限制文本框只能输入数字
- TextBox只允许输入数字的js方法!(粘贴也可判断!)2007-11-27重新修改
- VB.NET使文本框只能输入数字
- asp.net中前台限制TextBox文本框只能输入数字和小数(或数字和字母)
- 在asp.net 中实现只允许数字输入的文本框
- 在asp.net 中实现只允许数字输入的文本框
- 转:VB.net中 使文本框只能输入数字
- vb.net 文本框只能输入数字和退格键
- Asp.net之TextBox只允许输入数字的方法总结