UC知道VB基础问题~急用~高手帮忙解答一下~谢谢了~
来源：百度知道 编辑：UC知道 时间：2024/06/30 01:56:21
Private Sub Form_Load()
Show
x = Val(InputBox("qingshurushuju "))
Select Case Sgn(x) = 2
Case 1
x = x + 1
Case 2
x = x + 2
Case 3
x = x + 3
End Select
Print x * 5
End Sub
输入的数为-3~结果为什么是-15~能详细解释一下么?~谢谢各位了~
Show
x = Val(InputBox("qingshurushuju "))
Select Case Sgn(x) = 2
Case 1
x = x + 1
Case 2
x = x + 2
Case 3
x = x + 3
End Select
Print x * 5
End Sub
输入的数为-3~结果为什么是-15~能详细解释一下么?~谢谢各位了~
首先，因为 x=-3 sgn函数为去一个数的符号
所以sgn（x）=-1
sgn(x)=2返还的值是 ture（1）和fales（0）
又因为sgn（x）=-1所以sgn(x)=2返还的值是false即为0
所以不属于下面三个case的任何情况，所以x仍为-3
Print x * 5
输入-3,输出15,
因为你的select case 后面是个判断sgn(x)=2
三个case都不会执行
等于只有x*5
输入为“-3”，x得到值-3，然后Select，所有的Case条件都不满足，所以x的值还是-3，最后 x * 5 = -15