[VBA ] elseif 卡關

看板Visual_Basic作者 (JW)時間5年前 (2019/10/11 16:40), 5年前編輯推噓1(103)
留言4則, 3人參與, 5年前最新討論串1/1
大家好 最近初學 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://www.ptt.cc/bbs/Visual_Basic/M.1570783209.A.7B0.html

10/11 18:06, 5年前 , 1F
邏輯是不是錯了
10/11 18:06, 1F
應該是沒有...除了InputBox 其他已經修到跟範本一樣了

10/12 00:56, 5年前 , 2F
可以執行。問一個問題,第一行sub後面有取名嗎?
10/12 00:56, 2F

10/12 00:59, 5年前 , 3F
有取名 EEE() 看來內容應該沒問題,我再往這個方向去糾錯 感謝! ※ 編輯: msjw (42.76.143.121 臺灣), 10/13/2019 00:29:20

10/15 10:45, 5年前 , 4F
把 sub 命名改掉就可以了...神奇
10/15 10:45, 4F
文章代碼(AID): #1Te3_fUm (Visual_Basic)
文章代碼(AID): #1Te3_fUm (Visual_Basic)