填空题

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

点击查看答案&解析