某市出租车计费标准规定：出租车启动后行程不超过3千米（包含3千米）计费5元；如果行程超过3千米且不超过10千米（包含10千米），则超过3千米部分按1.5元/千米计费（3千米及以内部分计费仍为5元）；若行程超过10千米，则在前面计费基础上，超出10千米部分按1.8元/千米计费。
假定某出租车行程为x千米，计费标准如下：
当x≤3千米时，计费为5元；
当3＜x≤10千米时，计费为5+（x-3）×1.5
当x＞10千米时，计费为5+（10-3）×1.5+（x-10）×1.8
程序界面如图1所示，在文本框Text1中输入行驶里程数（单位：千米），单击“开始计算”按钮（Command1）后，在标签Label3输出计费结果。
解决此问题的算法流程图如图2所示，相应的Visual Basic程序如下，在程序①和②横线处，填入适当的语句或表达式，把程序补充完整。
Private Sub Command1_Click （　　）
im x As Single,s As Single
x=Val（Text1．Text）
If

①x＜=3

①x＜=3

 Then
s=5
ElseIf  x＜=10Then
s=5+（x-3）*1.5
Else
s=5+（10-3）*1.5+（x-10）*1.8
End If

②Label3．caption

②Label3．caption

=Str（s）
End Sub
程序中①横线处应填入

x＜=3

x＜=3

程序中②横线处应填入

Label3．caption

Label3．caption

。