我试图对输入数字进行除法并显示不带小数和四舍五入的结果,所以如果我除以 80/50,我想得到 1,而不是 2 (1.6)。
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim box1 As Decimal = TextBox1.Text()
TextBox6.Text = box1 / 50
End Sub
End Class
答案 0 :(得分:3)
您可以使用Truncate
的{{1}}方法:
Decimal