执行下面的程序,消息框里显示的结果是 【13】 。 Private Sub For
题型:填空题
问题:
执行下面的程序,消息框里显示的结果是 【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