VB期末综合练习11

VB期末综合练习
一、填空题
1、计时器事件之间的间隔通过（）属性设置。

2、要想在文本框中显示垂直滚动条，必须把（）属性设置为2，同时还应把（）属性设置为（）
3、在过程定义中出现的变量名叫做（）参数，而在调用过程时传送给过程的常量，变量，表达式或数组，叫做（）参数。

4、VISUAL BASIC 6.0中的控件在窗体上分为3类，它们是（），（）和（）。

5、设计弹出式菜单时，先通过______建立菜单，然后将顶层菜单的Visible属性设置为False，最后在代码中通过窗体对象的______方法显示弹出式菜单。

6、Ｗindows可公用的对话框有：______、保存文件对话框、颜色设置、字体设置对话框、打印设置对话框、帮助文件六种，ＶＢ可通过调用通用对话框控件的______、ShowSave、ShowColor、______ 、ShowPrint、ShowHelp方法来使用它们。

也可通过设置通用对话框控件的______属性来实现。

7、根据文件的存取方式与其组成结构，将文件分成________、______和__________。

8、由ARRAY（）函数建立的数组的名字必须是_________类型。

9、强制退出DO……..LOOP循环语句是_________，强制性退出FOR……..NEXT语句是_________。

10、Visual Basic 应用程序由（）、标准模块和（）。

11、设置组合框的风格，可用的属性是（），按钮VALUE属性的值的类型是（）。

12、Visual Basic 中，除了可以指定某个窗体作为启动对象之外，还可以指定（）作为启动对象。

13、要将MDI应用程序中的普通窗体设置为MDI子窗体，只需要把（）属性设置为（）即可。

14、建立弹出式菜单所使用的方法是（），要为某个菜单项加分隔线，则该菜单的标题项应设为（）。

15、为了使计时器控件TIMER1每隔1秒触发一次TIMET事件,应将TIMER1控件的( )属性设置为( ).
16、（）类型也称变体类型，是一种通用的、可变的数据类型，它可表示或存储任何一种数据类型。

17、控件数组的名字由________属性指定,而数组中的每个元素由______属性指定.
18、为了把一个窗全装入内存,所使用的语句为_______;为了清除内存中指定的窗体,所使用的语句为_________.
19、在VB中，对象的三要素分别是_______,__________和________.
20、在VB中整型数据占______个字节的内存空间,双精度浮点型数据占_____个字节的内存空间.
21、为了使标签能自动调整大小以显示全部文本内容,应把标签的______属性设置为TRUE.
22、确定复选框是否被选中，应访问的属性是_________，要让一控件不显示，应将该控件的_________属性设置成FALSE。

23、对于计时器控件，如果希望每秒产生10个事件，则应将其INTERVAL设置为_________。

24、若要屏蔽加上的控件对象，则需要设置（）属性的值为FALSE。

25、vb6.0分为3种版本，这3种版本是（）、（）和（）。

26、如果打开了不需要的菜单或对话框，可以用（）键关闭。

27、属性窗口分为4个部分，这4个部分分别是（），（），（），（），
28、在ＶＢ中窗体文件的后缀名为（），工程文件的后缀名为（）。

29、ＶＢ提供（）函数用于将数字字符转换成数值型，提供（）函数用于将数值转换成字符型。

30、工程文件的扩展名是（），窗体文件的扩展名（）。

31、控件数组的名字由（）属性决定，而数组中的每个元素由（）属性决定。

32、在3种不同类型的组合框中，只能选择而不能输入的组合框是（）。

33、菜单编辑器可分为3部分，即（）、（）和（）。

34、Visual Basic的过程有3种，它们是( )过程、（）过程和（）过程。

35、为了显示一个窗体，所使用的方法为（），而为了隐藏一个窗体，所使用的方法为（）。

36、VISUAL BASIC 6.0应用程序由（），（），（）三种模块组成。

37、计时器事件之间的间隔通过（）属性设置。

38、要想在文本框中显示垂直滚动条，必须把（）属性设置为2，同时还应把（）属性设置为（）
39、在过程定义中出现的变量名叫做（）参数，而在调用过程时传送给过程的常
量，变量，表达式或数组，叫做（）参数。

40、VISUAL BASIC 6.0中的控件在窗体上分为3类，它们是（），（）和（）。

二、单项选择题
1、打开多重窗体应用程序后（）
A、打开一个窗体后，其他窗体都会被关闭
B、允许同时打开多个窗体
C、打开一个窗体后，其他窗体都会被隐藏起来
D、在某一时刻只能打开一个窗体
2、下列属性中，目录列表框和文件列表框都有的属性是（）
A、List
B、Path
C、Vale
D、Patten
3、窗体的Caption属性的作用是（）
A、确定窗体的名称
B、确定窗体的标题
C、确定窗体的边界类型
D、确定窗体的字体
4、下列不属于Visual Basic应用程序所包含文件的是（）
A、窗体文件
B、类表文件
C、文本文件
D、工程文件
5、设a=2,b=3,c=4,d=5,则表达式a>b And c>=d And b<>c Or c>d的值是（）
A、True
B、False
C、-1
D、1
6、为了用键盘打开菜单和执行菜单命令，第一步应按的键是（）
A）功能键F10或ALT B）SHIFT+功能键F4 C）CTRL或功能键F8 D）CTRL+ALT 7、VISUAL BASIC 6.0窗体设计器的主要功能是（）
A）建立用户界面B）编写源程序代码C）画图D）显示文字
8、为了确定一个窗体或控件的大小的属性是（）
A）WIDTH，TOP B）WIDTH ，HEITHT C）TOP ，WIDTH D）TOP ，LEFT
9、下列可作为VISUAL BASIC 6.0的变量名的是（）
A) B）A（A+B）C）345D D）PRINT
10、下列可作为VISUAL BASIC 6.0中所允许的形式的数是（）
A）±25.74 B)3.457E-100 C)368 D)1.87E+50
11、设A=2，B=3，C=4，D=5，下列表达式的值是（）。

3>2*B and A=C and B<>C or C>D
A)true B)false C)-1 D)1
12、决定标签内显示内容的属性是（）
A)TEXT B）NAME C）ALIGNMENT D）CAPTION
13、以下语句输出的结果是（）
print format(32548.5,”000,000.00”)
A）32548.5 B)32,548.5 C)032,548.5 D)32,548.5
14、表达式4+5\6*7/8 mod 9的值（）
A）4 B）5 C）6 D）7
15、“对象”是将数据和程序（）起来的一个逻辑实体。

A、连接
B、封装
C、串接
D、伪装
16、下列语句错误的是（）
A、Text1.Text=List1.Text
B、Label1.Caption=List1.Text
C、List1.List(1)=List1.Text+List1.ListIndex
D、Command1.Caption=+List1.Text
17、下列可作为Visual Basic 中所允许的形式的数是（）。

A、32
B、2.5E
C、368
D、12E3
18、语句Print5*5\5/5的输出结果是（）
A、5
B、25
C、０
D、１
19、图象框有一个属性，可以自动调整图形的大小，以适应图象框的尺寸，这个属性是（）
A、Autosize
B、Stretch
C、AutoRedraw
D、Appearance
20、下列程序的执行程序结果为（）
a=100
b=50
If a<>b Then
a=a+b
Else
b=b-a
ENDIF
Print a,b
A、5050
B、150 50
C、200 200
D、10 10
21、在窗体中添加一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下代码：
Private Sub Command1_click()
Dim a ，Array1(10,10) As Integer
Dim i,j as integer
For i=1 to 3
For j=2 to 4
Array1(i,j)=i+j
Next j
Next i
Text1.text=array1(2,3)+array1(3,4)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是（）
A、12
B、13
C、14
D、15
22、设置复选框或单选框标题对齐方式的属性是（）
A）ALIGN B）ALIGNMENT C）SORTED D）VALUE
23、删除列表框中指定的项目所使用的方法为（）
A）MOVE B）REMOVE C）CLEAR D）REMOVEITEM
24、当拖动滚动条中的滚动块时，将触发滚动条的事件是（）
A）MOVE B）CHANGE C）SCROLL D）SETFOCUS
25、用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是（）A）LIST B）LISTINDEX C）TEXT D）LISTCOUNT
26、为了使标签覆盖背景，应把BACKSTRLE属性设置为（）
A）0 B）1 C）3 D）4
27、为了使标签中的内容居中显示，应把ALIGNMENT属性设置为（）
A）0 B）1 C）2 D）3
28、以下程序的输出结果：（）
a=sqr(3):b=sqr(2)
c=a>b
print c
A)-1 B)0 C)false D)true
29、下列关于键盘事件的说法中，正确的是（）
A、按下键盘上的任意一个键都会引发KeyPress事件
B、主键盘上的1键和数字键的1键的KeyCode码相同
C、KeyDown和KeyUP的事件过程中有KeyAscii参数
D、主键盘上的4键的上挡字符是$,当同时按下shift键和主键盘上的4键时,KeyPress 事件过程中的KeyAscii参数值是$的Ascii值
30、以下语句的输入结果为（）
a=Sqr(3)
b=Sqr(2)
c=a>b
print c
A、-1
B、0
C、False
D、True
31、要使命令按钮成为默认命令按钮，需使用其（）属性。

A、Enabled
B、Default
C、Value
D、Cancel
32、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：private Sub Command1_Click()
Dim i ,Num
Randomize
Do
For i=1 TO 1000
Num=Int(Rnd*100)
Print Num;
Select Case Num
Case 12
Exit For
Case 58
Exit Do
Case 65,68,92
End
End Select
Next i
Loop
End Sub
程序运行后，单击命令按钮，则正确的描述是（）
A、Do循环的次数为1000次
B、在For循环中产生的随机数小于或等于100
C、当所产生的随机数为12时结束所有循环
D、当所有的随机数为65、68或92时结束程序
33、设有如下程序段：
Option Base 1
Private Sub Form_Click()
Dim arr
Arr=Array(10,20,”ABCDE”)
For i=3 to 1 Step -1
Print arr(i)
Next i
End Sub
程序运行后，单击窗体，在窗体上显示的内容为（）
A、ABCDE 20 10
B、10 20 ABCDE
C、ABCDE 10 20
D、出错信息
34、使用过程是为了（）
A、使程序模块化
B、使程序易于阅读
C、提高程序运行速度
D、便于系统的编译
35、可视化编程的最大优点是（）
A、具有标准工具箱
B、一个工程文件由若干个窗体文件组成
C、不需要编写大量的代码来描述图形对象
D、所见即所得
36、对话框在关闭之前，不能继续执行应用程序的其他部分，这种对话框属于（）
A、输入对话框
B、输出对话框
C、模式（模态）对话框
D、无模式对话框
37、假定有以下程序段：
for i=1 to 3
for j=5 to 1 step -1
print i*j
next j
next i
则语句PRINT I*J 的执行次数是（）
A）15 B）16 C）17 D）18
38、设A=6，则执行X=IFF（A>5,-1,0）后的X值为( )
A)5 B)6 C)0 D)-1
39、下列程序段执行后的结果是：
for i=1 to 3
for j=1 to i
for k=j to 3
a=a+1
next k
next j
next i
执行上面的3重循环后，a的值为（）
A）3 B）9 C）14 D）21
40、用下面的语句所定义的数组的元素个数是（）
DIM A（-3 TO 5）AS INTEGER
A）6 B）7 C）8 D）9
41、下列叙述中正确的是（）
A.只有窗体才是Visual Basic中的对象
B.只有控件才是Visual Basic中的对象
C.窗体和控件都是Visual Basic中的对象
D.窗体和控件都不是Visual Basic中的对象
42．当窗体被加载时运行，发生的事件是（）
A．Load B．Unload C．Resize D．DragDrop
43．用于Visual Basic程序设计的控件在（）
A.工程窗口中
B.工具箱中
C.工具菜单中
D.工具栏上
44.Visual Basic程序中分隔各语句的字符是（）
A.'
B.:
C.\
D._
45. 假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为“VB Test”的语句为（）
A.Form1 = "VB Test"
B.Caption ="VB Test"
C.Form1.Text = "VB Test"
="VB Test"
46.使用驱动器表框的（）属性可以返回或设置磁盘驱动器的名称。

A.CAHNGE
B.DRIVE
C.DIR
D.PATH
47. 为了使命令按钮的Picture、DownPicture或DisabledPicture属性生效，必须把它的Style属性设置为（）
A.0
B.1
C.True
D.False
48. 为了使标签覆盖背景，应把BackStyle属性设置为（）
A.0
B.1
C.True
D.False
49. 为了使标签中的内容居中显示，应把Alignment属性设置为（）
A.0
B.1
C.2
D.3
50. 下列可以把当前目录下的图形文件pic1.jpg装入窗体FORM1中的语句为（）
A.FORM1 = "pic1.jpg"
B.FORM1.Handle = "pic1 .jpg"
C.FORM1.Picture = LoadPicture("pic 1.jpg")
D.FORM1 = LoadPicture("pic 1.jpg")
51.决定标签内显示内容的属性是（）
A.Text
C.Alignment
D.Caption
52.为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）
A.Value
B.Default
C.Cancel
D.Enabled
53.为了在按下Esc键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）
A.Value
B.Default
C.Cancel
D.Enabled
54.在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程：Private Sub Command1_Click()
a = Text1.Text + Text2.Text
Print a
End Sub
Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
End Sub
程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和321，然后单击命令按钮，则输出结果为（）
A.444
B.321123
C.123321
D.132231
55.下列可作为Visual Basic的变量名的是（）
A.3*Delta
B.PrintChar
C.Abs
D.ABπ
56. 下列可作为Visual Basic中所允许的形式的数是（）
A.±25.74
B.3.457E-100
C.368
D.1.87E+50
57. 设a=2，b=3，c=4，d=5，下列表达式的值是（）
a>b AND c<=d OR 2*a>c
A.True
B.False
C.-1
D.0
58.以下语句的输出结果是(在立即窗口中)（）
a="Beijing"
b="ShangHai"
Print a;b
A.BeijingΔShangHai
B.ΔBeijingΔShangHai
C.BeijingShangHai
D.ΔBeijingΔShangHaiΔ
59. 语句Print 5*5\5/5的输出结果是（）
A.5
B.25
C.0
D.1
60.执行下面的语句后，所产生的信息框的标题是（）
a=MsgBox("AAAA"，，"BBBB"，""，5)
A.BBBB
B.空
C.AAAA
D.出错，不能产生信息框
三、程序填空
1、请完成打印下列图形的程序：
1
22
333
4444
55555
FOR I=1 TO 5
FOR J=_______
PRINT _______
NEXT J
_______
NEXT I
2、打印标准的九九表，完成下列程序：
FOR I=1 TO 9
FOR J=（）
RPINT （）
NEXT J
（）
NEXT I
2、以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分和最低分数。

请将其补充完整。

PRIVATE SUB FORM-CLICK（）
DIM X AS SINGLE，AMAX AS SINGLE ，AMIN AS SINGLE
X=INPUTBOX（“ENTER A SCORE”）
AMAX=X
AMIN=X
DO WHILE （）
IF X>AMAX THEN
AMAX=X
ENDIF
IF ( )THEN
AMIN=X
ENDIF
LOOP
PRINT “MAX=”;AMAX,”MIN=”;AMIN
END SUB
3、产生50个两位随机整数的程序。

DIM S AS INGEGER
DIM I AS INGEGER RANDOMIZE TIMER
FOR I=（）
S=（）
PRINT S；
NEXT I
4、编写在窗口上显示如下图形的程序：---------＊
--------＊＊＊
-------＊＊＊＊＊
------＊＊＊＊＊＊＊
其中-表示空格
FOR I=（）
PRINT （）
FOR J=（）
PRINT “*“；
NEXT J
PRINT
NEXT I
5、编写求N！的子过程，通过调用此子过程来计算5！+8！-6！
Private Sub FORM1_Click()
DIM A&.B&,C&,D&
CALL JCH(5,A)
CALL JCH(8,B)
CALL JCH(6,C)
_______
PRINT D
END SUB
SUB _______
DIM I%
P=1
FOR I=1 TO N
P=P*I
NEXT I
END SUB
6、已知一元二次方程的二次项系数、一次项系数、常数项分别为a、b、c，其中a不等于0。

修改程序，求方程的根。

要求：如果方程无实数根，则输出“无实数根”，否则输出两个实数根。

Private Sub Command1_Click()
Dim a,b,c,d As Single
Dim x1,x2 As Single
a=Val(Text1.Text)
b=Val(Text2.Text)
c=Val(Text3.Text)
d=b^2-4*a*c
If d________ Then
x1=(-b+Sqr(d))/(2*a)
x2=(-b-Sqr(d))/(2*a)
Label1.Caption=x1
Label2.Caption=x2
_______
Label3.Caption=______
End If
End Sub
7、修改程序，使能输出：
1-2+3-4+5-6+...+99-100的值
程序如下：
Private Sub Command1_Click()
s=_____
For i=1 To 100
s=s+(-1)^(______)*i
Next i
Print s
End Sub
8、填充程序，使能输出如下图形：
*
* *
* * *
* * * *
* * * * *
* * * * * *
程序如下：
Private Sub Command1_Click()
For i=1 to ____
For j=1 to ____
Print_____
Next j
_____
Next i
End Sub
9、下面的程序是求100以内奇数和s的值（S=1+3+5+7...+99）。

程序中有三处错误，请更正。

Private Sub Command1_Click()
Dim s As Single
Dim i As Single
s=1
For i=1 to 100 Step 1
s=s*i
Next i
Print s
End Sub
10、完善已写在“执行”按钮的Click事件下的程序代码，将代码段中的“常量”、“变量”、“表达式”处分别换成正确的常量值、变量名和具体的表达式，使得当鼠标单击命令按钮“执行”时，显示出满足条件2+4+6+...+x<80中最大的x的值。

命令代码如下：
Private Sub Command1_Click()
s=0
x=0
Do Until s>=80
x=x+常量
s=s+变量
Loop
Print 表达式
End Sub
四、综合题
一）、设计一个程序，窗体中有2个列表框，左侧列表框中列出若干城市名（大连，沈
阳，上海，青铜，大同，天山，辽阳）。

”显示”按钮用于复原,”清除”按钮用于清除2个列表框中的内容.两个标签的用于显示”全部的城市”,”部分的城市”.
1、单击”>”按钮,某个城市名从左框消失,同进显示在右框中.
2、单击”>>”按钮,左框的全部城市名消失,同时全部显示在右框中.
3、单击”<”按钮,某个城市名从右框消失,同进显示在左框中.
4、单击”<<”按钮,右框的全部城市名消失,同时全部显示在左框中.
按下列步骤进行解答：
1、用户界面设计
2、属性设置
3、代码设计
二）北京、南京、西安、昆明四城市的名胜古迹和风景区如下：
北京：
天安门广场、故宫、北海公园、颐和园、香山、天坛
南京：
雨花台、中山陵、明孝陵、灵谷寺、栖霞山、莫愁湖
西安：
钟楼、大雁塔、小雁塔、半坡博物馆、兵马俑
昆明：
金殿、西山龙门、安宁温泉、滇池、大观公园
建立一个弹出式菜单，该菜单包括4个命令，分别为“北京”、“南京”、“西安”、“昆明”。

程序运行后，单击弹出菜单中某个命令，在标签中显示相应的城市的名字，而在文本框中显示相应的名胜古迹和风景区的名字。

按以下步骤进行设计：
1、用户界面设计
2、控件属性设置
3、菜单项属性设置
4、代码设计
三）在窗体上画一个文本框，把它的NULTILINE属性设为TRUE，通过菜单命令向文本框中输入信息并对文本框中的文本进行格式化。

按下述要求建立菜单程序：
1、菜单程序含有3个主菜单，分别为“输入信息”，“显示信息”和“格式”。

其中：“输入信息”包括两个菜单命令：“输入”，“退出”；
“显示信息”包括“显示”、“清除”两个菜单命令。

“格式”包括5个菜单命令：“正常”、“粗体”、“斜体”、“下划线”、“FONT20”。

2、“输入”命令的操作是：显示一个输入对话框，在该对话框中输入一段文字；
3、“退出”命令的操作是：结束程序的执行；
4、“显示”命令的操作是：在文本框中显示输入的文本；
5、“清除”命令的操作是：清除文本框中显示的内容；
6、“正常”命令的操作是：文本框中的文本用正常字（非粗体、非斜体、无下划线）显示；
7、“粗体”命令的操作是：给文本框中的文本用粗体显示；
8、“斜体”命令的操作是：文本框中的文本用斜体显示；
9、“下划线”命令的操作是：给文本框中的文本加下划线；
10、“FONT20”命令的操作是：把文本框中文本字体的大小设置为20。

要求：新输入的文本添加到原有文本的后面。

按下列步骤进行解答：
1、用户界面设计
2、控件属性设置
3、菜单项属性设置
4、代码设计。