一道VB题目(本人初学,应该非常简单)

来源:百度知道 编辑:UC知道 时间:2024/06/07 16:29:18
如果x>0,y=1;如果x=0,y=0;如果x<0,y=-1
下面是我编写的
Dim x, y As Single
x = InputBox("请输入x的值", "输入框")
If x > 0 Then y = 1
Else: If x = 0 Then y = 0
Else: y = -1
End If
End If
Print y
运行后提示else没有if,能帮忙挑挑错哪了吗?我实在是找不出来。。

Dim x, y As Single
x = InputBox("请输入x的值", "输入框")
If x > 0 Then
y = 1
ElseIf x = 0 Then
y = 0
Else
y = -1
End If
Print y

哈哈,真晕,三年前我还能说说,现在都忘了,不过看起来那么容易,

else后没有:号,只需一个endif