2014-05-06 65 views
0

我有一個程序,需要在文本框中輸入3個數字並在它們之間進行計算,然後將結果放入另一個文本框中。 下面的代碼爲什麼我的程序不能正確劃分?

Dim def As Long 
Dim work As Long 
Dim mili As Long 
Dim prim As Long 


Private Sub calculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)   Handles calculate.Click 
def = defense.Text 
work = working.Text 
mili = military.Text 
prim = (def * 100000000000) + work + mili/1000000000000 
primary.Text = prim 
End Sub 
End Class 

難道是因爲我有變量龍?我嘗試了兩次,它似乎沒有工作。 基本上,它可以達到(def * 100000000000)+ work + mili,但在那裏結束並且不會被1萬億分配。

+0

確保您的乘法不超過9.2E18 – MrZander

回答

2

你可能要像

prim = ((def * 100000000000) + work + mili)/1000000000000 

沒有這些括號,你的表情是一樣的

prim = (def * 100000000000) + work + (mili/1000000000000) 
相關問題