我的守则是:
Dim Seat As String
Seat = txtSeat.Text.ToUpper
If Seat = "BOX" Then
txtPrice.Text = FormatCurrency(75)
ElseIf Seat = "PAVILION" Then
txtPrice.Text = FormatCurrency(30)
ElseIf Seat = "LAWN" Then
txtPrice.Text = FormatCurrency(21)
End If
我的告诫是,当用户不打上特定词语时,我需要展示一个信息/手箱。 因此,如果我用“散射”电文箱来表示,“请照样打上一个席位:”
Edit:
这完全是空洞的。 感谢 U!