综 合 测 试 题
一、单选题
1.窗体的标题栏显示内容由窗体对象的( D
)属性决定。
A.BackColor
B.BackStyle
C.Text
D.Caption 2.下列不能作为VB中的变量名的符号是( C
) 。
A.A45
B.P12
C.89Ta
D.x 3.只能删除字符串尾部空格的函数是( B
) 。
A.Ltrim
B.Rtrim
C.Trim
D.Mid 4.如果在菜单栏中添加１条分隔线，则应将其Caption属性设置为( D
)。
A.＝
B.*
C.&
D.- 5.用下面语句定义的数组的元素个数是( D
)。
Dim A(-3 To 5) As Integer A.6
B.7
C.8
D.9 6.设a=2，b=3，c=4，d=5，下列表达式的值是( B
)。
a>b And cc A.True
B.False
C.-1
D.1 7.下列关于控件画法的叙述错误的是( D
)。
A.单击一次工具箱中的控件图标，只能在窗体上画出一个相应的控件
B.按住CTRL键后单击一次工具箱中的控件图标，可以在窗体上画出多个相同类型的控件
C.双击工具箱中的控件图标，所画控件的大小和位置是固定的
D.我们使用的控件只能是工具箱中的标准控件
8.应用程序设计完成后，应将程序保存，保存的过程是(
D
)。
A.只保存窗体文件即可
B.只保存工程文件即可
C.先保存工程文件，之后保存窗体文件
D.先保存窗体文件(或标准模块文件)，之后还要保存工程文件 9.假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效(变灰)，应使用的语句为(
A
)。
A.MenuItem.Enabled=False
B.MenuItem.Enable=True C.MenuItem.Visible=True
D.MenuItem.Visible=False 10.在一个语句内写多条语句时，每个语句之间用( B )符号分隔。
A.，
B.：
C..
D.；
11.已知A$=”abcdefghijklmn”,则表达式Left$(A$,4)+Mid$(A$,4,2)的值为( B A.abcdef
B.abcdde
C.abccde
D.abcdefg 12.赋值语句:a=123+MID(”123456”,3,2)执行后,a变量中的值是( D
)。
A.”1234”
B.123
C.12334
D.157 13.下面程序运行后，显示的结果是( B
)。 Dim x X=true If x Then Print x+1 A.1
B.0
C.true
D.显示出错信息 14.下面程序段，显示的结果是( A
)。
Dim x X=1 X=int(Rnd)+5 Select Case x
Case 5
Print“优秀”
Case 4
Print“良好”
Case 3
Print“通过”
Case Else
Print“不通过” End Select A.优秀
B.良好
C.通过
D.不通过
)。
15.VB 提供了结构化程序设计的三种的基本机构， 三种基本结构是(D
)。
A.递归结构、选择结构、循环结构 B.选择结构、过程结构、顺序结构 C.过程结构、输入、输出结构、转向结构 D.选择结构、循环结构、顺序结构
16.下列循环语句能够正常结束循环的是( C
)。
A.I=5 Do
I=I+1 Loop until I
I=I+2 Loop until I=10 C.I=10 Do
I=I-1 Loop until I
I=I-2 Loop until I=1 17.以下程序输出结果是( A
)。
Option Base 1 Private Sub Command1_click() Dim a%(3, 3) For i = 1 To 3 For j = 1 To 3 If j > 1 And i > 1 Then a(i, j) = a(a(i1), a(i, j - 1)) + 1 Else a(i, j) = i * j End If Print a(i, j); \"\"; Next j Print Next i End Sub A.1 2 3
B.1 2 3
C.1 2 3
D.1 1 1
2 3 1
1 2 3
2 4 6
2 2 2
3 2 3
1 2 3
3 6 9
3 3 3 18.定时器的Interval属性以(
C
)为单位指定Timer事件之间的时间间隔。
A．分
B．秒
C．毫秒
D．微秒
19.可以惟一标识控件数组中的每一个控件的属性是( A
)。
A．Name
B．Caption
C．Index
D．Enabled 20.在下列关于通用对话框的叙述是错误的是( B
)。
A.CommonDialog1.ShowFont显示字体对话框
B.在打开或另存为对话框中，用户选择的文件名可以经FileTitle属性返回
C.在文件找开或另存为对话框中，用户选择的文件名及其路径可以经FileName属性返回
D.通用对话框可以用来制作和显示帮助对话框 21.InputBox函数返回值的类型为( B
)。
A.数值 B.字符串
C.变体 D.数值或字符串(视输入的数据而定) 22.下面关系表达式的值为真的是( C
)。
A.\"A\">\"a\" B.\"9\">\"a\" C.\"That\">\"Thank\" D.12>12.1 23.为了把焦点移到某个指定的控件，所使用的方法是(
A )。
A.SetFocus B.Visible C.Refresh D.GetFocus 24.设a=6，则执行x=IIF(a>5,-1,0)后，x的值为(
D
)。
A.5 B.6 C.0 D.-1 25.以下语句错误的是( B
)。
A.If a=1 And b=2 then C=3 End If B.If a=1 Then C=2 ElseIf a=2 Then C=3 C.c=IIF(a=1,2,3) D.If a=1 Then C=2 ElseIf a=2 Then C=3 End If 26.有如下程序：
Sub sub1(x,y) X=2*x Y=3*y End sub Private sub command1_click() A=1:b=1 Call sub1(a,b) Print “A=”;a;”,B=”;b
End sub 程序运行后的输出结果是(
B
)。
A.A＝1，B＝
1 B.A＝2，B＝3 C.A＝1，B＝3 D.A＝2，B＝1
二、填空题
1.Visual Basic中工程文件的扩展名是( vbp
) ；窗体文件的扩展名是( frm
) 。 2.为了使标签能自动调整大小以显示全部文本内容，应把标签的( autosize
)属性设置为True。
3.能将字符串中的小写字母转换成大写字母的函数是(
ucase
) 。 4.数学表达式 3x+2^3，写成VB表达是(
3*x+2^3
) 。
5.过程和函数中的参数的传递方式有( byval
)和( byref
)两种。
6.若要终止窗体的运行，可使用( unload
)命令；若要将窗体Form1显示出来，可使用方法(Form1.show
)来实现。
三、写成程序结果
1.在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click() b=1 a=2 Do While b
)。 2.有如下程序：
Private Sub Command1_Click() S=0 Do s=(s+1)*(s+2) N=N+1 Loop Until s>=10 Print N；s End Sub 运行后的输出结果是( 2 12
)。 3.有如下函数过程
Function gys(byval x as integer, byval y as integer) as integer do while y0 remainder=x/y x=y y=remainder loop gys=x End function 以下是调用该函数的事件过程，该程序的运行结果是什么( Private sub command7_click() Dim a as integer Dim b as integer A=10 B=2 X=gys(a, B) Print x End sub
)。
