温馨提示×

温馨提示×

您好,登录后才能下订单哦!

密码登录×
登录注册×
其他方式登录
点击 登录注册 即表示同意《亿速云用户服务条款》

VB.Net 文本框TextBox只允许输入数字判断

发布时间:2020-08-06 13:23:21 来源:网络 阅读:2499 作者:xincq 栏目:编程语言

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

代码如上,如果有问题,欢迎修改指正

向AI问一下细节

免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。

AI