VB 判断字符串是不是全部由数字组成。

2024-12-27 20:54:22

推荐回答（3个）

回答1：

如果判断纯粹的数字组成而不包含小数点，豆号，用like

Private Sub Command1_Click()
Dim S As String
S = "34564"
If S Like String(Len(S), "#") Then
    MsgBox "数字"
Else
    MsgBox "非纯数字"
End If
End Sub

回答2：

If IsNumeric(Text1.Text) = True Then
MsgBox "纯数字"
Else
MsgBox "非纯数字"
End If

回答3：

这个问题要看具体情况，楼主是要0到9这10个数，还是指所有的合法数字？合法数字包括小数点、负号、逗号、字母E、字母D。
比如，要求用户只能输入数值，那么如果用户输入1e1，这个如果用楼上说的IsNumeric函数，会被认为是数字的。如果用另一位说的Like，则小数点、负数又无法识别了。