执行下面的程序，消息框里显示的结果是 【 】 。
Private Sub Form_Click()
Dim Str As String， K As Integer
Str="ab"
For k=Len(Str) TO 1 Step-1
Str=Str & Chr(Asc(Mid(Str，k，1))+k)
Next k
MsgBox Str
End Sub
第1题：
下面的程序段运行后，消息框显示的结果是______。 For i = 1 To 4 n = 1 For j = 1 To i n = n * j Next j Next i MsgBox（n)
A．4
B．5
C．24
D．288
第2题：
程序段如下，程序运行后消息框显示的结果是______。 Dim a, s As String, i As Integer a = "晴空万里" s = "" For i = 1 To 4 Step 2 s &= Mid（a, 4 - i, 2) Next MsgBox（s)
A．晴空万里
B．万里晴空
C．晴空
D．万里
第3题：
编写如图所示应用程序，单击选择菜单项退出后，显示下面的请选择对话框，选择是结束程序，选择否显示下面的消息对话框。
第4题：
执行下面的程序，单击窗体后窗体消息框内显示结果是( )。 PRIVATE SUB FORM_CLICK() DIM STR AS STRING, K AS INTEGER STR="AB" FOR K = LEN(STR) TO 1 STEP -1 STR=STR&CHR(ASC(MID(STR, K, 1)) +K) NEXT K MSGBOX STR END SUB
A．ABCE
B．ABCD
C．ABDB
D．ABFB
第5题：
执行下面的程序，消息框里显示的结果是( )。
Private Sub Form_Click()
Dim Str As String,S As String,k As Integer
S=Str
For k=Len(Str) To 1 Step -1
S=S & (Mid(Str,k,1)
Next k
End Sub
第6题：
执行下面的程序，消息框里显示的结果是（ ）。
A. abe
B. abccba
C. cbacba
D. abcabc
第7题：
执行下面的程序，消息框的输出结果是__________。
第8题：
执行下面的程序，消息框里显示的结果是_______。
Private Sub Form_Click()
Dim Str As String
Str=""
S="Access"
Fori=Len(S)To 1 Step-l
Str=Str&Mid(S，i，1)
Next i
MsgBox Str
End Sub
第9题：
执行下列的程序，消息框里显示的结果是______。
Pfivate Sub Form_Click()
Dim Str As String
Str＝""
S="Access"
For i＝Len(S) To 1 Step-1
Str＝Str&Mid(S.i,1)
Next I
MsgBox Str
End Sub