《Visual Basic6.0程序设计》试卷
一、选择题（每小题2分，共50分）
1、以下调用子过程的语句正确的是（ ）。
A．Call Proc 5,6 B．Proc(5,6)C．Call Proc(5,6)D．Proc5,6
2、以下程序段执行后，输出结果是（ ）。
a=Sqr(7):b=Sqr(5):c=a>b ： Print c
A.-1B.0 e
3、以下程序运行后,单击命令按钮,输出结果为( )。
Private Sub Command1_Click()
dim i As Integer
i=8
doUntil i>10
i=i+2
Print i;
Loop
End Sub
A.0 1 B.8 10C.10 12D.12 14
4、语句 Dim Arr(-3 To5,-2To2)定义的数组的元素个数是()。
A. 20 B. 12 C. 45 D. 24
5、在窗体上添加一个文本框Text1，然后编写如下的Load事件过程，则
程序运行结果为()。
Private sub Form_Load()
=""
ocus
For k=1 To 5
t=t*k
Next k
=t
End Sub
A．在文本框中显示120B．文本框中仍为空
C．在文本框中显示1D．出错
6、下列关于组合框控件的说法错误的是()。
A.组合框是一种独立的控件,但它兼有列表框和文本框的功能
e 是组合框的一个重要属性,其取值为0，1，2
属性值是用户所选择的项目文本或直接从编辑区输入的文本
D.只有下拉式列表框才可以接收 DblClick事件
7、运行时向列表框中添加项目的方法是（）。
A、AddB、AddItemC、Fill D、FillItem
8、（ ）是对控件属性的错误说法。
A．Enabled 属性返回或设置一个布尔值，决定控件是否可用
B．Visible 属性返回或设置一个布尔值，决定控件是否可见
C．BackColor属性返回或设置控件中文本和图形的背景颜色
D．Name 属性返回或设置在控件中显示的文本
9、以下程序段的功能是（）
Private Sub Form_Load()
ion = Now
End Sub
A．在窗体中显示当前日期和时间
B．在窗体标题栏上显示当前日期和时间
C．在窗体标题栏上仅显示当前日期
D．在窗体标题栏上仅显示当前时间
10、窗体的BorderStyle 属性默认值是1-Fixed Single，表示窗体()。
A.有双倍辺框B.边框是可调整的 C.有固定单线边框D.没有边框
11、()方法用于清除运行时在窗体或图片框中输出的文本和图形。
A. Hide B. Print . Show
12、单击窗体上的关闭按钮，将触发（）事件。
A、Form_Initialize() B、Form_Load()C、Form_Unload() D、Form_Click()
13、在鼠标事件中，若参数button的值为2，表明用户按下了鼠标的（ ）。
A、左按钮B、右按钮C、中间按钮 D、左按钮和右按钮
14、当窗体第一次显示或窗体的外观尺寸被改变时，发生（ ）事件。
A、ResizeChange C、LoadD、Unload
15、要让MsgBox函数产生的消息框上显示“终止”、“重试”和”忽略”按钮，需将参数buttons的取值设置为（）。
A.0B.1 C.2D.3
16、执行 x= InputBox("请输入:",“你好！","0")语句时，用户直接按Enter键后，变量x的值是 ()
A．"请输入:"B．"你好！"C．"0"D．长度为零的字符串
17、要将一个普通窗体设置成MDI子窗体，可将其（ ）属性设置为True。
A、ChildB、MDIChild C、ChildrenD、MDIChildren
18、下面关于标签属性说法错误的是()。
A. 标签控件的AutoSize属性决定控件是否自动改变大小以显示其全部内容
B. 标签控件的BackStyle属性指定标签控件的背景是透明的还是非透明的
C. 标签控件的WordWrap属性指示一个AutoSize 属性设置为False 的标签
是否进行水平或垂直展开,以适合其Caption属性中指定的文本的要求
D. 标签控件的Alignment属性返回或设置标签中文本的水平对齐方式
19、在窗体上画一个名称为command1的命令按钮，然后编写如下事件过程：
private sub command1_click()
move left-500,Top-500
End sub
程序运行后，单击命令按钮，执行的操作为()。
A.命令按钮移动到距窗体左边界、上边界各500的位置
B.窗体移动到距屏幕左边界、上边界各500的位置
C.命令按钮向左、向上各移动500
D.窗体向左、向上各移动500
20、文本框控件没有以下()属性。
A、BackColorB、CaptionC、PasswordChar D、Enabled
21、要使一个文本框具有垂直滚动条,应先将其Multilline 属性设置为True,
再将ScrollBars属性设置为()。
A.0 B.1 C.2 D.3
22、将命令按钮的（）属性为True,可使按Esc键时执行其单击事件过程。
A、Cancel B、EnabledC、Value D、Default
23、要在命令按钮控件上显示图像应（ ）。
A、设置PictureB、实现不了
C、先将Style设置为1，然后再设置Picture属性D、以上都不是
24、复选框的Value属性值为1时表示该复选框（ ）。
A、未被选中B、已被选中C、不可用D、操作有误
25、要使框架控件和它里面的框架捆绑在一起，可同时移动，应（ ）。
A.先在窗体不同位置上分别画一框架和控件，再将控件拖动到框架上
B.先在窗体上画好控件，再画框架，将控件框起来
C.先在窗体上画好框架，再在框架中画控件
D.先在窗体上画好框架，再双击工具箱中的控件
二、判断题（每小题2分，共20分）
26、如果Click事件中有代码。则DbClick事件将永远不会被触发。( )
27、窗体的尺寸由 ScaleWidth 属性和 ScaleHeight 属性决定。（ ）
28、列表框控件用于显示项目列表，从中可以选择一项或多项。（ ）
29、用Visual Basic 编写的软件只能运行在 Windows 操作系统下。()
30、一个应用程序只能有一个 MDI 窗体。（ ）
31、用Line方法只能在窗体或图像框中画直线。（ ）
32、文本框控件的MaxLength属性决定其是否可以接受和显示多行文本。（ ）
33、要使计时器控件每隔5秒发生一次Timer事件，应将其Interval属性值设置为5。（ ）
34、在代码窗口中输入某行代码并按回车键之后,如果代码变成红色,说明该行
代码有语法错误。()
35、在Visual Basic 中,对于已发现的错误,可设置错误捕获语句对错误进行
捕获和处理。()
三、名词解释：（每小题4分，共16分）
36、数组 37、编译错误38、Erase语句 39、框架控件
四、简答题：（共23分）
40、简述创建动态数组的步骤？（4分）
41、控件的基本操作有哪些？（8分）
42、简述标签控件的常用属性并简单介绍。（5分）
43、一个具有10个元素的一维数组，下标从1到10，每个元素的值是由随机函数产生的【200,400】之间的随机整数，编程输出小于平均值的元素。以下是解决此问题的部分程序代码，请在划线处写出正确的代码。（6分）
Private Sub Form_Click()
Dim a(1 To 10) As Integer, i As Integer，S As Integer, PAs Integer
Print "随机产生的10个数为"
For i = 1 To 10
（1）
Print a(i)；
（2）
Next i
P=S/10
Print "小于平均值的元素为"
For i = 1 To 10
If（3） then print a（i）；
Next i
End Sub
五、综合题：（11分）
44、一个具有10个元素的一维数组a，下标从1到10，每个元素的值由用户输入，编程：实现将数组a中元素向后移动一个位置，最后一个元素移动到第一个元素的位置。
精彩范文吧