10．日期表达式#2/24/02#-#2/12/02#的值为___________。
11．数学表达式sin2x+写成等价的VisualBasic表达式为_________________。
12．设某个程序中要用到一个二维数组，要求数组名为A，类型为字符串类型，第一维下标从1到5，第二维下标从-2到6，则相应的数组声明语句为___________________________。
13．事件就是在对象上所发生的事情，VisualBasic中的事件如___________、___________、______________等。
一个对象响应的事件可以有_____个，用户不能建立新的事件。
事件过程是指_____________________________________________。
假设某一事件过程如下：
PrivateSubcmd1_Click（）
Form1.Caption="VB示例"
EndSub
则响应该过程的对象名是______________，事件名是_____________。
14．对象的方法用于__________________。
当方法不需要任何参数并且也没有返回值时，调用对象的方法的格式为________________，例如，对窗体Form1使用Show方法，应写成_________________。
15．PictureBox控件可通过设置其__________属性为True使之可自动调整大小；而Image控件可通过设置其___________属性为True，使其加载的图片能自动调整大小以适应Image。
16．在VisualBasic程序中实现复制文件“c:
\command.”到d:
盘根目录下的语句为_______________________________________。
二、单项选择题
1．下列控件中没有Caption属性的是（ ）
A、标签 B、文本框 C、框架 D、命令按纽
2．除框架外，能对单选按纽分组的控件是（ ）。
A、窗体 B、标签 C、图片框 D、图像
3．下列符号不能作为VB中变量名的是（ ）。
A、ABCDEFG B、P00000 C、89YWDDF D、xyz
4．下列不属于VisualBasic数据文件的是（ ）。
A、顺序文件 B、随机文件 C、二进制文件 D、数据库文件
5．若要求从文本框中输入密码时在文本框中只显示*号，则应用在此文本框的属性窗口中设置（ ）。
A、Text属性值为* B、Caption属性值为*
C、Password属性值为空 D、PasswordChar属性值为*
6．表达式2*3^2+2*8/4+3^2的值为（ ）。
A、64 B、31 C、49 D、42
7．表达式mid（"abcdefg",3,2）的值是（ ）
A、abc B、cd C、bcd D、abcde
8．数学表达式Sin25°写成VB表达式是（ ）。
A、Sin25 B、Sin（25）C、Sin（25°） D、Sin（25*3.14/180）
9．Sub过程与Function过程最根本的区别是（ ）。
A、Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以。
B、Function过程可以有参数，Sub过程不可以。
C、两种过程参数的传递方式不同。
D、Sub过程的过程名不能返回值，而Function过程能够通过过程名返回值。
10．选拔身高T超过1.7米且体重W小于62.5公斤的人，表示该条件的布尔表达式为（ ）
A、T>=1.7AndW<=62.5 B、T<=1.7OrW>=62.5
C、T>1.7AndW<62.5 D、T>=1.7OrW<62.5
11.下列对象不能响应Click事件的是（ ）
A、列表框 B、图片框 C、窗体 D、计时器
12．在VisualBasic中，按文件的访问方式不同，可以将文件分为（ ）
A、顺序文件、随机文件和二进制文件 B、文本文件和数据文件
C、数据文件和可执行文件 D、ASCⅡ文件和二进制文件
13．将通用对话框CommonDialog的类型设置成“颜色”对话框，可调用该对话框的（ ）方法。
A、ShowOpen B、ShowSave C、ShowColor D、ShowFont
三、指出下列句中的错误，修改或者说明原因。
1．sum和int.sum都可以作为VB的变量名。
2．变量名的长度最长可达1024个字符。
3．下列程序运行结果：
3，3
OptionExplicit
PrivateSubCommand1_Click（）
Dima，bAsInteger
a=3.6
b=3.6
Text1.Text=a
Text2.Text=b
EndSub
4．程序可以改变定长字符串的容和长度。
5．Variant是一种特殊的数据类型，可以包含任何种类型的数据。
6．下列程序运行结果为True
PrivateSubCommand1_Click（）
a=1
b=2
c=3
Text1.Text=c>a+bOrb-1>c-1Andc+a>aXorbEndSub
7．#12/31/1999#-#12/20/1999#的运算结果是#12/11/1999#
8．可以在窗体的通用部分声明静态变量。
9．使用声明语句建立一个变量后，VisualBasic会自动对数值类型的变量赋初值0，变长的字符串被初始化为一个零长度的字符串""，定长字符串用空格填充，Variant变量被初始化为Empty，布尔型的变量被初始化为False。
10．事件过程通常由事件驱动执行，而Sub过程通过过程调用执行。
11．将焦点主动设置到指定的控件或窗体上应采用SetFocus方法。
12．当图像控件（Image）的Stretch属性为True时，Image控件能自动调整自己的尺寸与显示的图片匹配。
四、读程序题，写出程序运行结果。
1．PrivateSubForm_Click（）
ForI=1To9
Forj=1To30-3*I
Print"";
Nextj
Fork=1ToI
Printk;
Nextk
Fork=I-1To1Step-1
Printk;
Nextk
Print
NextI
EndSub
2．
OptionExplicit
PrivateSubCommand1_Click（）
StaticSAsInteger
DimiAsInteger
S=1
Fori=1To5
S=S*i
Nexti
PrintS
EndSub
3．
ForX=5To1Step-1
ForY=1To6-X
PrintTab（Y+5）;"*";
NextY
Print
NextX
4．
PrivateSubForm_Activate（）
Print"aa"&"bb",-5*6,Not2<=3
Print"aa"&"bb";-5*6;Not2<=3
Print
Print"30+60",
Print30+60
？
？
"30+60";30+60
EndSub
5．
X=1
DoWhileX<=10
IfXMod7=0Then
Y=X+6
Else
Z=X
EndIf
X=X+2
Loop
PrintX,Y,Z
五、编程题
1．设计一个计算程序。
该程序用户界面如图所示，由四个文本框：
文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框4（text4），和三个按钮：
命令按钮1（command1）、命令按钮2（command2）、命令按钮3（command4）组成。
程序运行后，用户单击清除按钮，则清除文本框中显示的容。
单击计算按钮，如果成绩填写不完全，则给出提示信息，否则计算三科平均成绩。
单击退出按钮则退出。
2．设计程序。
要求：
从文本框Text1中接收输入的数据，当单击确定按钮（command1）时，如果该数据满足条件：
除以3余2，除以5余3，除以7余4，则输出；否则将焦点定位在文本框Text1中，选中其中的文本。
3．设计一个欢迎程序。
该程序用户界面如图所示。
要求程序运行后，用户选中粗体复选框时，标签（Label1）中的文字（欢迎您！
）的字体变成粗体，用户选中斜体复选框时，标签的字体变成斜体。
若取消选中，则恢复原字体。
单击结束，则退出。
4．任意输入3个数，求大小排第二的那个数，写出程序代码。
《VB》期末复习参考答案
一、填空题
1．创建应用程序界面 设置属性 编写代码
2．属性、text
3．Label TextBox
4．Load方法 Show方法 Hide方法 Unload方法
5．txtshow.text="GOODWORK"
6．Click（）、frm1.show
7．算术表达式字符串表达式关系表达式布尔表达式 日期表达式 对象表达式 运算符
8．1
9．TrueFalse
10．12
11．Sin（x）^2+Sqr（x^2-y^2）/（2*x）
12．DimA（1To5，-2To6）AsString
13．单击 双击 装载 多 响应某个事件后所执行的程序代码 cmd1 Click
14．完成某种特定的功能 对象名.方法名 Form1.Show
15．AutoSize Stretch
16．FileCopy"c:
\command."，"d:
\command."
二、单项选择题
1．B 2．C 3．C 4．D 5．D 6．B 7．B
8．D 9．D 10．C 11．D 12．A 13．C
三、指出下列句中的错误，修改或者说明原因。
1．int.sum不正确。
变量名中不能包括小数点。
2．变量名的长度最长可达255个字符。
3．3.6，4
因为a不是整型变量。
4．不正确。
程序不可以改变字符的长度，这是VB规定。
5．不完全正确。
Variant是一种特殊的数据类型，除了定长字符串数据及用户定义类型外，可以包含任何种类型的数据，这是VB规定。
6．False。
逻辑表达式计算结果。
7．不正确。
两个日期型数据相减，其结果是一个数值型数据。
8．不正确。
静态变量为局部变量，只能在过程中声明。
9．正确。
10．正确。
11．正确。
12．不正确。
该属性设为Ture时，Image控件不能自动调整自己的尺寸与显示的图片匹配，而可以使图片自动扩展以适应控件的尺寸。
四、读程序题，写出程序运行结果。
1．程序运行后，单击窗体，输出结果为：
1
121
12321
1234321
123454321
12345654321
1234567654321
123456787654321
12345678987654321
2．程序运行后，单击按钮Command1，输出结果为：
120。
3.
*
**
***
****
*****
4.
aabb -30 False
aabb-30False
30+60 90
30+6090
5.
11 13 9
五、编程题
1．
PrivateSubCommand1_Click（）
Text1.Text=""
Text2.Text=""
Text3.Text=""
Text4.Text=""
EndSub
PrivateSubCommand2_Click（）
a=Trim（Text1.Text）
b=Trim（Text2.Text）
c=Trim（Text3.Text）
Ifa=""Orb=""Orc=""Then
MsgBox"成绩填写不完全！
",vbCritical
Else
Text4.Text=（Val（a）+Val（b）+Val（c））/3
EndIf
EndSub
PrivateSubCommand3_Click（）
UnloadMe
EndSub
2．
PrivateSubCommand1_Click（）
x=Val（Text1.Text）
IfxMod3=2AndxMod5=3AndxMod7=4Then
Printx
Else
Text1.SetFocus
Text1.SelStart=0
Text1.SelLength=Len（Text1.Text）
EndIf
EndSub
3．
PrivateSubCheck1_Click（）
IfCheck1.Value=1Then
Label1.Font.Bold=True
Else
Label1.Font.Bold=False
EndIf
EndSub
PrivateSubCheck2_Click（）
IfCheck2.Value=1Then
Label1.Font.Italic=True
Else
Label1.Font.Italic=False
EndIf
EndSub
PrivateSubCommand1_Click（）
UnloadMe
EndSub
4．
a=Val（InputBox（"输入第一个数：
"））
b=Val（InputBox（"输入第二个数：
"））
c=Val（InputBox（"输入第三个数：
"））
Ifaa=b:
b=t
Ifaa=c:
c=t
Ifbb=c:
c=t
MsgBox（"求大小排第二的数是：
"&b）
VB期末考试试题A卷
一、填空题
1、VB程序设计的主要特点是
（1）和
（2）。
2、在VB中，最主要的两种对象是（3）和（4）。
3、工程是构成应用程序文件的（5）。
4、方法是VB提供的一种（6），用来完成一定的操作。
5、浮点类型数据包括单精度型和___（7）__数据。
6、事件是窗体或控件对象识别的___（8）____。
7、可用窗体的___（9）_方法在窗体中显示文字。
8、复选框控件Value属性指示复选框处于____（10）___或禁止状态（暗淡的）中的某一种。
9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。
10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件。
11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。
12、设x＝34.58，语句PrintFormat（x,“000.0”）的输出结果是（15）。
13、在VB中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。
14、设置窗体的（19）属性，可在窗体上显示图片。
15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。
二、选择题
1、菜单控件只包括一个事件，即
（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。
A、GotFocusB、LoadC、ClickD、KeyDown
2、滚动条控件（如图所示）的Max属性所设置的是
（2）。
A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值
B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量
C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量
D、滚动条控件无该属性
3、SQL语句Select*Formstudent中的*表示（3）。
A、所有记录B、所有字段C、所有表D、都不对
4、以下选项中，不属于标签的属性是（4）。
A、EnabledB、CaptionC、DefaultD、Font
5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（5）。
A、CaptionB、NameC、TextD、Label
6、设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是（6）。
A、CaptionB、NameC、TextD、Value
7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？
（7）。
A、在标题项中输入&，然后打勾B、在索引项中打勾
C、在有效项中打勾D、在复选项中打勾
8、当执行以下过程时，在窗体上将显示（8）。
PrivateSubCommand1_Click（）
Print"VB";
Print"Hello!
";
Print"VB"
EndSub
A、VBHello!
VBB、VB
Hello!
VB
C、VBD、VB
Hello!
VBHello!
VB
9、语句Print"Theansweris:
";20/4-2的结果为（9）。
A、Theansweris20/4-2B、Theansweris3
C、Theansweris"20/4-2"D、非法语句
10、下列哪个控件是容器控件（10）。
A、ImageB、PictureC、ComboBoxD、FileListBox
11、若要将窗体从存中卸载出去，其实现的方法是（11）。
A.Show B.Hide C.Load D.UnLoad
12、以下选项中，不是VisualBasic控件的是（12）。
A.窗体 B.定时器 C.单选框 D.命令按钮
13、双击窗体中的对象后，VisualBasic将显示的窗口是（13）。
A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口
14、可决定窗体的左上角是否有控制菜单的属性是（14）。
A.ControlBoxB.MinButton
C.MaxButton D.BorderStyle
15、设有如下语句：
Strl＝InputBox（"输人"，""，"练习"）
从键盘上输人字符“示例”后，Strl的值是（15）。
A．“输入”B．“”C．“练习”D．“示例”
16、窗体Form1的Name属性是Frm1,它的单击事件过程名是（16）。
A.Form1_ClickB.Form_ClickC.Frm1_ClickD.
升级会员 