[VBA ] inputbox 與運算

[HugoStiglitz (needs no nick name)]

新手遇到一個想不通的問題@@

Sub q1()
Dim a, b, c As Integer
a = InputBox("")
b = InputBox("")
c = a + b
MsgBox c
End Sub

輸入a=1 b=2 msgbox 顯示出的卻是12 而不是3

我的問題是:為什麼已經宣告a,b 是整數型態 VBA卻仍然把他當成字串??

符號 + 變成字串連結子而不是運算子?

我知道的解決的方法是改成 c= val(a) + val(b)

但是我另外又想到一個問題

Sub q2()
Dim a, b, c, d, e As Integer
a = InputBox("")
b = InputBox("")
c = a
d = b
e = c + d
MsgBox e
End Sub

這樣的結果會和上面一樣是12

可是只要改變宣告變數的順序

Dim a, b, e, c, d As Integer

msgbox就會顯示3

這其中的差異到底在哪裡呢??


--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.39.188.93
※ 文章網址: http://www.ptt.cc/bbs/Visual_Basic/M.1396086478.A.99A.html
→ MOONRAKER:你碰到bug了。沒事用一用val()ㄅ
→ tsongs:a = Val(InputBox(""))你寫法不是直接出錯就是變成你看到的
推 tsongs:宣告之後 最好還是用Cstr Val 之類指定變數型態比較穩
推 knstt:不是bug,是你沒有完整宣告
→ knstt:Dim a (As Variant), b (As Variant), c As Integer
→ knstt:你只有c宣告成整數，忽略的話預設是宣告成 Variant
→ knstt:正確的宣告是dim a as long, b as long, c as String
→ knstt:附帶一提，用Long會比Integer 好
→ HugoStiglitz:謝謝各位大大
→ MOONRAKER:OUCH 忘了DIM AS這個大陷阱了 >_<
推 tsongs:原來是這樣 一直沒弄清楚