1 Dim time, price As Integer ‘time代表停车时间price代表停车费用
2 time = Text1. Text ‘在文本框输入停车时间
3 If time <= 12 Then
4 price= 10
5 Else
6 price= 10 + (time - 12)
7 EndIf
8 Form1. Print price
【图 11】
x=0
a=8
if a<9:
x=9
print (x)