填空题

执行下面的程序,消息框里显示的结果是______。
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图中,矩形表示______。