1.在VB程序设计中，响应对象的外部动作称为_____，而对象可以执行的动作或对象本身的行为则称为_____。
（A）方法，事件 （B）事件，方法 （C）属性，方法 （D）过程，事件 2.在集成开发环境中不能完成的工作是_____。
（A）输入和编辑源程序 （B）编译生成可执行程序
（C）调试运行程序 （D）自动查找并改正程序中的错误 集成开发环境不包括_____。
（A）DOS界面窗口 （B）窗体窗口 （C）代码窗口 （D）属性窗口
4.当运行程序时，系统自动执行启动窗体的_________事件过程。 （A）Load （B）Click （C）Unload （D）GotFocus
5.用一个程序段对一对象被单击(或双击)作出响应，从而实现指定的操作，称为______。 （A）可视画化程序设计 （B）事件驱动编程机制 （C）过程化程序实际方法 （D）非过程化程序设计语言 Basic有三种工作模式，它们分别是______模式。 （A）设计、编译和运行 （B） 设计、运行和中断 （C） 设计、运行和调试 （D） 编译、运行和调试
Basic的一个应用程序至少包含一个_______文件，该文件存储窗体上使用的所有控件对象和有关的_______、对象相应的_______过程和_______代码。 （A）模块、方法、事件、程序 （B）窗体、属性、事件、程序 （C）窗体、程序、属性、事件 （D）窗体、属性、事件、模块
8.在VB集成环境创建VB应用程序时，除了工具箱窗口、窗体中的窗口、属性窗口外，必不可少的窗口是______。
（A）窗体布局窗口 （B）立即窗口 （C）代码窗口 （D）监视窗口
9.保存新建的工程时，默认的路径是_________。 （A）My Documents （B）VB98 （C）\\ （D）Windows
10.若要使标签控件显示时不覆盖其背景内容，要对______属性进行设置。 （A）BackColor （B）BorderStyle （C）ForeColor （D）BackStyle 11.文本框没有______属性。
（A）Enabled （B）Visible （C）BackColor （D）Caption
12.不论何控件，共同具有的是______属性。 （A）Text （B）Name （C）ForeColor （D）Caption
13.要使Form1窗体的标题栏显示\"欢迎使用VB\"，以下______语句是正确的。 （A）=“欢迎使用VB” （B）='欢迎使用VB '
（C）=欢迎使用VB （D）=\"欢迎使用VB \"
14.要使某控件在运行时不可显示，应对______属性进行设置。 （A）Enabled （B）Visible （C）BackColor （D）Caption
15.要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对下列______属性设置就有效。
（A）MaxButton （B）BorderStyle （C）Width （D）MinButton
16.当文本框的ScrollBars属性设置了非零值，却没有效果，原因是______。 （A）文本框中没有内容
（B）文本框的MultiLine属性为False （C）文本框的MultiLine属性为True （D）文本框的Locked属性为True
17.要判断在文本框是否按了Enter键，应在文本框的______事件中判断。 （A）Change （B）KeyDown （C）Click （D）KeyPress
18.在VB中最基本的对象是_________，它是应用程序的基石，是其他控件的容器。 （A）文本框 （B）命令按钮 （C）窗体 （D）标签 19.有序列代码如下： =“Visual Basic”
则：Text1，Text和“Visual Basic”分别代表_________。 （A）对象，值，属性 （B）对象，方法，属性 （C）对象，属性，值 （D）属性，对象，值
20.要使Print方法在From_Load事件中起作用，要对窗体的_________属性进行设置。 （A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption
21.若要使命令按钮不可操作，要对_________属性设置。 （A）Enabled （B）Visible （C）BackColor （D）Caption
22.在窗体上已建立多个控件如Text1、Label1、Command1，若要使程序一运行焦点就定位在Command1控件上，正确的属性赋值语句为： （A）=3 （B）=2 （C）=0 （D）=1
23.以下叙述中正确的是_________。
（A）窗体的Name属性指定窗体的名称，用来标识一个窗体。 （B）窗体的Name属性的值是显示在窗体标题栏中的文本。 （C）可以在运行期间改变对象的Name属性的值。 （D）对象的Name属性值可以为空。
24.将调试通过的工程经\"文件\"菜单的\"生成.exe文件\"编译成.exe后，将该可执行文件到其他机器上不能运行的主要原因是______。
（A）运行的机器上无VB系统 （B）缺少.frm窗体文件 （C）该可执行文件有病毒 （D）以上原因都不对
25.当需要上下文帮助时，选择要帮助的\"难题\"，然后按______键，就可出现MSDN窗口及显示所需\"难题\"的帮助信息。 （A）Help （B）F10 （C）Esc （D）F1
作业二 VB语言基础之一
1.下面______是不合法的整型常数。 （A）123% （B）123& （C）&O123 （D）%123
2.下列函数中______， 函数返回的值是数值型的。 （A）Instr （B）Mid （C）Space （D）Chr
3.一个变量要保存-32786，不应定义成______型变量 （A）integer （B）long （C）single （D）double 4.下面______不是类型说明符。 （A）& （B） $ （C） * （D） @
5.按变量名的定义规则，下面______是合法定义的变量名。 （A） Mod （B） XY#YX2 （C） Temp2 （D） static
6.已知A$=\"4567124\" ,表达式val(mid(A,2,3) + right(A,3))的值是______。 （A）567124 （B）\"567124\" （C） 699 （D）456124
7.表达式 #11/22/99# - 10的运算结果是______。 （A） #11/22/89# （B） #11/12/99# （C） #1/22/89# （D）以上都是 ()函数不可能为下列______值。 （A） 0 （B） 1 （C） （D）
9.以下关于Visual Basic的叙述中不正确的是__________。 A.在VB中一个西文字符占一个字节，一个汉字占两个字节。
B.当Boolean类型的值转换为数值类型的数时，False转成为0，而 True转成-1。 C.数组下标的下界在缺省情况下从0开始。 D. Variant变量未初始化的值为Empty。
10.要存放某人的年龄，下面的数据类型中______占用的字节数最小。 （A）Single （B）Byte （C）Integer （D）Long 11. MsgBox函数返回值的类型是______。
（A）整型数值 （B）字符串 （C）变体 （D）数值或字符串 函数返回值的类型是______。
（A）整型数值 （B）字符串 （C）变体 （D）数值或字符串 13.以下关系表达式中，其值为False的是______。
（A）”ABC”>”AbC” （B）”女”<”男” （C）”BASIC”=UCase(“basic”) （D）”123”<”23” 14.语句Print “Sqr(9)=”;Sqr(9)的输出结果是______。
（A）Sqr(9)=Sqr(9) （B）Sqr(9)=3 （C）\"3\"=3 （D）3=Sqr(9)
作业三 VB语言基础之二
1.在一个语句内写多条语句时，每个语句之间用 符号分隔。 （A）， （B）： （C）、 （D）； 2.下面 是合法的变量名。
（A）X_yz （B）123abc （C）integer （D）X－Y 3.下面 是不合法的整常数。
（A）100 （B）＆Ｏ100 （C）＆H100 （D）%100 4.下面 是合法的字符常数。 （A）ABC＄ （B）“ABC” （C）‘ABC’ （D）ABC 5.下面 是合法的单精度型变量。
（A）num! （B）sum% （C）xinte＄ （D）mm# 6.下面 是不合法的单精度变量。
（A）100！ （B） （C）1E+2 （D）+2 7.表达式16/4-25*8/4 MOD 5\\2的值为 。 （A）14 （B）4 （C）20 （D）2
8. \\、/、Mod、*四个算术运算符中，优先级别最低的是 。 （A）\\ （B）/ （C）Mod （D）* （*100+）/100的值 。
（A）198 （B） （C） （D）200 10.已知A＄=“12345678”，则表达式Val（Left＄（A＄,4）+Mid＄（A＄,4,2））的值为（A）123456（B）123445 （C）8 （D）6 DateAdd（“m”,1,＃1/30/2000＃）语句显示的结果是 。 （A）00-2-29 （B）00-2-28 （C）00-2-30 （D）00-1-31 12.表达式DateDiff（“y”,＃12/30/1999＃,＃1/13/2000＃）的结果是 。 （A）1 （B）11 （C）14 （D）99 13.表达式Len（“123程序设计ABC”）的值是 。 （A）10 （B）14 （C）20 （D）17 14.表达式LenB（“123程序设计ABC”）的值是 。 （A）10 （B）14 （C）20 （D）17 15.下面正确的赋值语句是 。
（A）x+y=30 （B）y=π*r*r （c）y=x+30 （D）3y=x
16.为了给x，y，z三个变量赋初值1，下面正确的赋值语句是 。 （A）x=1：y=1：z=1 （B）x=1,y=1,z=1 （C）x=y=z=1 （D）xyz=1 17.赋值语句：a=123+MID（“123456”,3,2）执行后，a变量中的值是 。 （A）“12334” （B）123 （C）12334 （D）157 18.赋值语句：a=123＆MID（“123456”,3,2）执行后，a变量中的值是 。 （A）“12334” （B）123 （C）12334 （D）157
。 作业四 基本的控制结构
1.以下______是正确的For … Next结构。 （A）For x=1 To Step 10 …
Next x
（B）For x = 3 To 3 Step 3 …
Next x
（C）For x = 1 To 10 AA: … Next x
If i = 10 Then GoTo AA （D）For x = 3 To 10 Step 3 …
Next y
2.下列循环能正常结束循环的是____ 。 （A）i = 5 Do
i = i + 1
Loop Until i < 0 （B） i = 1 Do
i = i + 2
Loop Until i = 10 （C）i = 10 Do
i = i + 1
Loop Until i > 0 （D）i = 6 Do
i = i - 2
Loop Until i = 1
3.下面程序段的运行结果为______。 For i = 3 To 1 Step -1 Print Spc(5 );
For j = 1 To 2 * i - 1 Print \"*\"; Next j Print Next i
（A)* （B）***** （C）***** （D）***** *** *** *** *** ***** * * *
4.当在文本框输入\"ABCD\"四个字符时，窗体上显示的是______。 Private Sub Text1_Change()
Print Text1； End Sub
（A）ABCD （B)A （C）AABABCABCD （D）A
B AB C ABC D ABCD 5.哪个程序段不能分别正确显示1！、2！、3！、4！的值______。 （A）For i = 1 To 4 n = 1
For j = 1 To i n = n * j Next j Print n Next i
（B）For i = 1 To 4 For j = 1 To i n = 1 n = n * j Next j Print n Next i （C）n = 1
For j = 1 To 4 n = n * j Print n Next j （D）n = 1 j=1
Do While j<=4 n = n * j Print n j=j+1 Loop
6.下列程序的执行结果是______。 Dim s，n As Integer s=0∶n=1
Do Until n＞5 s=s+n n=n+1 Loop Print s
（A） 100 （B）50 （C）25 （D）15
7.下面程序是在键盘上输入任一个二进制数，单击命令按钮后，即能转换为十进制数。但程序不完整，补充的部分是______。 Private Sub Command1_Click()
B$=Val(InputBox(″″，″″，0))
M=Len(B$) For J=1 To M
Dec=Dec*2+______(Mid$(B$，J，1)) Next J
Print ″The decimal number is″；Dec End Sub
（A）Abs （B）Int （C）Sng （D）Val
［While｜Until］循环体的作用说明正确的是______ 。 (A) 不能用Do-Loop语句设计出预先确定循环次数的循环 (B) While关键字或Until关键字必须选择其中之一 (C) While关键字或Until关键字可以同时使用 (D) While关键字或Until关键字的作用正相反 9.单击如下事件过程，显示的结果为______。 Private Sub Command1_Click() A=0
For M=1 To 10 A=A+1 B=0
For J=1 To 10 A=A+1 B=B+2 Next J Next M Print A；B End Sub
（A）10 20 （B）20 110 （C）110 20 （D）200 110 10.下面程序运行后,显示的结果是____. dim x
if x then print x else print x+1
(A) 1 (B) 0 (C) (1 (D)显示出错信息 [A] [B] [C] [D]
11.语句If x=1 Then y=1，下列说法正确的是____________。 =1和y=1为赋值语句 =1和y=1均为关系表达式
=1为关系表达式，y=1为赋值语句 =1为赋值语句，y=1为关系表达式
12.下面程序段的功能是求两个数中的小数，_____________是不正确的。 = IIf(x > y， y， x)
x < y Then Min = x Else Min = y y <= x Then Min = y:Min = x
y <= x Then Min= y:If y> x Then Min= x
13.对于选择结构语句 If x = 10 Then y = 100 ，下列说法正确的是_________。 A. x=10 为赋值语句 y=100 为关系表达式 B. x=10 为关系表达式， y=100 为赋值语句 C. x=10 和 y=100 均为赋值语句 D. x=10 和 y=100 均为关系表达式
函数返回值的类型为_______。 A.数值 B.字符串 C.变体
D.数值或字符串（视输入的数据而定）
15.执行语句 receive = MsgBox(\"AAAA\后，所产生的信息框的标题是______ 。 B.空
D.出错，不能产生信息框
16.下列_____________组语句可实现将变量x、y互换。 = y : y = x
= y+2*x : x = y-2*x : y =(y-x)/2 =x+y : x=x-y : y = x-y
= y+2x : x = y-2x : y =(y-x)/2
17.下面程序段的功能是求两个数中的大数,_____________是不正确的。 = IIf(x > y， x， y)
x > y Then Max = x Else Max = y = x : If y >= x Then Max = y y >= x Then Max = y: Max = x
18.假设Text1文本框中输入了学生的成绩，以A、B、C、D、E字符表示不同的等级，下列语句中_____________可用于判断输入数据是否正确。
A. If \"A\" <= Text1<= \"E\" Then MsgBox \"输入正确\" Else MsgBox \"输入错误\"
B. If \"A\" <= Text1 Or Text1 <= \"E\" Then MsgBox \"输入正确\" Else MsgBox \"输入错误\" C. If A <= Text1 And Text1 <= E Then MsgBox \"输入正确\" Else MsgBox \"输入错误\" D. If \"A\" <= Text1 And Text1 <= \"E\" Then MsgBox \"输入正确\" Else MsgBox \"输入错误\"
19.从循环体 Do While...Loop中退出，继续执行循环体后面的命令，应使用______ 。 Do
Do While Loop
20.假设Text1文本框中输入了学生的成绩，规定成绩范围在0～100，下列语句中_____________可用于判断输入数据是否正确。
0 <= Text1 <= 100 Then MsgBox \"输入正确\" Else MsgBox \"输入错误\"
0 <= Text1 Or Text1 <= 100 Then MsgBox \"输入正确\" Else MsgBox \"输入错误\" 0 <= Val(Text1) And Val(Text1) <= 100 Then MsgBox \"输入正确\" Else MsgBox \"输入错误\"
0 <= Val(Text1) <= 100 Then MsgBox \"输入正确\" Else MsgBox \"输入错误\"
作业五 数组
1.以下关于数组的说法，不正确的是______。
（A）静态数组在声明时大小必须固定 （B）动态数组在声明时大小可以不确定
（C）.默认情况下数组的下界为0 （D）运行时可改变动态数组或静态数组的大小 2.有关数组的说法，错误的是______。
（A）数组是一种特殊的数据类型 （B）一个数组中可存放多种类型的数据 （C）数组是一组相同类型的变量的集合 （D）数组可以被声明为变体类型 3.如下数组声明语句，______正确。
（A）Dim a[3, 4] As Integer （B）Dim a(3, 4) As Integer （C）Dim a(n, n) As Integer （D）Dim a(3 4) As Integer
4.要分配存放如下方阵的数据，______数组声明语句能实现（不能浪费空间）。 [ ] [ ] [ ]
（A）Dim a(9) As Single （B）Dim a(3, 3) As Single
（C）Dim a( -1 To 1 , 5 To 3) As Single （D）Dim a( 3 To 1 , 5 To 7) As Integer 5.如下数组声明语句，则数组a包含元素的个数有______。 Dim a(3, -2 to 2,5) （A）120 （B）75 （C）60 （D）13
6.以下程序输出的结果是______。 Dim a
a = Array(1, 2, 3, 4, 5, 6, 7) For i = Lbound (a) To Ubound (a) a(i) = a(i) * a(i) Next i Print a(i)
（A）49 （B）0 （C）不确定 （D）程序出错
7.下列数组声明语句中的数组a包含了______个数组元素 Dim a(4,-1 To 2, 3)
（A） 120 （B） 11 （C）60 （ D）80 8.设数组a中有N个元素，并已按递增次序排列，下面______程序段可以使a数组的元素按递减次序排列。
（A） For i = 1 To N （B） For i = 1 To N / 2 a(N - i + 1) = a(i) a(i) = a(N - i + 1) Next i Next i
（C）For i = 1 To N （D）For i = 1 To N / 2 t = a(i) t = a(i)
a(i) = a(N - i + 1) a(i) = a(N - i + 1) a(N - i + 1) = t a(N - i + 1) = t Next i Next i
9.在设计状态，列表框中的选项可以通过______属性设置。 （A）List （B）ListCount
（C）Text （D）ListIndex
10.将数据项\"China\"添加到列表框(List1)中成为第一项应使用______语句。 （A） \"China\（B） \"China\ （C） 0, \"China\" （D） 1, \"China\"
11.引用列表框(List1)最后一个数据项应使用______。 （A） （B）
（C）(ListCount) （D）(ListCount-1)
12.假如列表框(List1)有4个数据项，那么把数据项\"China\"添加到列表框的最后，应使用______语句。
（A） 3, \"China\" （B） \"China\ （C） \"China\（D） \"China\ 13.在下列说法中，正确的是______。
（A）在程序运行期间，可以通过适当的设置让时钟控件显示在窗体上 （B）在列表框中不能进行多项选择
（C）在列表框中能够将项目按字母顺序从大到小排列 （D）框架也有Click和DblClick事件
作业六 过程
1.下面的过程定义语句中，______是合法的。
（A）Function Sub1(Sub1) （B）Function Sub1(ByVal n) （C）Sub Sub1(Sub1) （D）Sub Sub1(n) As Integer 2.在Visual Basic 6中，下列关于变量的叙述正确的是______. （A） 在窗体的Form_Load事件过程中声明的变量是全局变量 （B） 局部变量的作用域为窗体内的全部过程
（C） 在某个子过程中声明的变量不能与其他事件过程中声明的变量同名 （D） 在调用过程时，所有局部变量被系统初始化为0或空字符串 3.子过程与函数过程最根本的区别是______。
（A） 前者可以使用Call或者直接使用过程名调用，后者不可以 （B） 前者不可以有参数，后者可以有参数 （C） 两种过程参数的传递方式不同 （D） 前者无返回值，但后者有返回值 4.假定有如下的Sub过程______：
Sub fun(x As Single，y As Single) t=x x=t\\y y=t Mod y End Sub
在窗体上画一个命令按钮和两个文本框(其Name属性分别为Txtl和Txt2)，然后编写如下事件过程______：
Private Sub Command1_Click() Dim a As Single，b As Single a=CInt 'Cint函数表示转换成整型
b=CInt
Call fun(a，b) Print a，b End Sub
程序运行时在两个文本框中输入5， 6，单击命令按钮，输出结果为______ （A）5 6 （B） 0 5 （C） 1 4 （D） 1 2
5.若要编写一些Sub子过程，并能从多个窗体中访问这些过程，最好应将它们放在______中。
（A） 标准模块 （B） 窗体
（C） 类模块 （D） 以上都不可以
作业七 用户界面设计
1.下列控件中，______没有Caption属性。 （A）框架 （B）列表框 （C）复选框 （D）单选按钮
2.复选框的Value属性为2时，表示______。 （A）复选框未被选中 （B）复选框被选中 （C）复选框内有灰色的勾 （D）复选框操作有错误 3.下列______控件没有Min、Max和Value属性。 （A）Slider （B）ProgressBar （C）滚动条 （D）Animation
4.当用户按下并且释放一个键后会触发KeyPress、KeyUp和KeyDown事件，这三个事件发生的顺序是______。
（A）KeyPress、KeyDown、KeyUp （B）KeyDown、KeyUp、KeyPress （C）KeyDown、KeyPress、KeyUp （D）没有规律
5.窗体的KeyPreview属性为True，并且有下列程序。当焦点在窗体上的文本框时按下\"a\"键，文本框接收到的字符是______。
Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) KeyCode = KeyCode + 1 End Sub
（A）\"a\" （B）\"b\"
（C）空格 （D）没有接收到字符
6.在下列关于键盘事件的说法中，正确的是______。 （A）按下键盘上的任意一个键都会引发KeyPress事件
（B）大键盘上的\"1\"键和数字键盘的\"1\"键的KeyCode码相同 （C）KeyDown和KeyUp的事件过程中有KeyAscii参数
（D）大键盘上的\"4\"键的上档字符是\"$\"，当同时按下Shift和大键盘上的\"4\"键时，KeyPress事件过程中的KeyAscii参数值是\"$\"的ASCII值 7.在KeyDown/KeyUp的事件过程中，能用来检查Ctrl和F3是否同时按下的表达式为______。 （A）(Button = vbCtrlMask) And (KeyCode = vbKeyF3) （B）KeyCode = vbKeyControl + vbKeyF3
（C）(KeyCode = vbKeyF3) And (Shift = vbCtrlMask) （D）(Shift And vbCtrlMask) And (KeyCode and vbKeyF3) 8.在用菜单编辑器设计菜单时，必须输入的项有______。 （A）快捷键 （B）标题 （C）索引 （D）名称
9.在下列关于菜单的说法中，错误的是______。
（A）每个菜单项都是一个控件，与其他控件一样也有自己的属性和事件 （B）除了Click事件之外，菜单项还能响应其他的如DblClick等事件 （C）菜单项的捷径键不能任意设置
（D）在程序执行时，如果菜单项的Enabled属性为False，则该菜单项变成灰色，不能被用户选择
10.在下列程序中， 不论使用鼠标右键还是左键弹出菜单中的菜单项都响应鼠标单击。 （A）Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
PopupMenu Menu_Test , 2 End If End Sub
（B）Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
PopupMenu Menu_Test , 0 End Sub
（C）Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
PopupMenu Menu_Test End Sub
（D）Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If (Button = vbLeftButton) Or (Button = vbRightButton) Then PopupMenu Menu_Test End If End Sub
11.在下列关于通用对话框的叙述中，错误的是______。 （A）显示字体对话框
（B）在打开或另存为对话框中，用户选择的文件名可以经FileTitle属性返回
（C）在打开或另存为对话框中，用户选择的文件名及其路径可以经FileName属性返回 （D）通用对话框可以用来制作和显示帮助对话框 12.以下正确的语句是______。
（A）=All Files|*.*|Pictures(*.Bmp)|*.Bmp
（B）=\"All Files\"|\"*.*\"|\"Pictures(*.Bmp)\"|\"*.Bmp\" （C）=\"All Files|*.*|Pictures(*.Bmp)|*.Bmp\" （D）={All Files|*.*|Pictures(*.Bmp)|*.Bmp} 13.下面关于多重窗体的叙述中，正确的是______。
（A）作为启动对象的Main子过程只能放在窗体模块内
（B）如果启动对象是Main子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载或加载哪一个窗体
（C）没有启动窗体，程序不能执行 （D）以上都不对
14.当用户将焦点移到另一个应用程序时，当前应用程序的活动窗体将______。 （A）发生DeActivate事件 （B）发生LostFocus事件
（C）发生DeActivate和LostFocus事件
（D）DeActivate和LostFocus事件都不发生
答案
作业一：
1~5 BDAAB 6~10 CBCBD
11~15 DBDBB 16~20 BDCCC 21~25 ACAAD
作业二： 1~5 DAACC 6~10 ABBAB 11~14 ABAB
作业三： 1~5 BADBA 6~10 DBCCB 11~15 ACACC 16~18 ADA
作业四： 1~5 BCCCB 6~10 DDACA 11~15 CCBBA 16~20 BDDBC
作业五： 1~5 DABCA 6~10 DDDAA 11~13 BDD
作业六： 1~5 CDDBA
作业七： 1~5 BCDCA 6~10 DCDBA 11~14 DCBD
因篇幅问题不能全部显示，请点此查看更多更全内容