作者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/m.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