將文字框的文字轉換為整數

來自 MSDN

使用 CInt 函式提供從任何其他資料型別到 Integer 子型別的轉換。例如,當通常發生貨幣,單精度或雙精度算術時,CInt 強制執行整數運算。

假設你有 1 個按鈕和 2 個文字框。如果你在 textbox1.text 5.5 和 textbox2.text 10 上鍵入。

如果你有這個程式碼:

Dim result = textbox1.text + textbox2.text
MsgBox("Result: " & result)
'It will output
5.510

要新增 2 個文字框的值,你需要使用 CInt(expression) 將其值轉換為 Int

Dim result = CInt(textbox1.text) + CInt(textbox2.text)
MsgBox("Result: " & result)
'It will output
16

注意:當值的小數部分恰好為 0.5 時,CInt 函式將舍入到最接近的偶數。例如, 0.5 輪到 0 輪1.5 輪到 2 輪,3.5 輪到 4 輪。四捨五入到最接近偶數的目的是為了補償在將多個數字加在一起時可能累積的偏差。