有如下Visual Basic程序段：
a="2"
b=5
c=4
If a>b or c<b Then m="a-b" Else m=b-c
该程序段运行后,变量m的值为_______。

有如下Visual Basic 程序段：
s = 0
For i =___1___To 5
s =" s" + 3
Next i
该程序段运行后，变量s的值是（   ）。

A．10

B．15

C．20

D．25

某班师生玩一个游戏，n（n 不超过 1000）个同学站成一圈，逆时针编号为 l - n，有两个老师 A 和 B，A 老师从 1 开始逆时针数 k 个同学，B 老师从 n 开始顺时针数 m 个同学（注意 A，B 老师可能数到同一个学生），被老师选中的 1 个或 2 个学生离开圈子，剩下的学生继续。
程序开始时在 Text1 中输入同学数 n，在 Text2 中输入 k 的值，在 Text3 中输入 m 的值，点击“开始” 按钮，在 label5 中显示依次出圈的学生编号。程序运行如图所示：

VB 程序如下，请将按要求答题：
Dim stu(1 To 1000) As Integer
Dim n As Integer
Private Sub Command1_Click()

Dim left, k, m As Integer

Dim stup1, stup2 As Integer

n = Val(Text1.Text)

k = Val(Text2.Text)

m = Val(Text3.Text)

    ①    
stup1 = n: stup2 = 1
For i = 1 To n
stu(i) = i Next i
Do While left > 0
stup1 = teachount(stup1, 1, k)
stup2 =
Label5.Caption = Label5.Caption & " " & Str(stup1)
left = left - 1
If    ②    Then
Label5.Caption = Label5.Caption & " " & Str(stup2)
left = left - 1
End If stu(stup1) = 0

stu(stup2) = 0

Loop

End Sub
'f=1 表示逆时针数 c 个，f=-1 表示顺时针数 c 个
Function teachount(ByVal p As Integer, ByVal f As Integer, ByVal c As Integer) As Integer
Do While c > 0
    ③    
Do While stu(p) = 0

p = (p + f + n - 1) Mod n + 1

Loop

c = c - 1

Loop teachount = p
End Function
（1）加框处的语句有错误，请改正：______________________________________________ 
（2）请将①处的语句补充完整：______________________________________________
（3）请将②处的语句补充完整：______________________________________________
（4）请将③处的语句补充完整：______________________________________________

某绘图软件的部分指令如下：（画笔前进或后退均能画出线条）
指令名称指令功能
FDN画笔前移N厘米
BKN画笔后移N厘米
LTN画笔在原地向左方转动N度
RTN画笔在原地向右方转动N度
补充程序中的第六行中的指令，使程序可以绘出如图所示的图形，。
第一行  FD  10
第二行  RT  90
第三行  FD  15
第四行  LT  90
第五行  _________
第六行  LT  90
第七行  FD  5

获取字符串中指定范围内的元素，可以通过字符编号来实现，字符编号有正向编号和反向编号。如字符串"ABCDEF"，字符A的正向编号为1、反向编号为-6，如下表：

"2：4"表示获取正编号"2"到"4”的字符串，即"BCD"，-5：-3、2：3、-5：4这三种编号范围也表示的是字符串"BCD"。

小王根据上述算法设计如下程序，在文本框Textl输入字符串，在文本框Text2和Text3中输入字符编号，单击"获取"按钮，在标签Labell中显示指定范围的字符串。当Text2中的编号位置在Text3中的编号位置之前，则输出正向字符串，反之输出逆向字符串。程序运行界面如图所示。

(1)用户单击命令按钮Command1时调用的事件处理过程为__________。(单选，填字母：

A．Command1/
B．Caption/	C．Click/	D．Commandl_Click)。

(2)实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim s As String， ans As String
Dim a As Integer，b As Integer， n As Integer
s=Textl.Text：n= Len(s)： ans=""
a=Val(Text2.Text)： b = Val(Text3.Text)
If Abs(a)>n Or Abs(b)>nOra *b=0 Then
ans="输入范围有误"

Else

If a<0 Thena=a+n+ =1
Ifb<OThenb= ①_______
Ifa<=b Then
ans= ②_______

Else

Fori=a To b Step-1
ans=ans+Mid(s，i，1)
Next i

End If

End If

Label1.Caption=ans
End Sub
(3)若文本框Textl中输入的内容为"123456789"，文本框Text2和Text3中输入的内容分别为-3和5，单击"获取”按钮，标签框Labell中显示的内容是____________。