主观

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

 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

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

订单号:

遇到问题请联系在线客服

订单号:

遇到问题请联系在线客服