Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click Dim Tbox9, Tbox11, Tbox12, Tbox13 As String Tbox9 = TextBox9.Text Tbox11 = TextBox11.Text Tbox12 = TextBox12.Text Tbox13 = TextBox13.Text Result = Tbox13 / (1.08 * (Tbox9 - Tbox11)) TextBox14.Text = ShowResult TextBox14.Text = FormatNumber((Result), 0, ) ShowResult = Tbox9 - Tbox11 TextBox12.Text = ShowResult End Sub End Class
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)