文本框未显示小数位

Question

来自用户形式
numberupdown 1是F，
numberupdown 2是L，
numberupdown 3是W，
文本框为CF，
计算是button1。

计算公式为

  

F-（F *（L ^ 2）/（W ^ 2）

基本上，这需要灌溉枢纽的流动，并冲出转弯所需的流量。

输入数字为公制，结果为英国皇家GPM。

我已将其翻译为：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles    Button1.Click
    Dim AA, BB, CC, DD As Integer    'sets up the variables
    AA = F.Value * 15.8503    'takes the value in f and converts it to US GPM
    BB = L.Value * 3.2808    'takes the value in f and converts it to feet
    CC = W.Value * 3.2808    'takes the value in f and converts it to feet
    DD = AA - (AA * (Math.Pow(BB, 2) / (Math.Pow(CC, 2))))    'the math bit
    CF.Text = String.Format("{0:n2}", DD)    'puts result in this textbox
End Sub

我追求的最终数字是323.84，但它坚持将结果四舍五入到324 我把string.format("{0:n2}",DD)显示为2位小数，但它们显示为.00，而不是.84。

任何人都可以帮我解决这个问题吗？

Answer 1

您已将AA，BB，CC和DD声明为整数。整数只能存储整数。根据此数据的代表，您要么使用Decimal或Double。