One Solution … I
Option Explicit
Dim size As String
Private Sub btnCalculatePrice_Click()
Dim shots As Integer
Dim price As Single
shots = txtShots.Text
Call calcLattePrice(price, shots, size)
Call addSalesTax(price)
lblPrice.Caption = "$" & Round(price, 2)
End Sub
Every program makes a specific set of choices
Previous slide
Next slide
Back to first slide
View graphic version