小王同学正在学习二元一次方程，老师布置了一个二元一次方程求解的题目，方程为2x+3y=10。请利用VB编程帮他求出此二元一次方程的所有整数解（10≥x≥-10，10≥y≥-10），并将每组解在列表框List1中输出，同时统计出共有多少组解，并将统计结果在文本框Text1中显示。
程序运行界面如图所示，为实现以上功能，请在划线处填入合适代码。

Private Sub Command1_Click()
Dim x As Integer, y As Integer, t As Integer
t = 0
For x =" -10" To 10
For y =" -10" To 10
If_____________Then
List1.AddItem "X:" + Str(x) + "  " + "Y:" + Str(y)
t=t+1
___________
Next y
Next x
Text1.Text = Str(t)
End Sub

某快递公司规定自己的快递收费标准（不含香港、澳门、台湾），1公斤以内省内10元省外13元，超出部分每公斤省内2元省外2.5元。寄往香港、澳门、台湾的标准是……。上述描述用计算机算法表达时对应的算法结构是（    ）

A．顺序结构	B．选择结构
C．循环结构	D．框架结构

以下程序段运行时出现如图所示的错误提示:
 For i=1 To 100
If Rnd>0.5 Then
n=n+1
Else
m=m+1
Next i
分析该程序段,该代码中缺少了(  )

A．For

B．End If

C．Next

D．If

若输入18，下图的执行结果是_____________。

某地驾照考试规定，考试成绩不低于80分为合格，下图是根据成绩判断是否合格的部分流程图；如果输入的成绩为85，则该流程的执行顺序为（   ）

A．①→②→③	B．①→②→④
C．①→②→④→③	D．①→②→③→④