vb程序出现:编译错误 语法错误

PrivateSubForm_Click()Dimx!,y!x=Val(InputBox("输入上网时间","输入框","0"))y=Val(MsgBox("显示上网费用... Private Sub Form_Click()
Dim x!, y!
x = Val(InputBox("输入上网时间", "输入框", "0"))
y = Val(MsgBox(" 显示上网费用" & y, vbOKCancel, "输出框"))
If x < 0 Then
y = 0
Elself x < 10 Then
y = 25
Elself x < 50 And x >= 10 Then
y = 2 * x
Elself x < 100 And x >= 50 Then
y = 1.5 * x
Elself x >= 100 Then
y = x
Else: y = 200
End If
End Sub

ElseIf 这里显示语法错误,不知道为什么
这方面偶很小白,先谢谢你了!!
展开
 我来答
Joy伊利牛奶
2008-05-13
知道答主
回答量:20
采纳率:0%
帮助的人:12万
展开全部
你把I写成l了,笨子路
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式