计算数字百分比时 vb.net 错误

Question

嗨，我正在尝试创建数字的百分比。

当用户输入数字时，它应该找到该数字的18%。

法典：

If ComboBox2.SelectedIndex = 0 Then
            tax += saleprice / 100 * 0.18
        End If

我怎样才能在 vb.net ????中确定价格的 18%任何公式？但是当我输入它时，它没有正确输入到数据库中，所以我没有得到任何结果帮助。注意：销售价格和税金在类的顶部声明。

以下是代码的其余部分：

  Dim Query As String
        Query = "insert into pos.artikli(kod,ime,mera,kol,nabavna,profit,prodazna,tax,dolgopis,dolgopis2,proizvoditel,mkproizvod) values ('" & TextBoxKod.Text & "','" & TextBoxNaziv.Text & "','" & edmera & "','" & kolicina & "','" & TextBoxNabavna.Text & "','" & procentdobivka & "','" & TextBoxProdazna.Text & "','" & tax & "','" & TextBoxOpis.Text & "','" & TextBoxOpis2.Text & "','" & TextBoxProizvoditel.Text & "','" & mkpr & "')"
        COMMAND = New MySqlCommand(Query, konekcija)
        READER = COMMAND.ExecuteReader

Answer 1

提示/示例：

    'http://www.convertit.com/Go/ConvertIt/Calculators/Finance/Sales_Tax_Calc.ASP
    Dim tax As Decimal
    Dim test() As Decimal = {1D, 100D, 1000D}
    Dim taxrate As Decimal = 18D / 100D '18%
    For Each saleprice As Decimal In test
        tax = saleprice * taxrate
    Next