标题:怎么限制TextBox只能输入数字??
只看楼主
YAXIONG
Rank: 1
等 级:新手上路
帖 子:123
专家分:0
注 册:2006-11-6
 问题点数:0 回复次数:7 
怎么限制TextBox只能输入数字??
请问,可以在TextBox的属性框里设置,限制TextBox只能输入数字,或者编写什么样的代码,验证TextBox里输入的是数据吗??知道的 可以告诉一声吗??谢谢!!!!
搜索更多相关主题的帖子: TextBox 数字 输入 
2006-11-12 09:40
lhf391855540
Rank: 1
等 级:新手上路
帖 子:175
专家分:0
注 册:2006-10-14
得分:0 
可以用格式输出函数Format$
2006-11-12 12:24
bygg
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:乖乖的心中
等 级:版主
威 望:241
帖 子:13555
专家分:3076
注 册:2006-10-23
得分:0 
if e.KeyChar <> '\b' then
if e.KeyChar < '0' || e.KeyChar > '9' then
e.Handled = true
end if
end if

飘过~~
2006-11-12 15:05
ninggang
Rank: 3Rank: 3
等 级:新手上路
威 望:6
帖 子:637
专家分:0
注 册:2006-11-1
得分:0 
可以用isnumeric()函数

大家一起努力,共同打造未来!!
2006-11-13 13:53
xinfresh
Rank: 4
等 级:贵宾
威 望:13
帖 子:594
专家分:0
注 册:2006-1-13
得分:0 
好象是IsDigit

E-mail:xinfresh@QQ:383094053校内:http:///getuser.do?id=234719042
2006-11-13 17:44
wangfuli
Rank: 4
等 级:贵宾
威 望:12
帖 子:206
专家分:10
注 册:2005-11-11
得分:0 

自己可以做个这样的控件,继承textbox,在keypress中写代码限制一下keychar就可以了


2006-11-14 07:23
期待
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2006-11-14
得分:0 

if isnumeric(textbox1.text) then

else
messagebox("error")
end if

2006-11-14 20:32
梓风
Rank: 2
等 级:新手上路
威 望:4
帖 子:181
专家分:0
注 册:2006-10-22
得分:0 
Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim i As Integer = TextBox1.Text.Length - 1
Dim a As Char
If i > -1 Then
a = TextBox1.Text.Remove(0, i)
If a.IsNumber(a) = False Then
TextBox1.Text = TextBox1.Text.TrimEnd(a)
TextBox1.SelectionStart = i + 1
End If
Else
TextBox1.Text = String.Empty
End If
End Sub

等待相逢
2006-11-20 10:22



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-102378-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.381101 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved