2007年9月全国计算机等级考试二级VB模拟试题(9)及答案

出处：Examlink 作者：刀断水日期：2007年09月17日 10时41分

(21) 与List1.Text属性值相同的是
A) List1.ListCount
B) List1.List(ListCount-1)
C) List1.ListIndex
D) List1.List(List.ListIndex)
正确答案: D

(22) 当把框架的何属性设置为False时，其标题会变灰，框架中所有的对象均被屏蔽？
A) Name
B) Enabled
C) Caption
D) Visible
正确答案: B

(23) 设执行以下程序段时依次输入2，4，6，执行结果为
Dim a(4) As Integer
Dim b(4) As Integer
For k=0 To 2
   a(k + 1) =Val(InputBox("Enter data:") )
   b(3 - k) =a(k + 1)
Next k
Print b(k)
A) 2
B) 4
C) 6
D) 0
正确答案: A

(24) 编写如下事件过程：
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
                          X As Single, Y As Single)
   If Shift＝6 And Button＝2 Then
      Print "PC"
   End If
End Sub
程序运行后，为了在窗体上输出"PC"，应执行的操作为
A) 同时按下Shift键和鼠标左键
B) 同时按下Ctrl，Alt键和鼠标右键
C) 同时按下Shift键和鼠标右键
D) 同时按下Ctrl，Alt键和鼠标左键
正确答案: B

(25) 如果在窗体上添加一个通用对话框控件DBT，那么语句"DBT.Action=4"的作用是
A) 显示"打开文件" 对话框
B) 显示"保存文件"对话框
C) 显示"字体"对话框
D) 显示"打印"对话框
正确答案: C

(26) 下列说明中，不属于随机文件特点的是
A) 可以随意读取随机文件中任一记录的数据
B) 随机文件没有只读或只写的操作方式，随机文件只要一打开，就既可读又可写
C) 随机文件的操作是以记录为单位进行的
D) 随机文件的读、写操作语句与顺序文件的读写操作语句一样
正确答案: D

(27) 执行下面的程序后，输出的结果是
x=1
For j=1 To 4
   x=x - 1: y=0
   For k=1 To 4
      x=x + 1: y=y + 1
   Next k
Next j
Print x; y
A) 1 4
B) 13 4
C) 12 8
D) 20 6
正确答案: B

(28) 有如下程序段，该程序段执行完后，执行循环的次数是
total=0
Counter=1
Do
   Print Counter
   total=total + Counter
   Print total
   Counter=Counter + 1
   If total > 10 Then
      Exit Do
   End If
Loop While Counter <=10
A) 5
B) 10
C) 15
D) 20
正确答案: A

(29) 在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command _Click()
   s=0
   Do
      s=(s + 1)  (s + 2)
      Number=Number + 1
   Loop Until s >=30
   Print Number, s
End Sub
程序运行后，输出的结果是
A) 2 3
B) 3 182
C) 5 12
D) 10 20
正确答案: B

(30) 有如下程序：
Private Sub Command1_Click()
   a$="A WORKER IS HERE"
   x=Len(a$)
   For i=1 To x - 1
      b$=Mid$(a$, i, 3)
      If b$="WOR" Then S=S + 1
   Next
   Print S
End Sub
单击命令按钮，程序运行结果为
A) 1
B) 2
C) 3
D) 5
正确答案: A

最后更新时间：2008-05-28 12:16:21