作者msjw (JW)
看板Visual_Basic
标题[VBA ] elseif 卡关
时间Fri Oct 11 16:40:07 2019
大家好
最近初学 vba 做了些无用的小应用
但在 elseif 函数卡关....如下
===========================
Sub
A = InputBox("输入可动用现金余额")
If A < 10000 Then
MsgBox ("饮料禁止且每日餐费不得超过200")
ElseIf A > 15000 Then
MsgBox ("剩下的日子过得像大爷一样")
MsgBox ("剩下的日子过得像大爷一样")
Else:
MsgBox ("可以像人一样生活，剩下的存起来")
End If
End Sub
=============================
程式码一直无法执行
google 了很多资料，做了些尝试都无法
甚至已经写得跟网路上一模一样了
我在想是不是else後面那个冒号的关系
但又无法删除，会自动"纠正"
头好痛啊 QQ
头好痛啊 QQ
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 114.46.157.184 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Visual_Basic/M.1570783209.A.7B0.html
1F：推 a29976137: 逻辑是不是错了10/11 18:06
应该是没有...除了InputBox
其他已经修到跟范本一样了
2F：→ roaerwang: 可以执行。问一个问题，第一行sub後面有取名吗？10/12 00:56
有取名 EEE()
看来内容应该没问题，我再往这个方向去纠错
感谢！
※ 编辑: msjw (42.76.143.121 台湾), 10/13/2019 00:29:20
4F：→ msjw: 把 sub 命名改掉就可以了...神奇 10/15 10:45