[已解决][求助]如何判断一个数是否为整数

一字头螺丝 · 发表于 2009-9-3 20:48

VBA程序里要判断某一单元格的数值是否为整数,如果不是显示"数值不为整数",程序代码要怎么写,谢谢!

最佳答案

雨狐

2009-9-3 21:08

If x - Fix(x) <> 0 Then
MsgBox "不是整数！"

end if

雨狐 · 发表于 2009-9-3 21:08

If x - Fix(x) <> 0 Then
MsgBox "不是整数！"

end if

雨狐 · 发表于 2009-9-3 21:11

上个附件

OKPd5cKk.rar (5.91 KB, 下载次数: 0)

领风飞翔 · 发表于 2009-9-3 21:15

来练一练~~~

Sub aa()
Dim i#, j#
i = InputBox("请输入数字")
If i = Int(i) Then
MsgBox "整数"
Else
MsgBox "不是整数"
End If
End Sub

EV · 发表于 2009-9-3 21:22

学习。。。

[em01]

勤快的猫 · 发表于 2009-9-3 21:37

[em04][em04]

一字头螺丝 · 发表于 2009-9-3 22:18

非常感谢

zsd5237 · 发表于 2009-9-4 05:31

学习[em02][em02]

		自动登录	找回密码
密码			注册