以下程序段运行时出现如图所示的错误提示:
 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

某算法的部分流程图如图所示，执行这部分流程后，变量a、b、c的值分别是(   )

A．3  6  9

B．4  6  9

C．3  24  33

D．4  24  33

对称字符串的特征是从左到右读和从右到左读是完全一样的,如“abba”是对称的,“abcba”也是对称的,判断字符串是否对称的VB程序段如下:
n=Len(s) ’s 是待判断的字符串
k=0:j=n
For i=1 To n/ 2

Next i
If k=0 Then Labell.Caption=“对称”Else Labell.Caption=“不对称”
方框中的代码由以下三部分组成:
①   j=j-1   ②If cl <> c2 Then k=k+1   ③cl=Mid(s,i,l):c2=mid(s,j,l)
代码顺序正确的选项是(  )

A．①③②

B．②③①

C．③②①

D．②①③

某算法的部分流程图如图所示，执行这部分流程后，变量s，i的值分别是(　　)

A．14、6

B．14、8

C．8、6

D．8、8

使用 VB 编写一个数字逆序功能的程序，在文本框 Text1 中输入若干整数，相互之间用逗号隔开，单击“开始逆序”按钮，在文本框 Text2 中输出逆序后的数字序列。程序运行界面如图所示，请改正划线处的错误语句使程序能正确运行。

Private sub Command1_click()
Dim s1 As String, s2 As String, t As String, ch As String
Dim i As Integer
s1 = Text1.Text
i = Len(s1)
t = "": s2 = "" Do While i > 0
ch = Mid(s1, i, 1)
If ch >= "0" And ch <= "9" Then
t = ch + t
Else
s2 = s2 + t +，  改正________
t = "" End If
i = i + 1 改正________
Loop
s2 = s2 + t
Text2.Text = s2
End sub