[VBA ] elseif 卡關

作者: msjw (JW)   2019-10-11 16:40:07
大家好
最近初學 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
作者: a29976137 (billy)   2019-10-11 18:06:00
邏輯是不是錯了
作者: roaerwang (YKWIA)   2019-10-12 00:56:00
可以執行。問一個問題,第一行sub後面有取名嗎?https://i.imgur.com/R5dYF1J.png
作者: msjw (JW)   2019-10-15 10:45:00
把 sub 命名改掉就可以了...神奇

Links booklink

Contact Us: admin [ a t ] ucptt.com