作业帮 > 综合 > 作业

vb sgn 函数Private Sub Command1_Click()x = -5If Sgn(x) Theny =

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/03/29 19:52:01
vb sgn 函数
Private Sub Command1_Click()
x = -5
If Sgn(x) Then
y = Sgn(x ^ 2)
Else
y = Sgn(x)
End If
Print y
End Sub
程序结果是?
这个里的x是怎么赋值的?
y = 1
x=-5 所以x小于0
故Sgn(x)=-1 不等于0
所以If Sgn(x) 为逻辑真
故y = Sgn(x ^ 2) = Sgn(25)= 1
Sgn 函数
返回表示数字符号的整数.
Sgn(number)
number 参数可以是任意有效的数值表达式.
返回值
Sgn 函数有如下返回值:
如果 number 为 Sgn 返回
大于零 1
等于零 0
小于零 -1