VB考试题库大全
1.下面哪一个叙述为正确的？ D
A.VB的编程非常简单，只要将窗体上的控建设置好，再将控件的属性按要求设置即可完成程序的编制
B.VB的特点中的可视化编程是指随时可使用打印预览看一下效果
C.VB的特点中的事件驱动机制是系统已经编制好的一些针对控件的程序，可以直接调用
D.VB系统提供了数据库管理功能
2.下面哪一个叙述是错误的？ D
A.VB的编程非常简单，因为系统提供了很多编制好的控件，可直接放到界面上使用
B.VB是面向对象的程序设计，并且具有结构化的程序设计语言
C.VB的特点中的事件驱动机制是系统可以感知一些动作，当该动作自动去执行对应的事件过程
D.VB系统没有提供数据库管理功能
3.下面哪一个叙述是正确的？ B
B.VB源程序有工程文件、窗体文件、模块文件等，工程文件包含所有的文件，源程序备份需要备份所 有相关文件
4.VB窗体设计器的主要功能是：A.建立用户界面
5.下面哪一个叙述是正确的？
A.在安装有VB系统程序的计算机上，修改一个以前编制的VB源程序，只需要双击工程文件即可
6.什么是对象？
A.对象是具有特殊属性和行为方式的实体
7.下面关于对象的属性设置，哪个说法是正确的？
C.对象只有部分的属性值可以在属性窗口中修改
8.以下叙述中正确的是
A.窗体的Name属性指定窗体的名称，用来标识一个窗体
9.当程序运行出错时，系统报错信息显示“要求对象”，是下面哪种情况？ C
A.没有命令中用到的控件属性
B.使用控件数组时下标超出范围
C.没有命令中用到的对象
D.没有命令中用到的控件方法
10.当需要将窗体上的控件一起移动时，需要同时选中要移动的控件，下面的方法哪种不能选中多个控件 ？ D
A.用鼠标左键点击窗体空白处，不要松手，拖动，可选中区域内的多个控件
B.键盘按住Ctrl键，鼠标单击每个需要选中的控件
C.键盘按住Shift键，鼠标单击每个需要选中的控件
D.键盘按住Alt键，鼠标单击每个需要选中的控件
11.下面哪一个语句是正确的注释？ A
A.Print a'打印变量a
B."Print a""打印变量a"
C.Print a&&打印变量a
D.Print a Rem 打印变量a
12.下面哪一个语句是程序运行结束语句？ D
A.End Sub B.Stop C.Exit Sub D.End
13.一行命令可以分成多行写，在不是最后一行的行尾需要加上“续行符”，下面哪个是续行符？ A
A.空格+下划线 B.下划线 C.空格+减号 D.减号
14.一行可以写多条语句，在语句间应该有分隔符，下面哪个是语句分隔符？ A
A.冒号 B.逗号 C.分号 D.圆点
15.关于Visual Basic程序的说法不正确的是 D
A.一行可以写多条语句，语句间用“：”隔开
B.一条语句可以写在多行，用“空格”加“-”作为续行标志
C.程序中的大小写字母不区分
D.变量在使用之前必须先定义
16.在VB中，窗体文件的扩展名是 frm窗体
17.关于对象的属性不正确的是 对象的属性均可在设计时设置
18.为了把焦点移到某个控件，所使用的方法是 A.SetFocus
19.在设计时为了选中窗体上的某个控件，应执行的操作是 B.单击该控件
20.VB中每个语句的结束标志是 D.回车键
21.VB中的注释语句是 B.非执行语句
22.VB中的语句通常按“一行一句”的规则书写，但也允许多个语句放在同一行中，在这种情况下，用来 隔开各语句的符号是 A.冒号
23.一般，在用VB开发应用程序时，通常的步骤为：
B.1.建立可视界面 2.设置可视界面 3.编写事件驱动代码
24.在Vb中，装入应用程序，实际上就是装入 C.工程文件
25.将一个VB程序保存在磁盘上，至少会产生的文件是 C. .vbp 、.frm
26.下列叙述不正确的是 C
A.注释语句是非执行语句
B.注释语句可以作为代码中的一行
C.注释语句不可以放在其他语句的后面
D.加入注释语句可以提高程序的可读性
27.下面关于VB工具栏的说法不正确的是 B
A.工具栏可以浮动
B.工具栏一定在菜单栏的下方
C.工具栏可以显示或隐藏
D.VB有多个工具栏
28.VB中的标准模块文件的扩展名是 C. .bas
29.VB中的工程文件的扩展名是 D. .vbp
30.刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是 C.通用对话框
31.在VB中可以改变控件大小的操作是 B.Shift+方向键
32.在Vb中移动选定控件的操作是 D.Ctrl+方向键
33.哪种语句可以把窗体Form1加载到内存组但不显示出来 C.Load Form1
34.程序运行后，在窗体Form1中单击。将触发的事件是 Form-Click()
35.程序运行后，单击控件Command1，将触发的事件是 C. Command-Click()
36.新建一个窗体Form1后，立即在该窗体上双击，将出现下列哪个事件过程的代码框架？ Form-Load()
37.一个对象可执行的动作被称为 B.方法
38.由VB预先设置好的、能被对象识别的动作称为 B.事件
39.为了同时改变一个活动控件的高度和宽度，正确的操作是 A.拖动控件4个角上的某个小方块
40.为了把窗体上的某个控件变为活动的，应执行的操作是 C.单击该控件
41.在设计阶段，当双击窗体上的某个控件时，所打开的是 C.代码窗口
42.下列不能打开属性窗口的操作是 D
A.执行“视图”菜单中的“属性窗口”命令
B.按F4
键
C.单击工具栏上的“属性窗口”按钮
D.按Ctrl+T键
43.下列可以打开立即窗口的操作是 D. Ctrl+G
44.VB的特点不包括下面的 A
A.不需编程
B.面向对象的程序设计
C.可视化程序设计
D.事件驱动的程序设计
45.关于VB的启动窗体，说法正确的是 可以改变
46.关于VB程序的说法不正确的是 B
A.一行可以写多条语句，语句之间用“：”隔开
B.一条语句可以写在多行，用“空格”加“；”作为续行标志
C.程序中的大小写字母不区分
D.变量在使用之前可以不定义类型
47.窗体从加载到显示出来，最优先发生的事件是 Load
48.下列哪个是结束程序的语句 End
49."与Text1=""VB"等价的语句是 "Text1.Text=""VB"""
50."与Label1=""姓名""等价的语句是 "Label1.Caption=""姓名"""
51.VB集成环境的主窗口中不包括 状态栏
52.VB6.0的三种版本不包括 个人版
53.下列说法错误的是 B
A.有些语句可以在立即窗口执行
B.所有语句都可以在立即窗口执行
C.按Ctrl+G可以打开立即窗口
D.Debug.Print将结果在立即窗口输出
54.“假定窗体的名称（Name属性）为Form1,则把窗体的标题设置为""Test""的语句为 B
A."Form1=""Test"""
B."Caption=""Test"""
C."Form1.Text=""Test"""
D."https://www.wendangku.net/doc/774168154.html,=""Test"""
55.VB的注释语句是以什么开始的？ Rem或'
56.VB应用程序通常由三类模块组成，不包括 控制模块
57.阅读下面程序，当单击鼠标右键，输出结果为 AA
Private Sub
Form-MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
If Button=2 Then
Print
String(Button,""A"")
End if
End Sub
58.阅读上面程序，当单击鼠标左键，输出结果为 没有输出
59.以下叙述错误的是 D
A.在KeyUp和KeyDown事件过程中，从键盘上按下A或a被视作相同的字母
B."在KeyUp和KeyDown事件过程中，将键盘上的""1""和数字键盘上的"1"视作不同的数字
C.KeyPress事件中不能识别键盘上的某个键的按下和释放
D.KeyPress事件能识别键盘上某个键的按下与释放
60.阅读下面程序，当按下鼠标右键不放，输出结果为 没有输出
Private Sub
Form-MouseUp(Button As Ingeter,Shift As Ingeter,Shift As Ingeter,X As Single,Y As Single)
If Button=2 Then
Print
String(Button,""A"")
Endif
End Sub
61.阅读上面程序，当单击鼠标右键放开，输出结果为 AA
62.阅读上面程序，当按下鼠标左键不放，输出结果为 没有输出
63.阅读上面程序，当单击鼠标左键放开，输出结果为 没有输出
64.当鼠标单击左键时，在窗体上画一个圆，下面填空处应填 Button=1
Private Sub
Form_MouseUp(Button As Ingete
r,Shift As Ingeter,X As Single,Y As Single)
If_________Then Circle(x,y)
Endif
End Sub
65.当鼠标单击右键时，在窗体上画一个圆，下面填空处应填 Button=2
66.当鼠标单击中间键时，在窗体上画一个圆，下面填空处应填 Button=4
67.文本框中只允许输入数字，填空处应该是什么内容 KeyAscii=0
Private Sub
Text1_KeyPress(KeyAscii As Ingeter)
If Not(KeyAscii>47 And KeyAscii<58)
Then __________
Endif
Endsub
68.文本框中只不允许输入数字，填空处应是什么内容 KeyAscii=0
69.当鼠标按下Ctrl键并单击左键时，在窗体上画一个圆，下面填空处应是哪个 Button=1 and shift=2
Private Sub
Form_MouseUp(Button As Ingeter,Shift As Ingeter,X As Single,Y As Single)
If_________Then Circle(x,y)
Endif
End Sub
70.当鼠标按下Ctrl键并且单击右键时，在窗体上画一个圆，下面应填 Button=2 and shift=2
71.当鼠标按下shift键并且单击左键时，在窗体上画一个圆，下面应填 Button=1 and shift=1
72.当鼠标按下shift键并且单击右键时，在窗体上画一个圆，下面应填 Button=2 and shift=1 SHIFT右键
73.在键盘的KeyPress事件中针对参数KeyAscii的描述下面哪个是正确的 A
A.返回键盘上输入的内容的Ascii值
B.返回键盘上按下的键位值
C.大键盘1和小键盘1返回不同的内容
D.可以返回F1-F12的键位值
74.在键盘的KeyDown事件中针对参数KeyCode的描述错误的是 返回键盘上输入的内容的Ascii值，大键盘1和小键盘1返回相同的值
75.在键盘的KeyUp事件中针对参数shift的描述正确的是 表示加农上的shift键和Alt键和Ctrl键是否被同时按下
76.在键盘的KeyUp事件中，参数shift的值为1表示 shift被按下
77.在键盘的KeyUp事件中，参数shift的值为2表示 Ctrl被按下
78.在键盘的Keyup事件中，参数shift的值为4表示 alt被按下
79.下面的赋值语句中哪个是错误的 B
A. a=5*n B. val(a)=5*n C. a=val(Text1.Text) D.a=str(5*n)
80.整形数据的取值范围是下面哪个 C
A.0到32767 B.0到32768 C.-32768到32767 D.0到65535
81.&H1234是什么类型的常量数据 16进制整型
82.35！是什么类型的常量数据 单精度浮点数常量
83. 2.5D5是什么类型的常量数据 双精度浮点数常量
84.下面哪个内容不是常量 D
A.1 B.True C."""aaa""" D.year
85.Const PassComputer=48 这个语句的作用是什么 声明符号常量PassComputer,PassComputer代表48
86.下面选项哪个不是常量 D
A.35 B."""35""" C.35% D.weekday
87.声明符号常量使用哪个关键字 Const
88.HA123=&HA456 针对这个赋值语句，正确的是 “=”左边的是常量，
右边是变量
89.Dim a1,b1 As Integer 这个语句声明变量a1的数据类型是 变体类型
90.Dim a1 As Boolean 这个语句声明变量a1的数据类型是 布尔型
91.Dim a1 As Variant 这个语句声明变量a1的数据类型是 变体类型
92.Dim a1@ 这个语句声明变量a1的数据类型是 货币型
93.Dim a1& 这个语句声明变量a1的数据类型是 长整型
94.在按钮的单击事件中有下面一句命令，4次单击按钮后输出的值是 2 2 2 2
Private Sub
Command1_Click()
Dim m
m=m+2
Print m;
End Sub
95.在按钮的单击事件中有下面一句命令，4次单击按钮后输出的值是 3 6 9 12
Private Sub
Command1_Click()
Static m
m=m+3
Print m;
End Sub
96.下面哪个命令能打印出今天星期几 Print Weekday(Now)-1
97.下面哪个命令能打印出现在几点几分几秒 Print time
98.下面哪个表达式的结果是一个40到50之间的随机整数 Int(Rnd*10）+40
99.下面哪个表达式的结果是一个-40到40之间的随机整数 Int（Rnd*80）-40
100.下面哪个表达式结果是一个0到0.5之间的随机数 Rnd*0.5
101.变量a1中存放的是实领工资金额数值，在标签框中输出工资，在标签框中输出工资，选项中哪个是正 确的
Dim a1 As Single a1=1256.85 "Label1.Caption=""实发工资为""+Str(a1)+""元"""
102. Dim a1 As String a1=""2001331001""" 变量a1中存放的是学号（字符型），在标签框中输入年级 ，选项中哪句是正确的
"Label.Caption=""此学生为""+left(a1,4)+""级学生。"""
103."测试用户输入在文本框的数据有没有""Pass""(不区分大小写），如果有，给变量a赋值""Pass""所 在位置，否则，变量a赋值0.下面哪个语句正确？
"a=InStr(Text1.Text,""Pass"",1)"
104.当变量运行了下面赋值语句，想打印出“2001级法学院学生”，应该选择选项中的哪句命令运行？
a=""2001 ""b=""法学院""" "Print Trim(a)+""级""+Trim(b)"
105."设a=""Visual Basic程序设计"",下面能使b的值为""Basic""的选项是 "b=Mid(a,8,5)"
106."下面语句的执行完毕后，变量a1的值是多少？ A1=103 Mod 50" 3
107.“下面语句执行完毕后，变量a1的值是多少？ A1=103\50” 2
108.“运行下面两条命令后。x的结果为：x=#12/23/2001# x=x+3 ” #12/26/2001#
109.“运行下面两条命令后，x的结果为：y=100 x=y\3 ” 33
110.“运行下面两条命令后，x的结果为： y=100 x=y>100 ” 假
111.哪个是日期型常量 #02/25/2000#
112.哪个是字符型常量 """I am a student"""
113.下面符号常量的声明中不合法的是 C
A. Const a=1.1
B. Const a=12
C. Const a=5*year(now)
D.
"Const a=""ok"""
114.“设a=,b=5则以下表达式为true的是 (a>b) or (b>0)
115.“下列程序的执行结果是 a=""abcd"" b=""123"" Print a>b ” True
116.在窗体上画一个命令按钮，其名称为Command1,编写如下事件过程，程序运行时，单击命令按钮两次 后，在窗体上显示的信息是 1 1 2 1
Private Sub
Static a As Integer
Dim b As Integer
a=a+1
b=b+1
Print a;b;
End Sub
117.命令按钮Command1，事件过程如下，程序运行后，单击命令按钮Command1，窗体显示结果是 0 4
Private Sub
Command1_Click()
Dim x As Integer
x=4
y=5
Print x\y; x Mod y
End Sub
118.下列语句能声明全局变量的是 Public
119.只删除字符串尾部空白的函数是 Rtrim
120.在窗体上画一个命令按钮，其名称为Command1,编写如下事件过程，程序运行时，单击命令按钮三次 后，在文本框显示的信息是 100
Private Sub
Static x As Integer
Dim y As Integer
x=x+100
y=y-200
Text1.Text=Str(x+y)
End Sub
121.赋值语句的作用是 赋值语句用于将表达式的值赋给变量或属性
122.长度为0的字符串称为 空字符串
123."""abc123""&""123456""的运算结果是 """abc123123456"""
124.如果要产生随机整数，可以通过把随机数乘以一个整数再加1求得，一般格式为 Int(Rnd*整数）+1
125.VB中赋值语句兼有的双重功能是 计算与赋值
126.下面关于赋值语句说明正确的是 D
A.赋值语句中的关键字Let不能省略
B.在赋值语句中，“=”与数学上的等号意义一样
C.在赋值语句中，“目标操作符”和“源操作符”的数据类型不能相同
D.用赋值语句可以把指定的值赋给某个变量或某个带有属性的对象
127.下面属于字符型数据的是 """hello"""
128.字节类型是一种数值类型，其取值范围是 0~255
129.下面正确的整型常量是 C
A.&624 B.0347 C.&0127 D.&0128
130.下列变量名正确的是 B
A.Print B. Print_Num C.25 D.2A
131.表达式int(105.678*100+0.5)/100的运算结果是 105.68
132.“已知a=""abcdefghijk"",则执行语句Print Mid$（a$,3,4)后的结果是 ” cdef
133.把小写字母转换为大写字母的函数是 Ucase$
134."x是小于100的非负数",用VB表达式表示正确的是 0<=x and x<100
135.函数Int(Rnd(10)*10)产生的整数范围是 （0,10）
136.如果x是正实数，对x的第3位小叔四舍五入的表达式是 0.01*Int(100*(x+0.005))
137.求25度的Sin值的VB表达式是 Sin（25*3.14/180）
138.在窗体上画一个命令按钮，然后编写如下的时间过程，程序运行后，单击命令按钮，先后在两个输入 对话框中分别输入456和1
23，则输出结果是 123456
Private Sub
Command1_Click()
Dim a as String,b as String
a=InputBox("""")
b=InputBox("""")
Print b+a
End Sub
139.在窗体上画一个命令按钮，然后编写如下的时间过程，程序运行后，单击命令按钮，先后在两个输入 对话框中分别输入456和123，则输出结果是 579
Private Sub
Command1_Click()
Dim a as String,b as Integer
a=InputBox("""")
b=InputBox("""")
Print b+a
End Sub
140.设a=6,则执行x=iif(a>5,-1,0)后，x的值为 -1
141."""12345""+""jsg""的结果是 12345jsg
142.Print Len(""BASCIC程序设计"")的结果是 9
143.在窗体上画一个命令按钮，编写事件过程，运行程序，三次单击命令按钮后，最后一次的输出是 1
Private Sub
Command1_Click()
Dim b as Integer
b=b+1
Print b
End Sub
144.下面合法的变量名是 x_yz
145.下列合法的单精度型变量是 num!
146.""程序设计ABC""为ANSI格式字符串，表达式Lenb(""程序设计ABC""）的值是 14
147."""程序设计ABC为UniCode格式字符串，表达式Len（""程序设计ABC""）的值是" 7
148.赋值语句a=123+Mid(""123456""3,2)执行后，a变量中的值是 157
149.赋值语句a=123&Mid（""123456"",3,2)执行后，a变量中的值是 """12334"""
150.执行下面程序段后，将显示 1
Dim x
if x then print x else
print x+1
151.\、/、mod这四个算术运算符中，优先级别最低的是mod ,最高的是\
152.Rnd函数的值不可能是 B
A.9.15E-4 B.1.0000 C.0.98 D.0.0005
153.int(198.555*100+0.5)/100的值为 198.56
154.已知A=""12345678"",则表达式Val(left(A,4)+mid(A,4,2))的值为 123445
1.表达式Len(""123程序设计ABC"")的值为 10
2.表达式LENB(""123程序设计ABC"")的值为 20
3.求25度的正弦值的VB表达式为 SIN(25*3.14/180)
4.如果X是一个正实数，对X的第三位四舍五入的表达式是 0.01*int(100*(X+0.005))
5.函数int(rnd*100)产生的整数范围是 "(0,100)"
6.函数Sgn(10)的结果为 1
7.函数Sgn(-10)的结果为 -1
8.函数Sgn(0)的结果为 0
9.a=""ABCDEFGHIJK""
Print mid(a,4,3)
语句执行后的输出是 DEF
10.a=""ABCDEFGHIJK""
Print mid(a,1,4)
语句执行后的输出是 ABCD
11.a=""ABCDEFGHIJK""
Print mid(a,5,4)
语句执行后的输出是 EFGH
12. a=""ABCDEFGHIJK""
Print mid(a,8)
语句执行后的输出是 HIJK
13.执行一下程序段，变量C的值为 Quick BASIC Programming
a="Visual Basic Programming"
b="Quick"
c=b&Ucase(mid(a,7,6))&right(a,11)
14.X=Ucase("AbcDEF")语句执行后的值为 ABCDEF
15.X=Lcase("AbcDEF")语句执行后的值为 abcdef
16.常量99/10/20是 数值型
17.常量"99/10/20"是 字符型
18.下面哪个赋值语句是正确的 ( B )
A. Let 3=a B. a=a+1 C. Let a+1=a D.a+1=s
19.下面哪个赋值语句是正确的 ( A ) A. Let b=1=2 B. Let 2+1=b C. 2+1=b D. b+1=2
20.下面哪个赋值语句是正确的 ( C ) A.Let 0=s B.Let s+1=s C. s=s+k D. k+1=s
21.常量#99/10/20#是 日期型
22.常量True是 逻辑型
23.sum% 是合法的整型变量
24.xinte$ 是合法的字符变量
25.mm# 是合法的双精度变量
26.num$ 是长整型变量
27.下面正确的变量名是( A ) A. a2 B. 2a C. a(2) D. 2*a
28.下面正确的变量名是( A ) A. int-num B. int.num C. integer D. int(num)
29.语句x=12 mod -5执行完毕后，变量X的值为 2
30.语句x=12.6 mod -5执行完毕后，变量X的值为 -3
31.语句x=(-5)^3执行完毕后，变量X的值为 -125
32.语句x=(5>4)执行完毕后，变量X的值为 True
33.语句x=("abc">"aaa")执行完毕后，变量X的值为 True
34.语句x=(100-20<=50+20)执行完毕后，变量X的值为 False
35.语句x=not(10>6)执行完毕后，变量X的值为 False
36.语句x=10>8 And 8>4执行完毕后，变量X的值为 True
37.语句x=8>10 or 8>4执行完毕后，变量X的值为 True
38.语句x=10>8 or 8>4执行完毕后，变量X的值为 True
39.表达式int(-4.98)= -5
40.表达式Fix(-4.987)= -4
41.表达式Val("123ab"+"2345")= 123
42.表达式Round(-3.5)= -4
43.表达式Round(3.5)= 4
44.表达式Val("abc")= 0
45.表达式16/4-2^5*8/4 mod 5\2= 4
46.数学关系3≦x＜10表示成VB表达式为 3<=x and x<10
47.滚动条的Value属性值介于Min和Max之间
48.当在滚动条内拖动滚动框时触发的事件是 Scroll
49.如果把计时器的Interval属性设置为2000则表明 2秒 发生一个计时器事件
50.如果希望在标签框内显示时间，在计时器的timer事件中写入命令Label1.Caption=Timer$,另外还必须设置Timer控件的Interval属性值为1000且Enabled属性值为True
51.计时器Timer1,将Interval属性值设置为1000，有如下程序:
Private Sub Timer1 Timer()
Static s As Integer
s=s+1
Print s
End Sub
程序运行到2.5秒时，在窗体上输出的信息是 1 2
52.关于框架的说法错误的是（ A ）
A.使用框架的主要目的是为了显示文本
B.框架是一个容器控件
C.框架的Enabled属性设置为True时才能保证框架内的对象是活动的
D.当框架移动时，框架内的控件作为一个整体和框架一起移动
53.文本框，命令按钮，复选框都可以获得焦点；但标签不可以获得焦点
54.下列说法错误的是（A）
A.通过适当的设置，可以在程序运行期间，让定时器控件显示在窗体上
B.窗体，图片框，图像框中的图形都可以通过对象的Picture属性设置
C.对象的Name属性只能通过属性窗口来设置
D.组合框是组合了列表框和文本框的特性而成的控件
55.命令按钮，标签，单选按钮都有Caption属性；而文
本框没有Caption属性
56.窗体，立即窗口，打印机都可以通过Print方法接受文本，而图像框不可以
57.在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，有如下事件过程：
Private Sub Command1 Click()
a=Text1.Text+Tex2.Text
Print a
End Sub
程序运行后在第一个文本框和第二个文本框内分别输入123和321，然后单击命令按钮，则输出结果为 123321
58.假定当前目录下有一个名为"pic.gif"的图形文件，要在运行期间把文件装入一个图片框（Name属性为Picture1），应执行的语句为：
Picture1.Picture=LoadPicture("pic.gif")
59.文本框，列表框，组合框都具有Text属性,而图片框没有
60.在属性窗口中设置窗体的属性设置为100，属性设置为200，程序运行后执行下列哪条语句后窗体的位置会发生变化（A）
A."Move 200,100,100,200"
B."Move 100,200,300,400"
C."Move 100,200,100,100"
D."Move 100,200,100,200"
61.命令按钮有 Setfocus
62.复选框的Value属性设置为1，表示 选中该复选框
63.复选框的 Style 属性可以使复选框的显示方式变为命令按钮方式
64.一般在窗体上输入下面哪类数据时，使用复选框接收（A）
A. 所学课程 B. 学生姓名 C. 性别 D.年龄
65.程序运行时，当单选按钮的中心有一个圆点时，表示 该单选按钮被选中
66.下面关于单选按钮的描述正确的是（A）
A.在程序编制阶段，设置容器内的一个单选钮的value属性为true，同一个容器内的value属性为真的单选钮value属性变为false
B.在程序编制阶段，设置容器内的一个单选钮的value属性为true，窗体上所有容器内的单选钮的value属性值全为false
C.在程序编制阶段，设置容器内的一个单选钮的value属性从true变为false，容器内其它的单选钮必有一个value属性值变为true
D.在程序编制阶段，设置容器内的一个单选钮的value属性为true，不影响同一容器内的其它单选钮的value属性值
67.一般在窗体上输入哪类数据时，使用单选按钮接收（A） A.性别 B. 学生姓名 C.年龄 D.籍贯
68.下面语句能正确的把列表框List1第4项的内容设置为"aaaa"的是（A）
A."List1.List(3)"="aaaa"
B."List1.List(4)"="aaaa"
C."List1.List(5)"="aaaa"
D."List1.List(0)"="aaaa"
69.语句"List1.List(2)="上海"的作用是 把列表框的第3个项目内容设置为“上海”
70.决定窗体的大小属性为 Width,Height
71.语句"List1.selected(2)=true"表示 列表框1的第3个项目被选中
72.若列表框2中的项目每次只能选择一项，则将列表框2最后一次选定的项目添加到列表框1中的语句是 List1.additem List2.text
73.用来清除列表框List1中的全部内容的语句是List1.Clear
74.当组合框的 style 属性被设置为不同的值时，组合框可
以有3中不同的类型，分别为下拉式组合框，简单组合框和下拉式列表框
75.要获得用户在组合框输入的内容，应利用 text 属性
76.当组合框的style属性被设置为0时，表示下拉，可输入文本；1时，表示不下拉，不可以输入文本；2时，表示能下拉选择项目但不允许输入文本
77.将文本框text1的内容增加到组合框combo1中，所使用的语句是 Combo1.Additem Text1.Text
78.滚动条的Value属性表示滚动框在滚动条上的当前位置
79.下列说法正确的是（A）
A.文本框的PasswordChar属性可用于口令的输入
B.列表框不允许一次选择多个表项
C.图像框能通过Print方法接收文本
D.命令按钮的Style属性可以给命令按钮指定一个图形
80.窗体的Name属性只能通过属性窗口设置
81.在使用print方法进行输出操作时，如果省略对象名称，则把信息输出到 当前窗体
82.Move方法可以可以改变窗体或控件的位置及其大小
83.将标签控件的Autosize属性设置为True时，可根据Caption属性指定的标题自动调整标签的大小
84.用来在标签中显示文本的属性为 Caption
85.如果要为标签加上边框，则应将BoederStyle的属性设置为 1
86.当文本框的 Locked 属性设为True时，可以滚动和选择控件中的文本，但不能编辑
87.可以实现单击命令按钮时两个文本框（Text1和Text2）内容的交换的程序是：
Private Sub Command1 Click
text3.text=text1.text
text1.text=text2.text
text2.text=text3.text
End Sub
88.当文本框1的内容发生变化时，要求文本框2的内容同时发生变化，应使用文本框1的 Change 事件
89.当在窗体上建立了多个文本框后，可以用 Setfocus 方法将光标置于所需要的文本框
90.下列说法正确的是(A)
A.图片框能通过Print方法接收文本
B.图像框能通过Print方法接收文本
C.图像框可以作为容器使用
D.图片框不能作为容器使用
91.下列说法正确的是（A）
A.图像框比图片框占用的内存小，显示速度快
B.图像框的Autosize属性用来自动调整图像框与图形的大小
C.图片框的Autosize属性用来自动调整图片框与图形的大小
D.图片框比图像框占用的内存小，显示速度快
92.Stretch属性用来自动调整图像框中图形内容的大小
93.形状控件的 Shape 属性用来确定形状的几何特性
94.当一个命令按钮的 Default 属性被设为True时，按回车键和单击该命令按钮的效果相同
95.为了使命令按钮的Picture属性生效，还必须设置命令按钮的 Style 属性
96.单击命令按钮时，触发的是命令按钮的Click事件
97.将窗体上使用Print输出的内容清除应使用 cls命令
98.将窗体的Left属性设为200，Top属性设为1000，下面哪个命令会运行时窗体位置会移动 A
A."Move 1
000,200,5000,5000"
B."Move 200,1000,5000,5000"
C."Move form1.Left,form1.Top,5000,5000"
D."Form1.Move Left,Top,5000,5000"
99.当使用Print方法打印到窗体的内容，在窗体被其它窗体遮盖后，重新获得焦点时，打印的内容还能显示出来，应设置AutoRedraw属性为真
100.窗体上要显示一个图片，使用 Picture 属性
101.Load事件会在窗体显示前被触发
102.当文本框设置ScrollBars的值为2时，运行时希望文本框出现垂直滚动条，还需要设置 Multiline 属性为真
103.当文本框设置了PasswordChar的值为5时，运行时文本框中输入1234，显示为 5555
104.希望文本框在运行输入字符时，不显示输入内容，而显示#，要用到 PasswordChar 属性
105.当设置了文本框的Height属性时，文本框中输入的内容的字号 不随Height属性值变化
106.文本框的TabIndex属性值是：运行时，tab键按下时文本框获得焦点的顺序
107.单击按钮后，焦点自动设置在文本框上，应书写为： Text1.SetFocus
108.焦点离开文本框时，如果文本框上的数值小于60，则文本框的内容变粗体，应使用下面的程序：
Private Sub Text1 LosFocus
If Val(Text1.Text)<60 Then
Text1.FontBold=True
End Sub
109.文本框中输入数据时，键盘每按下一次都会触发 Change事件
110.文本框中输入的内容不允许超过8个字符，应该使用 MaxLength属性
111.当窗体上有一个文本框，在运行时，不能接收到焦点，原因可能是 文本框的Enabled属性值为假
112.下面关于图片框 叙述正确的是（A）
A.图片框控件中的图片可以在程序运行时使用命令指定另外的图片
B.图片框中的图片只能是位图
C.经过图片框控件的相关属性设置后，图片框的图片大小可以随着图片框的大小变化而变化
D.图片框中的图片可以使用下面的命令设置：Picture1.Picture="D:\al.bmp"
113.下面叙述哪个正确（A） A.经过图像框控件的拉伸属性设置后，图像框中的图形的大小可以随着图像框的大小变化而变化 B.图像框中的图片只能是位图 C.图片框比图像框占用的内存小 D.图像框中除了放置图片外还可以放置其它控件
114.下面叙述哪个正确（A）
A.图片框可以获得焦点
B.图像框可以获得焦点
C.图像框中可以作为容器使用
D.形状控件可以作为容器使用
115.Stretch属性可以使图像框中的图片随着图像框的大小
变化而变化
116.Autosize属性使图片框的大小自动适应图片的大小
117.图片框控件，框架，窗体都是容器
118.形状控件不能设置成 三角形，五角星形状
119.下面叙述正确的是（A）
A.形状控件的形状没有五角星形状
B.形状控件的边界线必须是实线
C.形状控件的边界线宽度不能改变
D.形状控件不能设置形状内部的颜色
120.当焦点不在按钮上时，按钮的Default属性设置为真时，运行时键入回车键，触发按钮的单击事件
121.按钮控件的Cancel属性设为真时，运行时键入Esc键，触发按钮的单击事件
122.当按钮的BackColor属性值为红色时，运行开始后，按钮标准按钮的灰色，原因是 Style属性值为0
123.若希望按钮上显示一个图片，需要按钮的 Picture和Style属性
124.如果按下按钮和不按按钮上显示不同的图片，需要设置按钮的 DownPicture,Picture,Style属性
125.按钮没有 DblClick事件
126.命令Command1.Value=True,Command1 Click,Call Command Click可以运行按钮的单击事件
127.按钮有SetFocus,Move,LostFocus,GotFocus方法
128.当标准的复选框的value属性值为1时，运行开始后，复选框中显示的是 有一个黑色对勾
129.当复选框的picture属性值为1个图片时，运行开始后，复选框不显示图片，原因是 style属性值为0
130.当图形样式的复选框的value属性值为1时，运行开始后，复选框中显示的是 一个象按钮被按下的控件
131.一般在窗体上输入英语四级是否通过，婚否等类型的数据时，使用复选框接收
132.单选钮的value属性设置true为时，下面哪句正确（A）
A.同一容器内所有其他单选钮的value属性为false
B.同一容器内所有其他单选钮的value属性不变
C.窗体上所有其他单选钮的value属性为false
D.窗体上所有其他单选钮的VALUE属性不变
133.在程序编制阶段，设置容器内的一个单选钮的value属性为true，同一容器内的value属性为真的单选钮value属性变为false
134.一般在窗体上输入性别，上网方式（电话线，宽带，局域网）等类数据时，使用单选钮接收
135.图形样式的单选钮的value属性值和标准样式的单选钮的value属性值在一个容器中才互相影响
136.下面的程序要求双击列表框后，双击的项目显示在文本框中：
private sud list1 dblclick
text1.text=list1,text
end sub
137.当MultiSelect设置为0，Style设置为1时，多选列表框中显示复选框样式
138.多选列表框运行时，其text属性值是 刚单击过的项目显示的内容
139.对于列表框，list属性在运行开始后不是只读的
140.输入数据时，单选列表框和单选钮可以接收同一类型的数据
141.下面程序是单击按钮将复选列表框选中的项目去掉
private sub command1 click
for i=list1.listcount -1 to 0 step -1
if list1.selected(i) then list1.removeitem i
next1
end sub
142.单击按钮将复选列表框的所有项目去掉的程序
private sub command1 click
list1.clear
end sub
143.当组合框的style属性值为1时，组合框的下拉列表不能收起
144.当组合框的style属性值为2时，组合框不能输入数据，只能通过选择下拉列表中的项目
145.运行时style属性值为0时，组合框的text属性值不是只读的
146.在程序设计时设置组合框中的所有项目的显示内容，应设置list属性
147.当组合框的style属性值为0时，组合框能识别click,change,keypress等事件，但不能识别dblclick事件
148.单击按钮将复选框选中的项目增加到组合框中的程序
private sub command1 click
for i=0 to listcount -1
if list1.selected(i) then combo1.additem list1.list(i)
next i
end sub
149.单击按钮将复选列表框选中的项目移动到组合框中的程序
private sub command1 click
for i=list1.listcount -1 to 0 step
if list1.selected(i) then
combo1.additem list1.list(i) list1.removeitem i
end if
next i
end sub
150. 双击列表框，将双击的项目移动到组合框中的程序
private sub list1 click
combo1.additem list1.text list1.removeitem
end sub
151.当组合框的style属性为0时，dblclick事件不能被触发
152.change事件是组合框有而列表框没有
153.单击组合框的某一项目时，此项目被清除的程序
private sub combo1 click
combo1.removeitem
combo1.listindex
end sub
154.要将文本框的内容作为组合框的一个项目增加到组合框中，用到语句 combo1.additem text1.text
155.标签框中显示百分比，滚动条的max值为100，min的值为0，当滚动条值变化时，标签框的显示内容随着变化的程序
private sub hscroll1 change()
label1.caption=str(hscroll1.value)+"%"
end sub
156.当滚动条的值发生变化时一定会触发change事件
157.关于滚动条叙述正确的是（A）
A.滚动条可以设置滚动条的value属性的最大值
B.水平滚动条和垂直滚动条是同种控件，可以放在一个控件数组中
C.滚动条可以设置min属性值为字符串
D.滚动条滚动时的值的增量为1，且不能改变增量
158.一般滚动条用来接收分数类的数据
159.计时器的timer事件中的程序没有运行，可能是：
interval属性值为0；enabled属性值为false;interval属性值为0且enabled属性值为false
160.如果希望标签框显示时间，在计时器的timer事件中写入命令label1.caption=time，另外还必须设interval属性值为1000且enabled属性值 为true
161.下面对计时器控件的叙述正确的是（A）
A.计时器控件可以在一定时间间隔内自动执行计时器timer事件过程中的
程序
B.计时器在运行时是可见的
C.计时器在运行时是显示为一个随时间变化而变化的数字时间
D.使用计时器控件，只需编制timer事件中的程序即可
162.下面程序运行后标签框内容不改变，原因是：变量a不是模块级变量，应该在通用部分声明变量a
private sub form load
timer1.interval=1000
timer1.enabled=true
end sub
private sub timer1 timer
a=a+1
label1.caption="已经过去"+str(a)+"秒"
end sub
163.下面程序运行后标签框内容不改变，原因是：计时器的interval属性值为0
private sub form load
timer1.enabled=true
end sub
private sub timer1 timer
a=a+1
label1.caption="已经过去"+str(a)+"秒"
end sub
164.下面哪个不是控件数组的事件(A)
A.private sub text1 keypress(keyascii as integer)
B.private sub command1 keypress(index as integer,keyascii as integer)
C.private sub option1 click(index as integer)
D.private sub check1 keypress(index as integer,keyascii as integer)
165.有4个单选按钮设置为控件数组，name属性为option1,当单击其中一个单选钮时，标签的caption属性指赋值单选钮的caption属性值的程序
private sub option1 click(index as integer)
label1.caption=option1(index).caption
end sub
166.有2个控件数组，每个控件数组有3个标签框，name属性为label1和label2，当单击按钮时，控件数组中所有标签控件的caption属性值赋值为一个100以内的随机整数按钮的单击事件的程序为：
private sub command1 click()
for i=1 to 2
label1(i).caption=int(rnd*100)
label2(i).caption=int(rnd*100)
next i
end sub
167.如果一控件数组中的控件都是按钮，所有控件数组中的控件的单击事件都是同一事件过程
168.控件数组中的事件过程至少有一个形式参数，且参数的变量为index
169.新建一个窗体后（名为form1），立即在该窗体上双击，编写的事件过程是 form load
170.在程序运行时，窗体form1中单击，发生的事件是 form click
171.下列关于控件数组与一般控件的区别的叙述正确的是（A）
A.控件数组一定由多个同一类型的控件组成，一般控件只有一个控件
B.控件数组的index属性为0，而一般控件的index为空
C.控件数组的index属性为1，而一般控件的index为0
D.控件数组的建立通过dim语句声明，而一般控件不必声明
172.在窗体上单击鼠标键，可能触发click,mousedown,mouseup事件，不可能触发dblclick事件
173.计时器timer1，将interval属性设置为1000，有如下程序：
private sub timer1 timer
static s as integer
s=s+1
print s
end sub
程序运行到2.5秒时，在窗体上输出的信息是 1 2
174.在多窗体程序中，为了将窗体隐藏而
不从内存中卸载，使用的方法是： hide
175.下列方法不能让form1从视觉上消失的代码是（A）
A.form1.enabled=false
B.form1.visible=false
C.form1.hide
D.unload form1
176.在程序中用语句unload卸载窗体时，将触发的事件是 unload
177.窗体有initialize,load,lostfocus,unload事件，最先触发的事件是unload事件
178.假定picture1和text1分别为图片框和文本框的名称，下列不正确的是（A）
A.text1.Print 25
B.Print 25
C.picture1.Print 25
D.Debug.Print 25
179.如果标签的alignment的属性设置为1，则作用为 标题靠右显示
180.borderstyle属性用来设置标签边框
181.文本框中用来设置口令显示字符的属性是 passwordchar
182.下面关于图片框与图像框的说法不正确的是（A）
A.在图像框里可以包含其他控件，但在图片框中则不可以
B.图像框比图片框占用的内存小，显示速度快
C.图片框可以通过print方法接收文本，并可以接收由像素组成的图形
D.在图片框里可以包含其他控件，而在图像框里则不能
183.语句command1.visible=false的作用是：使命令按钮消失
184.语句command1.enabled=false的作用是：使命令按钮失去作用
185.语句command1.enabled=true的作用是：使命令按钮生效
186.语句command1.visible=true的作用是：使命令按钮重新出现
187.语句list1.list(3)="北京"的作用是：把列表框list1的从1数起的第四个内容设置为"北京"
188.使用框架的主要目的是：对控件进行分组
189.当对象得到焦点时，会产生的事件是 gotfocus
190.在窗体装入工作区时激发的事件是 load
191.若要使命令按钮不可操作，要对其设置的属性是 enabled
192.文本框不具备caption属性
1.不论哪种控件，共同具有的属性是 Name
2.要使某控件在运行时不可显示，应对其设置的属性是 Visible
3.要是窗体在运行时不可改变窗体的大小和没有最大化、最小化按钮，需设置的属性是 Borderstyle
4.当程序运行时，系统自动执行启动窗体的事件过程是 Load
5.要判断在文本框中是否按下了Enter键，应在文本框的 Keypress 事件中判断
6.要使标签控件显示时不覆盖其背景内容，要对其设置的属性是 Backstyle
7.复选框的Value属性为0时，表示 复选框未被选中
8.将数据项“语文”添加到列表框（list1）中成为第一项应使用的语句是 “List1.Addltem”“语文”，“0”
9.执行下面的程序,列表框中的数据项有 “1，3”
Sub Form_Click()
For i = 0 To 4
List1.AddItem i
Next
For i = 0 To 2
List1.RemoveItem i
Next
End Sub
10.如果列表框（list1）中没有被选定的项目，则执行List1.RemoveItem List1.ListIndex语句的结果是 D
A．移去第一项
B．移去最后一项
C．移去最后加入列表的
项
D．其他都不对
11.下列可以把当前目录下的图形文件Pic1.jpg装入图片框Picture1中的语句为 “Picture1. Picture=Load Picture(“”Pic1.jpg””)”
12.假定在图片框Picture1中装入了一个图形，为了清除该图形（不是删除图片框）应采用的正确方法是
“ 执行语句Picture1. Picture =Load Picture(“””’”)”
13.当组合框的Style属性值设置为2时，其为 下拉式列表框
14.要使定时器无效应将Interval属性取值为 0
15.假定定时器控件的Interval属性为1000，Enable属性为Ture，并且有下面的事件过程
Private Sub Timer1_Timer()
Beep
End Sub
计算机将发出Beep声的次数为
A.1000次
B．0次
C．1次
D．其他都不对
16.下面语句能正确地把列表框list1从1数起的第4项的内容设置为“aaaa”的是 “List1.List(3)=””aaaa”””
17. 下面语句能正确地把列表框list1从1数起的第3项的内容设置为“aaaa”的是 “List1.List(2)=””aaaa”””
18.在窗体上画一个文本框，为了在程序运行后隐藏该文本框，应使用的语句为 Text1.Visible=False
19.在窗体上画一个文本框Text1和一个标签Label1，要求程序运行后，如果在文本框输入字符，则立即在标签中显示相同的内容，一下可以实现上述操作的事件过程的是
“Private Sub Text1_Change()
Lebel1.Caption = Text1.Text
End Sub”
20.在设置阶段，如果把窗体的MaxButton属性和MinButton属性设置为False，则 最大、最小化按钮均消失
21. 下列程序
Private Sub Text1_Change()
Print Text1;
End Sub
在文本框输入“abcd”这4个字符时，print方法在窗体上显示的是 aababcabcd
22.要设置命令按钮的背景图形，必须设置的两个属性是 Style 和Picture
23.要清除列表框的所有内容，可用来实现的方法是 Clear
24.要获得用户在组合框输入的内容，应利用的属性是 Text
25.下列控件中，没有Caption属性的是 列表框（文本框）
26.引用列表框List1最后一个数据项应使用的语句是 List1.List（List1.ListCount-1）
27.执行下面的程序：
Private Sub Form_Click()
For I = 1 To 6
List1.AddItem I
Next
For I = 1 To 3
List1.RemoveItem I
Next
End Sub
列表框中的数据项是 “1，3，5”
28.下列说法正确的是 框架也有Click和DblClick事件
29.下列叙述错误的是 KeyPress事件可以识别键盘上某个键的按下与释放
30.编写如下两个事件过程
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在不按Shift键，并锁定大写的情况下运行程序，如按“A”键，则程序输出的是 “A A”
31.以下程序功能是：用鼠标右键单击窗体，将画一个直径为300的圆。
Private Sub Form_MouseDown(Button As Integer, Shift As
Integer, X As Single, Y As Single)
If ( ) Then
Circle (X, Y), 300
End If
End Sub
括号中应该填 Button=2
32.有如下事件过程：
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 And Shift = 2 Then
Print ""山西大学 ""
End If
End Sub
程序运行后，为了在窗体上输出“山西大学”，应该进行的操作是 同时按下Ctrl键和鼠标右键
33.编写如下过程：
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode + 2)
End Sub
程序运行后，如果单击键盘“A”键，则窗体上输出为 “AC”
34. 在鼠标事件MouseDown、MouseUp、MouseUp中，代表鼠标的按键状态的参数是 Button
35.在窗体上松开鼠标键时触发的事件是 MouseUp
36.下列叙述正确的是 窗体的Name属性指定窗体的名称，用来识别一个窗体
37.要把窗体中的文字加粗显示，可设置窗体的 FontBold 属性
38.当窗体被覆盖后又显示时，要要想自动刷新窗体上的图形，应设置窗体上的 AutoRedraw属性
39.要改变窗体最小化时的图标，应设置窗体的 Icon属性
40. 要想运行后窗体自动充满整个屏幕或自动缩小为一个图标，应设置窗体的 WindowState属性
41. 要想使窗体中的文字以斜体字显示，应设置窗体的 FontItalic
42.下面数组声明语句，正确的是 “Dim c(8,12) As Integer”
43.数组a中的所有元素已经赋值了数据，将数组a中的所有数据打印出来，下面的那段程序能完成此功能？
“For l=Lbound(a) to Ubound(a)
Print a(l)
Next l”
44. 数组a中的所有元素已经赋值了数据，将数组a中的所有数据打印出来，下面的那段程序能完成此功能？
For l=1 to 20
Print a(l)
Next l”
45. 数组a中的所有元素已经赋值了数据，将数组a中的所有数据打印出来，下面的那段程序能完成此功能？
For l= Lbound(a) to 20
Print a(l)；)
Next l”
46. 数组a中的所有元素已经赋值了数据，将数组a中的所有数据打印出来，下面的那段程序能完成此功能？
“For l=1 to Ubound(a)
Print a(l)；
Next l”
47. 数组a中的所有元素已经赋值了数据，将数组a中的所有数据打印出来，下面的那段程序能完成此功能？
“For l=Lbound(a) to 20
Print a(l)，
Next l”
48. 数组a中的所有元素已经赋值了数据，将数组a中的所有数据打印出来，下面的那段程序能完成此功能？
“For l=1 to Ubound(a)
Print a(l)，
Next l”
49. 数组a中的所有元素已经赋值了数据，将数组a中的所有数据打印出来，下面的那段程序能完成此功能？
For l=1 to 20
Print a(l)，
Next l”
50.关于redim的下列说法中，正确的是： 一般与整形变量结合使用（如：redim（n））
51.关于redim的下列说法中，正确的是： 可以改变动态数组的维数
52.关于redim的下列说法中，正确的是： 可以改变动态数组的上、下界
53.要储存n个单精度数，下列语句正确的是
“dim a() as single
n=inputbox(““inputn””)
redim a(1 to n)
54.已知有数组声明：Dim a(-1 to 3,2 to 5)as integer,引用数组元素，正确的是 “a（-1，5）”
“a（-1，2）” “a（0，2）”
55. 已知有数组声明：Dim a(-2 to 3,-2 to 5)as integer,引用数组元素，正确的是“a（-2，-2）”
“a（0，2）” “a（0，0）” “a（-1，-1）”
56.在模块中dim定义的变量，其作用域的正确描述是 在定义它的模块中的所有程序中都有效
57. 在模块中public定义的变量，其作用域的正确描述是 在所有模块中都有效
58. 关于dim语句的正确说法是 在任何模块中的任何地方都有用
59. 关于private语句的正确说法是 在任何模块中的任何地方都有用
60. 关于public语句的正确说法是 只能在窗体模块和标准模块中的通用声明中使用
61.再次定义动态数组使用哪个定义关键字？ Redim
62.定义的变量哪个是动态数组？Private Dim A1(),A2(3),A3(3,4),A4 A1
63. 下面过程中定义了的数组，哪个是动态数组？
Private Sub Command1_Click()
Dim al(3), bl()
ReDim a2(4), b2(3)
End Sub
a2,b1,b2都是
64. 下面过程中定义了的数组，哪个不是动态数组？
Private Sub Command1_Click()
Dim al(2，3), bl()
ReDim a2(4), b2(3)
End Sub
a1
65.如下数组声明语句Dim a(3,-2 To 2,5),则该数组a包含的元素的个数为 120 4*5*6
66.若默认数组下界为1，并有数组声明语句Dim a(3,-1 To 16),则该数组a包含的元素的个数为 54 3*18
67.下面的程序段
Dim aa(1 To 10)
For Each X In aa
Print X
Next X
重复的次数是 10
68. 下面的语句
Dim a(1 To 100, 0 To 50, -3 To 4)
Print LBound(a, 20), UBound(a, 2)
执行后的输出结果是 0 50
69.要分配如下方阵的数据：
1.1 2.2 3.3
4.4 5.5 6.6
7.7 8.8 9.9
数组声明语句能实现（不能浪费空间）的是 Dim a(-1 to 1,-5 to -3) As Single
70.与语句static elec（1 to 50）等价的语句是 Static Elec（1 to 50）
71. redim只能出现在事件过程或通用过程中，用它定义的数组是一个（动态数组）
72.根据内存区开辟时机的不同，可以把数组分为（静态和动态）
73.下面程序段
option base 1
private
dim tt
tt=array(one,two,three,four)
print tt(4)
输出是（four）
74.程序
dim arrl(10)as integer,arr2(10)as integer
n=3
for i=1to5
arr1(i)=i
arr2(i)=2*n+i
next i
print arr2(n),arr1(n)
输出结果为（11，3
）
75声明语句dim中不能有未知数
76.dim x(5)这一形式是数组说明符，temp =x(5)是数组元素
77数组声明语句形式为（dim y（10，10）as integer）
78.数组元素形式为（s(8)）
79.静态数组定义后，不可以再次定义
80.用下面的语句可以建立一个对话框（commondialog1.action=2或commondialog1.showsave）
81.通用对话框控件的action属性设置为1，含义是（打开文件）
82.通用对话框控件的action属性设置为2，含义是（文件另存为）
83.通用对话框控件的action属性设置为3，含义是（颜色）
84.通用对话框控件的action属性设置为4，含义是（字体）
85.通用对话框控件的action属性设置为5，含义是（打印）
86.在窗体上画一个通用对话框，程序运行后，通过openshow方法打开，要求在该对话框的文件类型栏87显示扩展名为doc的文件，则对通用对话框的filter属性的正确设置为（" " "(*.doc)/*.doc" " "）
88.显示字体对话框前必须设置（flags）属性
89.通用对话框控件的showsave方法执行后，操作是打开（文件另存为）对话框
90.通用对话框控件的showcolor方法执行后，操作是打开（颜色）对话框
91.通用对话框控件的showfont方法执行后，操作是打开（字体）对话框
92.通用对话框控件的showprint方法执行后，操作是打开（打印）对话框
93.通用对话框控件的showopen方法执行后，操作是打开（打开文件）对话框
94.年龄变量为整型可使用表达式为（）
select case nl
case （16或 30to40或 "31,35")
end select
95.下列程序在运行后，x为（30）
x=0
for i=1to10
select case i
case2,4,6,8,10
x=x+1
end select
next i
96.当设计程序时按钮的属性值为1，运行时单击按钮，当奇数次单击，按钮的属性值为2.否则为1，下面应是哪条命令
if command2.caption="1"then command2.caption=“2”else command2.caption="1"
97.当设计程序时按钮的属性值为1，运行时单击按钮，按钮上显示“笑”，再次单击，按钮上显示“哭”，再次单击，按钮上显示“笑”，如此往复。下面程序正确是（）
if command1.caption="笑"then command1.caption="哭" else command1.caption="笑"
98.单击按钮，当按钮上显示“开始考试”，将计时器的属性为真，程序为（）
if command1.caption="开始考试"，then timer1.enabled=true
99. 单击按钮，当按钮上显示“开始考试”，将按钮的显示改为“考试结束”，程序为（）
if command1.caption="开始考试"“then commend1.caption=”“ 考试结束”””
100.当每单击标签框一次，标签框的背景颜色就变化一次，但如果新的背景色和前景色是一个颜色，则不改变背景色，下面那段命令是正确的
Private Sub Command1_Click()
mcolor = Int(Rnd * 50000)
If mcolor <> Label.ForeColor Then Label.BackColor = mcolor
End Sub
101.如果成绩>=80分标签框显示“优秀”，成绩>=60并且<80显示“及格”，成绩>0且<60显示“不及格”，下列哪段程序是正确的？
if cj >=80 Then label1.caption=""优秀""
Elself cj >= 60 Then label1.caption=""及格""
Elself cj >0 Then label1.caption=""不及格""
End If
102.计算1到10的积，下面划线处应该使用哪组命令？ “（1）s=1 (2)s=s*j”
103.下面的程序功能是什么？
S=0
While s <100
Print int(rnd*20)
S=s+2
Wend 打印50个20以内的随机整数
104. 下面的程序功能是什么？
S=1
While s >100
Print int(rnd*20)
S=s+3
Wend 什么也没做
105.如果备注（bz）是“退学“，成绩(cj)=-1; 如果备注（bz）是“缺考“，成绩(cj)=0; 如果备注（bz）是“缓考“，成绩(cj)=-2。下面那段程序正确？
If bz =””退学”” Then cj=-1
If bz =””缺考”” Then cj=0
If bz =””缓考”” Then cj=-2
106. 如果成绩>=80分标签框显示“优秀”，成绩>=60并且<80显示“及格”，成绩>0且<60显示“不及格”，成绩>100且<60标签框显示数据错误，下列哪段程序是正确的？
if cj >100 and <0 Then label1.caption=""数据错误""
Else label1.caption= l If( cj >=80 ,""优秀"",l lf( cj >= 60 ,""及格"",l lf cj >0 ,""不及格""))
End If
107.下面程序执行后，会输出那个结果？
nl = 8
Select Case nl
Case 8
Print 1;
Case Is <= 8
Print 3
Case 8, 10, 15
Print 4
End Select 1
108.下面程序在运行时不出现消息框，文本框中的内容是选择项目的那个值？
1.程序运行后，文本框中显示的信息是：
S=0:a=0
Do
a=a+2:s=s+a
If s>10 Then Exit Do
Loop Until a>40
Text1.Text=Str(a+s) 18
2.程序运行后，单击窗体，则在窗体上显示的“*”的个数是 20
Private Sub Form_Click()
For i = 1 To 9
For j = i - 1 To Step - 2
Print "" * ""
Next j
Next i
End Sub
3.程序运行后，两次单击命令按钮后，在窗体上显示的结果是： 14
Private Sub Command1_Click()
Static s As Integer
For i = 5 To 1 Step -0.3
s = s + 1
Next i
Print s
End Sub
4.程序运行后，单击命令按钮，在文本框显示的信息是： 15
Dim s As Integer
Dim Flag As Boolean
Flag = True
s = 1
While s < 100 And Flag
s = s + 7
If s Mod 5 = 0 Then Flag = False
Wend
text1.Text = Str(s)
5.程序运行后，单击窗体，则在窗体上显示的信息是： 5
Private Sub Form_Click()
s = 0
For i = 1 To 100
If i Mod 8 = 5 Then
Exit For
End If
i = i + 1
Next i
Print i
End Sub
6.程序运行后，则在窗体上显示的信息是： 1 2 3
For i = 1 To 3
For j = 1 To 3
arr1(i, j) = i
arr2(j, i) = arr1(i, j)
Next j
Next i
For i = 1 To 3
Print arr2(2, i)
Next i