私のプログラムはアイテムのコストを計算することになっていますが、実行すると小数は表示されません。たとえば、ユーザーがコスト テキスト ボックスに 5.99 を入力し、アイテム数ボックスに 5 を入力した場合、出力として 25 が表示されます。
Public Class Form1
Private Sub btnCalculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCalculate.Click
Dim DecCost As Decimal = txtCost.Text
Dim intNumber As Integer = txtNumber.Text
If Decimal.TryParse(txtNumber.Text, DecCost) Then
Dim DecTotal As Decimal = intNumber * DecCost
lblTotal.Text = DecTotal
Else
lblTotal.Text = "Please Enter Numerals in Both Boxes."
End If
End Sub
クラス終了
前もって感謝します!
EDIT実行時にテキスト ボックスでいくつかの新しい値を試しました。Number of items の値自体を掛けているようです。理由がわかりません...