731106 发表于 2011-3-20 17:16:16

[已解决]如何判断一个变量为整数?

本帖最后由 731106 于 2011-3-20 20:27 编辑

让用户输入一个变量,怎么判断这个变量是一个整数?试了很多方法都不行,可能是我太弱了,代码如下:$Cg = InputBox("请输入差价金额", "差价金额:", "", "","","40")
If @error=1 Or$Cg = "" Then                                       ;这是不能为空,回车或点击确定后,如何返回到最上面,让用户继续输入变量
        MsgBox(0, "错误", "输入错误,请重新输入!")
        Exit
EndIf

Select
        Case $Cg =""                                             ;这里怎么写,判断变量不是一个整数
                MsgBox(0,"错误","请输入一个整数")
                $Cg                                                ;这里如何返回到顶层,让用户继续输入数值
        Case $Cg = ""                                             ;这里怎么写,如果是整数,继续运行下面的代码
                ...............
               
EndSelect谢谢大家的帮助,看来我还要多看多学啊

friendtasy 发表于 2011-3-20 18:26:41

可用正则啊

水木子 发表于 2011-3-20 19:09:33

StringIsInt

lynfr8 发表于 2011-3-20 19:16:41

While 1
        $Cg = InputBox("请输入差价金额", "差价金额:", "", "", "", "40")
        If @error = 1 Then
                Exit
        ElseIf $Cg = "" Then
                MsgBox(0, "错误", "输入错误,请重新输入!")
        ElseIf StringIsDigit($Cg) = 0 Then
                MsgBox(0, "错误", "请输入一个整数")
        Else
                ExitLoop
        EndIf
WEnd

MsgBox(0, 0, '继续运行下面代码')

love5173 发表于 2011-3-20 20:40:18

首先，你要确定你的是数字，然后，你是只判断还是也把非整数的变成整数？
引用水木子大哥的StringIsInt
然后给你推荐几个
Round
Floor
Ceiling
页: [1]
查看完整版本: [已解决]如何判断一个变量为整数?