主观

执行下面的程序,消息框里显示的结果是 【 】 。

 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

参考答案
您可能感兴趣的试题
¥

订单号:

遇到问题请联系在线客服

订单号:

遇到问题请联系在线客服