填空题
执行下面的程序,消息框里显示的结果是______。
Private Sub Form_Click()
Dim Str As Scring,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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
在E-R图中,矩形表示______。
点击查看答案&解析
填空题
子查询的SELECT语句不能定义联合查询或______。
点击查看答案&解析
相关试题
rs.movenext
fd+1
在窗体上添加一个命令按钮(名为Command1...
在窗体上添加一个命令按钮(名为Command1...
有如下程序段。 Public Sub xy (a As...