A.-1B.1C.FALSED.TRUE
31、以下关系表达中，其值为False的是_____D____。
A."The"<>"they"B."ABC"<"AbC"
C."VISUAL"=Ucase（"Visual"）D."Integer"="Int"
32、当x=0时，函数iif（x>0,1,iif（x<0,-1,0））的返回值是____A_____。
A.0B.1C.-1D.出错
33、在一行内写多条语句时，每个语句之间用_____C____来分隔。
A.，B.；C.：
D.、
34、Print方法分区输出时，用_____B____分隔多个表达式。
A.空格B.逗号C.冒号D.分号
35、下列叙述错误的是_____A____。
A.不允许使用行号与标号B.单条语句可分行书写
C.同一行上可以书写多条语句D.VB代码不区分字母的大小写
36、由“Fori=1To16Step3”决定的循环结构被执行____C_____次。
A.4B.5C.6D.7
37、下面程序段运行后，显示的结果是（A）。
Dimxasinteger
ifxthenprintxelseprintx+1
A.1B.0C.-1D.显示出错信息
38、下面程序段求两个数中的大数，____D_____不正确。
A.Max=iif（x>y,x,y）B.ifx>ythenmax=xelsemax=y
C.max=x
ify>=xthenmax=y
D.ify>=xthenmax=y
max=x
39、设有以下循环结构
A.若“条件”是一个为0的常数，则一次也不执行循环体
B.“条件”可以是关系表达式、逻辑表达式或常数
C.循环体中可以使用ExitDo语句
D.如果“条件”总是为True，则不停地执行循环体
Do
循环体
LoopWhile<条件>
则以上叙述中错误的是_____A____。
40、下列关于Do…Loop循环结构执行循环次数的描述正确的是_____D____。
A.DoWhile…Loop循环和Do…LoopUntil循环至少都执行一次
B.DoWhile…Loop循环和Do…LoopUntil循环可能都不执行
C.DoWhile…Loop循环至少执行一次和Do…LoopUntil循环可能不执行
D.DoWhile…Loop循环可能不执行和Do…LoopUntil循环至少执行一次
41、以下Case语句中错误的是____C_____。
A.Case0to10B.CaseIs>10
C.CaseIs>10andIs<50D.Case3,5,Is>10
42、为了给x,y,z这3个变量赋初值2，下面正确的是____A_____。
A.x=2:
y=2:
z=2B.x=2；y=2；z=2
C.x=2，y=2，z=2D.x=y=z=2
43、Print方法可以在_____B____对象上输出数据。
A.桌面B.窗体C.状态栏D.标题栏
44、下列描述不正确的是_____D____。
A.某个子过程中声明的局部变量，其使用范围仅限定于该子过程内
B.某个子过程中声明的局部变量，其生命周期仅限于该子过程被执行的过程中
C.不同子过程中的局部变量可以具有相同的名称
D．不同子过程中具有相同的名称的局部变量是同一变量
45、以下关于函数过程的叙述中错误的是____D_____。
A.函数过程一定有返回值B.函数过程一定有参数
C.函数过程可以在窗体模块和标准模块中定义
D.函数过程参数的类型与返回值的类型无关
46、有一子程序定义为PublicSubaaa（aAsInteger,bAsSingle），正确的调用形式是____C_____。
A．Callaaa1,1.2B．Callsub（1,1.2）
C．aaa1,1.2D.sub1,1.2
47、用下面的语句所定义的数组的元素个数是____A_____。
Dimb（-2to5,3to5）
A.24B.25C.11D.21
48、根据需要用____A___可以重新确定动态数组的大小。
A.ReDimB.DimC.StaticD.Public
49、用Redim不可以改变动态数组的____B_____。
A.大小B.类型C.维数D.下标值
50、在过程定义中用____D_____表示形参的按值传递。
A.VarB.ByRefC.ByValueD.ByVal
51、下面数组声明语句中，数组包含元素个数为___D_____。
Dima（-3to2,5）
A.120B.30C.60D.36
52、有如下程序代码，输出结果是____A____。
Dima（）
a=Array（1,2,3,4,5）
fori=Lbound（a）toUbound（a）
printa（i）;
nexti
A.12345B.01234C.54321D.43210
53、假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是____B____。
A.数组中每个命令按钮的名称（名称属性）均为Command1
B.数组中每个命令按钮的标题（Caption属性）都一样
C.数组中所有命令按钮可以使用同一个事件过程
D.用名称Command1（下标）可以访问数组中的每个命令按钮
54、在设定OptionBase1后，经Dimarr（3,4）AsInteger定义的数组arr含有的元素个数为____A___。
A.12B.20C.19D.9
55、有如下程序代码，输出结果是____C____。
Dima（-3to6,5）
n=Ubound（a,1）
printn
A.-3B.0C.6D.5
56、窗体能响应的事件是____B_____。
A.ActiveFormB.LoadC.DriveD.Change
57、设置标签的_____C____属性，可改变其文字对齐方式。
A.JustifyB.VisibleC.AlignmentD.以上都不是
58、可以控制连续发生的、有规律的事件的控件是____C_____。
A.组合框B.列表框C.进度条D.时钟控件
59、下列_____D____不属于组合框的风格。
A.下列式组合框B.简单组合框C.下列式列表框D.简单列表框
60、假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为____A_____。
A.MenuItem.Enabled=FalseB.MenuItem.Enabled=True
C.MenuItem.Visible=TrueD.MenuItem.Visible=False
61、当运行程序时，系统自动执行启动窗体的某个事件过程，这个事件过程是____A_____。
A.LoadB.ClickC.UnloadD.GotFocus
62、复选框的Value属性为1时，表示____B_____。
A.复选框未被选中B.复选框被选中
C.复选框呈灰色不可用D.复选框操作有误
63、以下叙述中正确的是_____A____。
A.窗体及窗体上所有控件的事件过程代码都保存在窗体文件中
B.在工程中只有启动窗体可以建立菜单
C.窗体名称必须与窗体文件的名称相同
D.程序一定是从某个窗体开始执行的
64、要改变Label控件中文字的颜色，可以设置Label控件的___C_____属性。
A．FontColorB.FillColorC.ForeColorD.BackColor
65、滚动条控件取值范围最大值的属性是____A_____。
A.MaxChangeB.LargeChangeC.ValueD.Max-Min
66、要获知当前列表项的数目，可通过____B____属性实现。
A.ListB.ListCountC.ListIndexD.Text
67、可以通过修改控件数组中的控件的____C____属性值改变其在数组中的顺序。
A.FontB.CaptionC.IndexD.Name
68、用来设置斜体字的属性是___B_____。
A.FontBoldB.FontItalicC.FontNameD.FontSize
69、复选框的Value属性为2时，表示____C____。
A.复选框未被选中B.复选框被选中
C.复选框呈灰色不可用D.复选框操作有误
70、下列控件中没有Caption属性的是____B____。
A.框架B.列表框C.复选框D.单选按钮
71、滚动条产生Change事件是因为____B____值改变了。
A.SmallChangeB.ValueC.MaxD.LargeChange
72、如果要每隔15s产生一个Timer事件，则Interval属性应设置为___D_____。
A.15B.900C.150D.15000
73、列表框的____C____属性是数组。
A.List和ListIndexB.List和ListCount
C.List和SelectedD.List和Sorted
74、以下不允许用户在程序运行时输入文字的控件是____D____。
A.文本框B.下拉式组合框C.简单组合框D.下拉式列表框
75、____A____不是VB控件。
A.窗体B.定时器C.单选框D.复选框
76、要将窗体从内存中卸载出去，其实现的方法是____D____。
A.ShowB.HideC.LoadD.UnLoad
77、要使按钮上能放置图片需要修改按钮的___D_____属性。
A.MaskColorB.BackColorC.VisibleD.Style
78、能清除文本框Text1中内容的语句是____B____。
A.Text=""B.Text1.Text=""
C.Text1.ClearD.Text1.Cls
79、设置标签Label1不可见的语句是___D_____。
A.Label1.Visible==0B.Label1.Visible==1
C.Label1.Visible=TrueD.Label1.Visible=False
80、设置Line控件的____A____属性可使其呈现不同线型。
A.BorderStyleB.StyleC.FillStyleD.Shape
81、要使文本框的滚动条ScrollBars属性有效，首先要将____A____属性设置为True.
A.MultiLineB.VisibleC.TextD.MaxLength
82、设置Image控件的____C____可使框内的图片按图像框大小自动调整。
A.AutoSize属性为TrueB.AutoSize属性为False
C.Stretch属性为TrueD.Stretch属性为False
83、命令按钮、单选按钮、复选框上都有Picture属性，可以在控件上显示图片，但需要通
过____B____来控制。
A.Appearance属性B.Style属性C.DisablePicture属性D.DownPicture属性
84、如果要在菜单中添加一个分隔线，则应将其Caption属性设置为____D_____。
A．=B．*C.&D．-
85、下列不能打开菜单编辑器的操作是____D_____。
A.按Ctrl+E键B.单击工具栏中的“菜单编辑器”按钮
C.执行“工具”菜单中的“菜单编辑器”命令
D．按Shift+Alt+M键
二、判断题
1、方法是预先定义好的、能够被对象识别的动作。
（错）
2、工程资源管理器管理文件主要有6类，即窗体文件（.frm）、标准模块文件（.bas）、类模块文件（.cls）、工程文件（.vbp）、工程组文件（vbg）和资源文件（.res）。
（对）
3、所有属性都可以在属性窗口设置。
（错）
4、在VisualBasic设计界面中,工程窗口是不能隐藏的窗口。
（错）
5、在语句中Ifx=1Theny=1中，x=1为关系表达式，y=1为赋值语句。
（对）
6、若要退出for循环，可使用Exit语句。
（错）
7、在For……Next循环中，其中step步长可以是正数、负数或者零。
（错）
8、文本框中显示的内容可根据文本框的大小自动换行。
（错）
9、Dima1,a2asinteger语句声明变量a1和a2都为整型变量。
（错）
10、VB中的变量必须先声明才可使用。
（错）
11、在VB的工具箱中包括了所有的VB控件，我们不能再加载其他的控件。
（错）
12、所有的控件在程序运行以后都是可见的。
（错）
13、VB中有两种常量：
直接常量和符号常量；两者的区别在于后者在程序运行过程中可以根据程序执行的要求改变该常量的值。
（错）
14、在同一过程中声明数组时，数组名可以与变量名相同。
（错）
15、PictureBox控件不是“容器”控件。
（错）
16、菜单编辑器中的快捷键是指无须打开菜单就可以直接由键盘输入选择菜单项的键。
（对）
17、在一个语句内写多条语句时，每个语句之间用：
符号分隔。
（对）
18、若要取消窗体的最大化功能，可设置MaxButton属性为False来实现。
（对）
19、面向对象程序设计是一种以对象为基础，由事件驱动对象执行的设计方法。
（对）
20、窗体模块和标准模块都是只由代码组成。
（错）
21、用户定义类型中的元素可以是任何数据类型，如变长字符串型，整型等。
（对）
22、赋值语句的功能是计算表达式值并转换为相同类型数据后为变量或控件属性赋值。
（对）
23、DoWhile……Loop循环至少执行一次，Do……LoopUntil循环可能不执行。
（错）
24、if6>5thenx=5endif是一条合法语句。
（错）
25、给三个变体型变量x、y、z,分别对三个变量赋值：
x=1、y=1、z=x=y，那么变量z的值也是1（对）
26、逻辑型数据只有两个值：
0和1。
（错）
27、InputBox函数返回值的类型是数值或字符串。
（错）
28、在VB中，运算"Then">"Than"的结果是True。
（对）
29、在VB中，运算"ABCDE123A"Like"A*A"的结果是True。
（对）
30、通用过程中使用Static关键字定义的过程级变量都是静态变量。
（对）
31、由Array函数建立的数组必须是Variant类型。
（对）
32、文本框和标签控件有许多共同特点，它们都能显示和输入文本。
（错）
33、菜单一旦建成后，所有的菜单项均可识别Click事件。
（错）
34、可以同时删除字符串前导和尾部空白的函数是Trim。
（对）
35、一条赋值语句只能给一个变量赋值，不能给多个变量赋值。
（对）
36、递归结构属于3种控制结构之一。
（错）
37、VB中给对象的属性赋值可以通过赋值语句实现。
（对）
38、在SelectCase语句中，关键字Case后面的取值格式有3种。
（对）
39、一个工程只能有一个窗体。
（错）
40、注释语句作为一个独立行，可放在过程、模块的开头作为标题，也可以放在执行语句的后面。
（对）
三、填空题
1、窗体上有一个命令按钮Command1，编写如下事件过程：
PrivateSubCommand1_Click（）
x=InputBox（"x="）
y=InputBox（"y="）
Printx+y
EndSub
运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是（123321）。
2、语句Form1.Print"10"&20的输出结果为：
（1020）。
3、执行下面程序，输出结果是
（2）。
PrivateSubCommand1_Click（）
DimaaAsVariant
aa=Array（1,2,3,4）
Printaa
（1）
EndSub
4、控件数组中以（index）属性来区分各个元素。
5、程序运行时单击第三个命令按扭，Label1的背景色是蓝色，请将下面代码补充完整。
PrivateSubCommand1_Click（IndexAsInteger）
SelectCaseIndex
Case0
Label1.BackColor=VbRed
Case1
升级会员 