Visual Basic Code.

224 Chapter 5 General Procedures In Exercises 14 and 15, rewrite the program using a Function instead of a Sub procedure. 14. Private Sub btnCalculate Click (... Handles btnCalculate.Click Dim firstNumber, secondNumber As Integer firstNumber = 4 Triple (firstNumber, secondNumber) txtResult. Text = CStr (secondNumber) End Sub Sub Triple (firstNumber As Integer, ByRef secondNumber As Integer) secondNumber = 3 * firstNumber End Sub 15. Private Sub btnCalculate Click(.) Handles btncalculate.Click Dim price, salesTaxRate, cost As Decima price = 29 . 95D salesTaxRate = 005D Findcost (price, salesTaxRate, cost) txtResult . Text cost. ToString ( "C" ) End Sub As Decimal) Sub FindCost (price As Decimal, salesTaxRate As Decimal, ByRef cost cost = price * (1 + salesTaxRate) End Sub