vb 判断单数双数
Option ExplicitPrivate Sub Form_Load()Dim n As IntegerDim a As DoubleDim b As Doublen = Val(InputBox("输入"))a = n / 2b = Int(n / 2)If n <0 ThenPrint &... 展开
其他答案
先用一个字符串变量接收输入，判断其中是否有小数点就好了。 Dim temp As String Dim n As Integer Do While 1 temp = InputBox("n") If InStr(temp, ".") Or temp = ""Then M 展开
2010-12-09 03:02
来自北京市
赞(1)点赞赞(1)举报
免责声明：问答内容均来源于互联网用户，房天下对其内容不负责任，如有版权或其他问题可以联系房天下进行删除。
