2. 计算机
  3. 执行下面的程序，消息框里显示的结果是 【 】 。 Private Sub Form_Click() Dim Str As String， K As Integer Str="ab" For k=Len(S

执行下面的程序，消息框里显示的结果是 【 】 。 Private Sub Form_Click() Dim Str As String， K As Integer Str="ab" For k=Len(S

admin2009-05-20  34
问题 执行下面的程序，消息框里显示的结果是  【  】  。
   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()函数是字符代码转换字符函数，将数值表达式转换成字符串。Asc()函数是字符串转换字符代码函数，返回字符串首字符的ASCII值。 Mid(＜字符串表达式＞,＜N1＞,＜N2＞)函数是从字符串左边第N1个字符起截取N2个字符。开始Len(Str0=2，Mid(Str，k，1)=Mid(ab,2,1)=b，则Chr(Asc(B) +2)=d，所以循环第1次结束后 Str="abd"，  同样的第2次循环结束后， Str="abdb"，MsSBox用来将Str输出。正确答案为abdb。
转载请注明原文地址:https://kaotiyun.com/show/Ng5p777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)