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

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

(7) 在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2，如图所示。程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。

Private Sub Combo1_Click()
   Call ShowItem(Combo1,Label1)
End Sub
Private Sub Combo2_Click()
   Call ShowItem(Combo2,Label2)
End Sub
Public Sub ShowItem(tmpCombo As ComboBox, tmpLabel As Label)
    【10】 Caption= 【11】 Text
End Sub
正确答案: 1.(tmpLabel) 2.(tmpCombo)

(8) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
n=5
f=1
s=0
For i=1 To n
f=f 【12】
s=s+f
Next
Print s
End Sub
该事件过程的功能是计算的值。请填空。
正确答案: 1.(/i)

(9) 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1_Click()
   Dim a(10) As Integer
   For i=1 To 10
     a(i) =i
   Next
   Call swap ( 【13】 )
   For i=1 To 10
      Print a(i) ;
   Next
End Sub
Sub swap(b() As Integer)
   n= 【14】
For i=1 To n/2
   t=b(i)
   b(i) =b(n)
   b(n) =t
    【15】
   Next
End Sub
上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a(1) 与a(10) 的值互换，a(2) 与a(9) 的值互换，……，a(5) 与a(6) 的值互换。请填空。
正确答案: 1.(a) 2.(UBound(b)) 3.(n=n-1)