填空题

执行下面的程序，消息框里显示的结果是 【13】 。
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

【参考答案】

abdb
<上一题 目录 下一题>
热门 试题

填空题
建立了一个窗体，窗体中有一命令按钮，单击此按钮，将打开一个查询，查询名为 qT ，如果采用VBA代码完成，应使用的语句是 【9】 。
填空题
设有以下窗体单击事件过程： private Sub Form_Click() a=1 For i=l TO 3 Select Case i Case 1，3 a=a+1 Case 2，4 a=a+2 End Select Next i MsgBox a End Sub 打开窗体运行后，单击窗体，则消息框的输出内容是 【11】 。
相关试题