vb判断正整数

如题所述

推荐答案 2012-12-14

Sgn 函数

返回一个Variant (Integer)，指出参数的正负号。
语法
Sgn(number)
必要的number参数是任何有效的数值表达式。
返回值
number Sgn 返回
大于 0 1
等于 0 0
小于 0 -1
说明
number 参数的符号决定了Sgn 函数的返回值。

温馨提示：答案为网友推荐，仅供参考

当前网址：http://00.wendadaohang.com/zd/jB0jrjDDT.html

其他回答

第1个回答推荐于2018-04-24

Private Sub Command1_Click()
Dim n As Double
n = Val(InputBox("请你输入一个数"))
If n > 0 And Int(n) = n Then
MsgBox "是正整数"
Else
MsgBox "不是正整数"
End If
End Sub本回答被提问者和网友采纳

相似回答

vb中,如何判断一个变量所代表的值是否为正整数?答：给你写一下哈，就是用int()函数判断，都x=int(x)时，就是正整数了，当然要排除零的。Private Sub Command1_Click()n = Val(InputBox("n"))If n <> 0 Then If n = Int(n) Then Print n; "为正整数"Else Print n; "不是正整数"End If Else Print 0; "不是正整数"End If End...

x是正整数的vb表达式答：正整数的含义是首先取正 vb中取正的就是取绝对值的意思，使用函数abs 然后再取整，取整函数是int 所以正整数的表达式是int(abs(x))判断其是否是正整数的表达式例子是 if x=int(abs(x)) then print x是正整数 else print x不是正整数 end if ...

编写程序,判断一个正整数(>=3)是否为素数.(用VB)答：所谓素数，是指除了1和该数本身之外，不能被其他任何整数整除的数。例如，13是素数，因为它不能被2，3，4，…，12整除。判断一个数n(n≥3)是否素数的方法是很简单的：将n作为被除数，将2到(n-1)各个整数轮流作为除数，如果都不能被整除，则n为素数。Private Sub Command1_Click()Dim N As ...

...起作用时判断一个正整数是否是质数,如果是则返回true否则返回false...答：'质数就是自己是自己的最小公倍数 '要顺着求有些麻烦(代码的话),反过来求 '只要有一个能X某数得到它就不是质数 Function IsPrime(Byval Number As Long)As Boolean Dim i As Long For i = 2 To Number - 1 If Number Mod i = 0 Then IsPrime = False Exit Sub'Auto Exit For End If...

大家正在搜

java判断一个数是不是正整数判断一个正整数是否是素数 js判断是否是正整数 js判断正整数判断一个数是不是整数怎么判断一个数是不是整数判断整数m是否是素数判断某个整数是否为素数输入一个整数判断是否是素数