Visual Basic Name -
Ch. 12, Worksheet #2
Use the following segments of code to answer the questions below. Note that txtAmount and txtFinal are textboxes.
| Private Sub cmdCalculate( ) Dim A As Integer Dim B As Single B = 10 A = B + 9 Call Taxation(B, A) txtAmount = A txtFinal = B End Sub |
Private Sub Taxation(X As Single, ByVal Y As
Integer) Dim C As Integer C = 4 Y = C + 6 X = 2 * Y End Sub |