1.设有如下程序段：
x=2
For c=1 To 4 Step 2
x=x+c
Next c
运行以上程序后，x的值是(A)
A.6
B.7
C.8
D.9
2.以下叙述中错误的是(A)
A.在KeyPress事件过程中不能识别键盘键的按下与释放
B.在KeyPress事件过程中不能识别回车键
C.在KeyDown和KeyUp事件过程中，从键盘输入的字母"A"和字母"a"对应的KeyCode视作相同的字母
D.在KeyDown和KeyUp事件过程中，从大键盘上输入的"1"和从右侧小键盘上输入的"1"被视作不同的字符
3.执行如下两条语句，窗体上显示的是(C)
A=9.8596
Print Format(a,"000.00")
A.0,009.86
B.9.86
C.009.86
D.0,009.86
4.在窗体上画一个名称为CommandDialog1 的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程：
Private Sub Command1_Click( )
CommonDialog1.FileName =""
CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"
CommonDialog1.FilterIndex=1
CommonDialog1.DialogTitle="VBTest"
CommonDialog1.Action=1
End Sub
对于这个程序，以下叙述中错误的是(D)
A.该对话框被设置为"打开"对话框
B.在该对话框中指定的文件名为空
C.该对话框的标题为VBTest
D.在该对话框中指定的默认文件类型为文本文件(*.Txt)
5.设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下：
Private Sub Command1_Click( )
Dim a As Integer
a=10
Call g(Form2,a)
End Sub
Private Sub g(f As Form,x As Integer)
y=Iif(x>10,100,-100)
f.Show
f.Caption=y
End Sub
运行以上程序，正确的结果是(B)
A.Form1的Caption属性值为100
B.Form2的Caption属性值为-100
C.Form1的Caption属性值为-100
D.Form2的Caption属性值为100
6.在窗体上画一个名称为Command1的命令按钮，并编写如下程序：
Private Sub Command1_Click( )
Dim x As Integer
Static y As Integer
x=10
y=5
Call f1(x,y)
Print x,y
End Sub
Private Sub f1(ByRef x1 As Integer, y1 As Integer)
x1=x1+2
y1=y1+2
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是(D)
A.10 5
B.12 5
C.10 7
D.12 7
7.Option Base 1
Private Sub Command1_Click( )
Dim a(10) As Integer
Dim n As Integer
n=3
If n<10 Then
Call GetArray(a,n)
End If
End Sub
Private Sub GetArray(b( ) As Integer,n As Integer)
Dim c(10) As Integer
j=0
For t=1 To n
b(t)=Rnd*100
If b(t)/2=b(t)2 Then
j=j+1
c(j)=b(t)
End If
Next t
Print j
End Sub
以下叙述中错误的是(C)
A.数组b中的数范围为0-100
B.c数组下标的下界从1开始
C.GetArray过程的参数n是按值传送的
D.语句If b(t)/2=b(t)2 Then 是判断数组b中元素的值是否为整数
8.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click( )
Dim a
a= Array(1,2,3,4,5)
For c=1 To Ubound(a)
a(c) = a(c)+c-1
Next c
Print a(3)
End Sub
程序运行后，单击命令按钮，则在窗体上显示的内容是(B)
A.4
B.5
C.6
D.7
9.阅读程序：
Option Base 1
Private Sub Form_Click( )
Dim arr
Dim Sum%
Sum = 0
arr = Array(1, 3, 5, 7, 9)
For t = 1 To 5
Sum = Sum + arr(t)
Next t
Print Sum
End Sub
程序运行后，单击窗体，输入结果为(B)
A.5
B.9
C.25
D.15
10.在窗体上画一个名称为File1的文件列表框，并编写如下程序：
Private Sub File1_DblClick( )
x=Shell(File1.FileName,1)
End Sub
以下关于该程序的叙述中，错误的是(A)
A.x没有实际作用，因此可以将该语句写为：Call Shell(File1,FileName,1)
B.双击文件列表框中的文件，将触发该事件过程
C.要执行的文件的名字通过File1.FileName指定
D.File1中显示的是当前驱动器、当前目录下的文件
11.在窗体上画一个名称为Label1、标题为"VisualBasic考试"的标签，两个名称分别为Command1和Command2、标题分别为"开始"和"停止"的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500。编写如下程序：
Private Sub Form_Load( )
Timer1.Enabled=False
End Sub
Private Sub Command1_Click( )
Timer1.Enabled=True
End Sub
Private Sub Timer1_Timer( )
If Label1.Left< Form1.Width Then
Label1.Left = Label1.Left + 20
Else
Label1.Left=0
End If
End Sub
程序运行后，单击"开始"按钮，标签在窗体中移动。 对于这个程序，以下叙述中错误的是(A)
A.标签的移动方向为自右向左
B.单击"停止"按钮后再单击"开始"按钮，标签从停止的位置继续移动
C.当标签全部移出窗体后，将从窗体的另一端出现并重新移动
D.标签按指定的时间时隔移动
12.规范地说，VB是一种(A)的开发工具
A.面向对象
B.面向用户
C.面向屏幕
D.面向窗体
13.VB6设计界面包含多个视窗，控制这些视窗显示或关闭的命令包含在(D)下拉菜单中
A.文件
B.工程
C.编辑
D.视图
14下面(D)操作不是激活或显示属性列表框的操作
A.按快捷键F4
B.点击工具栏中的"属性列表框"按钮
C.选择"视图"下拉菜单的"属性窗口"项
D.双击窗体中的某一对象
15.Visual Basic程序中分隔各语句的字符是(B)
A.′
B.:
C.
D._
16.假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为"VB Test"的语句为(B)
A.Form1 = "VB Test"
B.Caption ="VB Test"
C.Form1.Text = "VB Test"
D.Form1.Name ="VB Test"
17.下列不能打开代码窗口的操作是(D)
A.双击窗体上的某个控件双击
B.双击窗体
C.按F7键
D.单击窗体或控件
18.Visual Basic程序中语句行的续行符是(D)
A.′
B.:
C.
D. _
19.Visual Basic程序中的注释所使用的字符是(A)
A.′
B.:
C.
D._
20.下列说法中正确的是：为了保存一个Visual Basic应用程序，应当(D)
A.只保存窗体模块文件(.frm)
B.只保存工程文件(.vbp)
C.分别保存工程文件和标准模块文件(.bas)
D.分别保存工程文件、窗体文件和标准模块文件
21.为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为(B)
A.1
B.2
C.3
D.4
22.下列说法中正确的是：为了载入一个只有一个工程(此工程下有三个窗体)的Visual Basic应用程序，应当(B)
A.只装入窗体模块文件(.frm)
B.先装入工程文件(.vbp)即可
C.分别装入工程文件和标准模块文件(.bas)
D.分别装入工程文件、窗体文件和标准模块文件
23.要使一个标签能够显示所需要的文本，应设置该标签的(A)属性的值
A.Caption
B.Name
C.Text
D.AutoSize
24.要使一个命令按钮上有图形，应该设置该按钮的(A)属性值，同时设置它的style属性为1
A.Picture
B.Style
C.DownPicture
D.DisabledPicture
25.为使计时器对象每隔5秒钟产生一个时钟事件(Timer事件)，则其Interval属性值应设置为(D)
A.5
B.300
C.500
D.5000
26一个标准的VB应用程序至少要包含一个(C)对象
A.文本框
B.标签框
C.窗体
D.命令按钮
27.要使一个文本框对象能够显示多行文字，应设置该对象的(B)属性值为True
A.Text
B.MultiLine
C.Style
D.Visible
28.下列的(A)对象支持KeyPress事件
A.文本框
B.命令按钮
C.标签框
D.图像框
29.若要将窗体从内存中卸载，其实现的方法或语句是(B)
A.Show
B.Unload
C.Load
D.Hide
30.以下选项中，不是VB标准控件的是(C)
A.命令按钮
B.定时器
C.通用对话框
D.单选框
编辑推荐：
下载Word文档
温馨提示：因考试政策、内容不断变化与调整，长理培训网站提供的以上信息仅供参考，如有异议，请考生以权威部门公布的内容为准！ (责任编辑：长理培训)
点击加载更多评论>>