B.a>5Andb<0
C.a>5Orb<0
D.a>0Andb<5
27.在VB语言中，下列合法的变量名是
A.22aa
B.VB
C.a+b
D.a&2
28.函数Abs（-10）返回的值是
A.3
B.4
C.9
D.10
29.以下程序段执行后，整型变量a的值为
a=4
b=5
b=b+a
a=a+b
A.5
B.8
C.13
D.18
30.如图所示的流程图为计算圆周长的算法。
根据算法，流程图中①处的内容是
A.C=3.14*R
B.C=2*3.14*R
C.C=3.14*R*R
D.输出R
31.在VB语言中，下列合法的变量名是
A.aa
B.a*b
C.7ab
D.dim
32.在VB语言中，下列正确的赋值语句是
A.a+4=c
B.a=2+c
C.a+4=b-5
D.a/2=c*3
33.以下程序段执行后，整型变量a的值为
a=5
b=8
b=b-a
a=a-b
A.2
B.3
C.5
D.8
34.代数式
对应的VB表达式是
A.a+b/cd
B.（a+b）/c*d
C.a+b/（c*d）
D.（a+b）/（c*d）
35.下列逻辑表达式的值为“假”的是
A.3+5>10
B.4+12<>15
C.4/2=2
D.5<2*3
36.若a=8，b=5，则运行Printa;"-";b;"=";a-b的结果是
A.a-b=3
B.a-b=a-b
C.3
D.8-5=3
37.下列属于整型常量的是
A.一千零一夜
B."1997"
C.1997
D.ABC
38.函数Abs（-4）返回的值是
A.1
B.2
C.4
D.-4
39.以下程序段执行后，整型变量s的值为
s=1
Fori=1To3
s=s*i
Nexti
A.0
B.1
C.3
D.6
40.如图所示的流程图是求从1累加到10的算法，根据算法，流程图中①处的内容是
A.I=I+1
B.I=10
C.从1到10
D.I=1
41.以下程序段执行后，整型变量s的值为
s=0
Fori=1To5
s=s+1
Nexti
A.0
B.1
C.5
D.15
42.下列逻辑表达式的值为“假”的是
A.3+5>7
B.8/4<4
C.5>3And3>2
D.4+11>20
43.函数Abs（5）返回的值是
A.1
B.-5
C.25
D.5
44.以下程序段执行后，整型变量a的值为
a=2
b=3
b=b+a
a=a*b
A.10
B.5
C.6
D.3
45.在VB语言中，下列正确的赋值语句是
A.5=c
B.3a=5c
C.-c=c-3
D.a=b+c
46.下列属于整型常量的是
A.59999
B.4.5
C.123
D."45"
47.在VB语言中，下列合法的变量名是
A.5566
B.a-c
C.ab&34
D.x1
48.如图所示的流程图是求从1累加到10的算法，根据算法，流程图中①处的内容是
A.S=S+I
B.S=10
C.从1到10
D.S≤10
49.代数式
对应的VB表达式是
A.a-b/c/2
B.（a-b）/（c/2）
C.a-b/（c/2）
D.（a-b）/c/2
50.若a=4，b=5，则运行Printa;"+";b;"=";a+b的结果是
A.4+5=9
B.a+b=9
C.a+b=a+b
D.9
第二部分程序题部分（五套，每套3小题）
=============================模块================================
第1题：
新建一个VB工程，工程文件名称为：
“工程1.vbp”，并添加一个窗体文件：
“Form1.frm”，保存在“考生文件夹VB\221\”文件夹下。
按下表的要求添加控件，并设置其属性，操作后保存！
对象
对象名
属性名
属性值
Label
Label1
Caption
长
Label
Label2
Caption
宽
TextBox
Text1
Text
3厘米
TextBox
Text2
Text
4厘米
CommandButton
Command1
Caption
求长方形周长
第2题：
打开"考生目录VB\143\"文件夹中的文件：
"d1.vbp"进行以下操作后并保存！
在VB代码窗口指定位置修改完善程序代码实现，求1到50之间所有的奇数和。
第3题：
打开"考生目录VB\150\"文件夹中的文件：
"k3.vbp"进行以下操作后并保存！
在窗体"k3.frm"的"Command1_Click"事件中编写代码（请不要随便更改其它代码），使之能够实现如下功能：
从text1文本框中输入一个数，判断能否被3整除，并在text2文本框中输出结果"能"或"不能"。
测试数据
在text1文本框中输入9，在text2文本框中输出：
能；
在text1文本框中输入8，在text2文本框中输出：
不能。
第4题：
新建一个VB工程，工程文件名称为：
“工程1.vbp”，并添加一个窗体文件：
“Form1.frm”，保存在“考生文件夹VB\148\”文件夹下。
按下表的要求添加控件，并设置其属性，操作后保存！
对象
对象名
属性名
属性值
Label
Label1
Caption
电视机
Label
Label2
Caption
洗衣机
TextBox
Text1
Text
12件
TextBox
Text2
Text
13件
CommandButton
Command1
Caption
总数
第5题：
新建一个VB工程，工程文件名称为：
“工程1.vbp”，并添加一个窗体文件：
“Form1.frm”，保存在“考生文件夹VB\151\”文件夹下。
按下表的要求添加控件，并设置其属性，操作后保存！
对象
对象名
属性名
属性值
Label
Label1
Caption
选修1
Label
Label2
Caption
选修2
TextBox
Text1
Text
45
TextBox
Text2
Text
38
CommandButton
Command1
Caption
计算总人数
第6题：
新建一个VB工程，工程文件名称为：
“工程1.vbp”，并添加一个窗体文件：
“Form1.frm”，保存在“考生文件夹VB\153\”文件夹下。
按下表的要求添加控件并置其属性，操作后保存！
对象
对象名
属性名
属性值
Label
Label1
Caption
用户名
Label
Label2
Caption
密码
TextBox
Text1
Text
李辉
TextBox
Text2
Text
******
CommandButton
Command1
Caption
登录
第7题：
打开"考生目录VB\154\"文件夹中的文件：
"k4.vbp"进行以下操作后并保存！
在窗体"k4.frm"的"Command1_Click"事件中编写代码（请不要随便更改其它代码），使之能够实现如下功能：
从text1文本框中输入一个数,判断这个数是否为零或正负整数，并在text2文本框中输出结果。
测试数据
在text1文本框中输入0，在text2输出:
0。
在text1文本框中输入2，在text2输出:
正数。
在text1文本框中输入-2，在text2输出:
负数。
第8题：
新建一个VB工程，工程文件名称为：
“工程1.vbp”，并添加一个窗体文件：
“Form1.frm”，保存在“考生文件夹VB\158\”文件夹下。
按下表的要求添加控件，并设置其属性，操作后保存！
（注：
Text1的属性值为半角字符）
对象
对象名
属性名
属性值
Form
Form1
Caption
计时
Label
Label1
Caption
倒计时
Label
Label1
Width
1000
TextBox
Text1
Text
5:
00
CommandButton
Command1
Caption
开始计时
第9题：
打开"考生目录VB\222\"文件夹中的文件：
"d3.vbp"进行以下操作后并保存！
在VB代码窗口指定位置修改完善程序代码实现，求1*3*5*7*9的积。
第10题：
打开"考生目录VB\152\"文件夹中的文件：
"d4.vbp"进行以下操作后并保存！
在VB代码窗口指定位置修改完善程序代码实现，1到100之间能被6整除的个数。
第11题：
打开"考生目录VB\157\"文件夹中的文件：
"k5.vbp"进行以下操作后并保存！
在窗体"k5.frm"的"Command1_Click"事件中编写代码（请不要随便更改其它代码），使之能够实现如下功能：
分别从text1、text2文本框中输入一个正整数a和b，判断a能否被b整除，若能，则在text3文本框中输出"能"，否则则输出：
"不能"。
测试数据
在text1文本框中输入20，text2文本框中输入5，则text3文本框中输出：
能。
在text1文本框中输入20，text2文本框中输入3，则text3文本框中输出：
不能。
第12题：
打开"考生目录VB\146\"文件夹中的文件：
"d2.vbp"进行以下操作后并保存！
在VB代码窗口指定位置修改完善程序代码实现，求1到100之间能被5整除的个数。
第13题：
打开"考生目录VB\147\"文件夹中的文件：
"k2.vbp"进行以下操作后并保存！
在窗体"Form1.frm"的"Command1_Click"事件中编写代码（请不要随便更改其它代码），使之能够实现如下功能：
分别在text1和text2文本框中输入a和b两个数，比较a和b的大小，并在text3文本框中输出较小的数。
测试数据
在text1文本框中输入3，在text2文本框中输入2，输出2；
在text1文本框中输入4，在text2文本框中输入7，输出4。
第14题：
打开"考生目录VB\144\"文件夹中的文件：
"k1.vbp"进行以下操作后并保存！
在窗体"Form1.frm"的"Command1_Click"事件中编写代码（请不要随便更改其它代码），使之能够实现如下功能：
分别在text1和text2文本框中输入a和b两个数，比较a和b的大小，并在text3文本框中输出较大的数。
测试数据
在text1文本框中输入3，在text2文本框中输入2，text3文本框输出3；
在text1文本框中输入4，在text2文本框中输入5，text3文本框输出5。
第15题：
打开"考生目录VB\156\"文件夹中的文件：
"d5.vbp"进行以下操作后并保存！
在VB代码窗口指定位置修改完善程序代码实现，求1×2×3×4×5×……×10的值。
升级会员 