执行下面的程序,消息框里显示的结果是 【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
题库:计算机等级考试
类型:填空题
时间:2017-07-03 15:44:17
免费下载:《填空》Word试卷
执行下面的程序,消息框里显示的结果是 【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
本题关键词:行为结果,面试程序,图像显示,CT显示器,行为结果评价,竣工结算程序,框-剪结构,行政诉讼程序,电脑显示器,结果;