Создать код расчета для VB информатика дз После щелчка на кнопке Расчет программа должна рассчитать цену изделия в производстве, цену товара в оптовой торговле, цену товара в розничной торговле.

Предыдущий
вопрос Следующий
вопрос

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim costPrice As Single
Dim wholesalePrice As Single
Dim retailPrice As Single

costPrice = CDbl(txtCostPrice.Text)
wholesalePrice = costPrice * 1.5
retailPrice = wholesalePrice * 1.2
txtWholesalePrice.Text = wholesalePrice.ToString("C")
txtRetailPrice.Text = retailPrice.ToString("C")

End Sub