我有一个程序在文本框中输入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
是因为我的变量是Long吗?我也尝试了双倍,它似乎没有效果。 基本上,它可以达到(def * 100000000000)+ work + mili,但在那里结束并且不会除以1万亿。
答案 0 :(得分:2)
你可能想要像
这样的东西prim = ((def * 100000000000) + work + mili) / 1000000000000
如果没有这些括号,您的表达式与
相同prim = (def * 100000000000) + work + (mili / 1000000000000)