第24题: [填空题]执行下面的程序,消息框里显示的结果是 【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 参考答案:abdb 答案解析:[解析] 本题考查VBA程序设计。题目较难,综合性强,要求考生对常用函数以及控制结构有一定的了解。考生应该了解Len()函数是字符串长度检测函数,返回字符串所含字符数。 Chr()函数是字符代码转换字
第26题: [单项选择]A. About 2 kilometres. B. You can take the No. 1 bus. C. In 20 minutes. D. It’s not far. 参考答案:B 答案解析:[解析] Can you tell me how to get to the National Park