16,554
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
淡蓝色2 2005-04-25
- 打赏
- 举报
给你写个小函数，效率比较高
Public Function IsInteger(ByVal Value As String) As Boolean
If Value Is Nothing OrElse _
Value.Length < 1 OrElse _
Value.Length > 11 OrElse _
Value.IndexOf("-") > 0 _
Then Return False
Dim iASC As Integer
For Each c As Char In Value
iASC = Asc(c)
If (iASC < 48 OrElse iASC > 57) AndAlso iASC <> 45 Then Return False
Next
Return True
End Function
'调用示范：
IsInteger("01234") '返回True
IsInteger("-1234") '返回True
IsInteger("3.14") '返回False
IsInteger("12-4") '返回False
IsInteger(Nothing) '返回False
IsInteger(String.Empty)'返回False
IsInteger("") '返回False
Public Function IsInteger(ByVal Value As String) As Boolean
If Value Is Nothing OrElse _
Value.Length < 1 OrElse _
Value.Length > 11 OrElse _
Value.IndexOf("-") > 0 _
Then Return False
Dim iASC As Integer
For Each c As Char In Value
iASC = Asc(c)
If (iASC < 48 OrElse iASC > 57) AndAlso iASC <> 45 Then Return False
Next
Return True
End Function
'调用示范：
IsInteger("01234") '返回True
IsInteger("-1234") '返回True
IsInteger("3.14") '返回False
IsInteger("12-4") '返回False
IsInteger(Nothing) '返回False
IsInteger(String.Empty)'返回False
IsInteger("") '返回False
sswv 2005-04-25
- 打赏
- 举报
使用正则表达式:
if(! System.Text.RegularExpressions.Regex.IsMatch(txtPort.Text, @"^(\d)$"))
{
return false;
}
if(! System.Text.RegularExpressions.Regex.IsMatch(txtPort.Text, @"^(\d)$"))
{
return false;
}
hamadou 2005-04-25
- 打赏
- 举报
最好不要使用异常的方法！因为由于触发和捕获异常都要时间！
建议使用正则表达式或创建用户控件（只允许输入整数，不允许输入小数点，或者设置一个属性来控制是否可以输入小数，然后判断该属性即可）
建议使用正则表达式或创建用户控件（只允许输入整数，不允许输入小数点，或者设置一个属性来控制是否可以输入小数，然后判断该属性即可）
荆楚布衣 2005-04-23
- 打赏
- 举报
该方法直接有判断小数点的功能啊
kardon 2004-10-23
- 打赏
- 举报
异常捕获，判断是否数字兴字符串
try
{
Int32.parse("TextBox.text");
}
catch
{}
然后判断是否有小数点。
If (TextBox.text.ToString().IndexOf(".")== -1 )
try
{
Int32.parse("TextBox.text");
}
catch
{}
然后判断是否有小数点。
If (TextBox.text.ToString().IndexOf(".")== -1 )
