Dim labor, material, partstotal, labortotal, subtotal, tax, total As Decimal
material = Decimal.Parse(AmountTextBox.Text)
labor = Decimal.Parse(LaborTextBox.Text)
partstotal = material
labortotal = labor * 50
subtotal = labortotal + partstotal
tax = subtotal * 0.08
total = subtotal + tax
partstotal = Decimal.Parse(PartsTextBox.Text)
labortotal = Decimal.Parse(LaborTextBox.Text)
subtotal = Decimal.Parse(SubTotalTextBox.Text)
tax = Decimal.Parse(SalesTaxTextBox.Text)
total = Decimal.Parse(TotalTextBox.Text)
material = Decimal.Parse(AmountTextBox.Text) 不会运行。为什么?