Question

VB中如何判断一个字符串是否为纯数字？

Answer 1

如果允许小数点或科学记数法的话,可以用IsNumeric()函数来判断,如果只能是数字的话,可以用如下语句:
str = "123.123"
t = str & vbCr
For i = 0 to 9
t = Replace(t, CStr(i), "")
Next
If t = vbCr Then
'是纯数字字符串
Else
'不是纯数字字符串
End If
追加vbCr是为了防止将空字符串也认为是纯数字字符串.
如果还有问题欢迎追问,问题解决请及时选为满意回答,谢谢.