VB对口高考模拟试题1.doc
《VB对口高考模拟试题1.doc》由会员分享，可在线阅读，更多相关《VB对口高考模拟试题1.doc（5页珍藏版）》请在冰点文库上搜索。
《VB》对口高考模拟试题1
一、选择题。
（每个1分，共30分）
1、某一VB工程含F1、F2两个窗体，执行“F1．Show:
F2．Hide”语句后，F1、F2窗体显示的结果为（）。
A、都显示B、都不显示C、仅显示F1窗体D、仅显示F2窗体
2、删除列表框中指定的项目所使用的方法为（）
AmoveBremoveCclearDremoveitem
3、Integer类型的变量可存放的最大整数是（）。
A、255B、256C、32768D、32767
4、下列符号不能作为VB中变量名的是（）。
A、abcdB、p1234C、89edfD、xyz
5、将焦点主动设置到指定的控件或窗体上，应采用的方法是（）。
A、SetDate B、SetFocusC、SetText D、GetGate
6、若要求从文本框中输入密码时在文本框中只显示*号，则应用在此文本框的属性窗口中设置（）。
A、Text属性值为* B、Caption属性值为*
C、Password属性值为空 D、Passwordchar属性值为*
7、表达式10+10Mod3*3的值为（）。
A、11 B、2C、13D、6
8、数学式子Sin25°写成VB表达式是（）。
A、Sin25B、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、多窗体程序由多个窗体组体组成，在缺省的情况下，VB在执行应用程序时，总是将（）指定为启动窗口。
A、不包含任何控件的窗口B、包含控件最多的窗口
C、命名为Form1的窗体D、设计时的第一个窗体
11、要退出Do…Loop循环，可使用的语句是（）。
A、ExitB、ExitForC、EndDoD、ExitDo
12、已知一窗体中有如下函数过程和一命令按钮Command1，则单击Command1时，输出结果为（）。
PrivateFunctionSum（a,b,c）
a=a+1:
b=b+1:
c=c+1
Sum=a+b+c
EndFunction
PrivateSubCommand1_Click（）
a=1:
b=2:
c=3
CallSum（a,b,c）
Printa;b;c
EndSub
A、123B、234C、345D、456
13、已知一窗体中有如下函数过程和一命令按钮Command1，则单击Command1时，输出结果为（）。
PrivateFunctionSum（ByVala,ByValb,ByValc）
a=a+1:
b=b+1:
c=c+1
Sum=a+b+c
EndFunction
PrivateSubCommand1_Click（）
a=1:
b=2:
c=3
CallSum（a,b,c）
Printa;b;c
EndSub
A、123B、234C、134D、124
14、以下叙述中错误的是：
（）
A）双击鼠标可以触发DblClick事件
B）窗体或控件事件的名称都可以由编程人员设定
C）移动鼠标时，会触发MouseMove事件
D）控件的名称可以由编程人员设定
15、InputBox函数返回值的类型为（）。
A）数值B）字符串C）变体D）数值或字符串（视输入的数据而定）
16、如果有声明Dima（15）asinteger,则该数组共有（）个元素。
A15B16C13D不确定
17、如果在上题语句前加入optionbase1,则该数组共有（）个元素。
A15B16C13D不确定
18、在窗体上添加一个列表框，然后编写如下两个事件过程：
PrivatesubForm_click（）
List1.removeitem3
List1.removeitem0
List1.removeitem1
Endsub
PrivatesubForm_load（）
List1.additem“上海”
List1.additem“天津”
List1.additem“北京”
List1.additem“深州”
Endsub
运行上面的程序，然后单击窗体，列表框中所显示的内容为（）
A上海B北京C深州D天津
19、下列逻辑表达式中，能正确表示条件“x、y都是奇数”的是（）
Axmod2=1orymod2=1Bxmod2=0orymod2=0
Cxmod2=1andymod2=1Dxmod2=0andymod2=0
20、函数string（5，66）的值为（）
A“BBBBB”B“bbbbb”C“55555”D“AAAAA”
21、表达式Ucase（“Basic”）+Lcase（“Basic”）的值为（）
A“BASICbasic”B“basicBASIC”
C“BASICBASIC”D“basicbasic”
22、一只黑色的台球被打进袋内，则“黑色”、“台球”、和“打”依次是下面的哪一项（）
A对象属性事件B属性对象事件
C对象属性方法D属性对象方法
23、若要取消窗体的最大化功能，则可设置（）属性为false来实现。
AcontrolboxBminbuttonCmaxbuttonDenabled
24、在窗体上有一个文本框控件，名称为TxtTime：
一个计时器控件，名称为Timerl，要求每一秒钟在文本框中显示一次当前的时间。
程序为：
PrivateSubTimer1_（）
TxtTime.text=Time
EndSub
在下划线后面应填入的内容是（）
A）EnabledB）VisibleC）IntervalD）Timer
25、假定窗体上有一个标签，名为Label1，为了使该标签透明，则正确的属性设置为（）
ALabel1.backstyle=0BLabel1.backstyle=1
CLabel1.backstyle=2DLabel1.backstyle=3
26、设a=6，则执行x＝IIf（a>5,-1,0）后，x的值为（）。
A、5B、6C、0D、-1
27、以下有关VB颜色的表示中，（）是错误的。
A、vbRedB、QbColor（4）C、RGB（255,0,0）D、RGB（-255,0,0）
28、以下程序段的输出结果是（）。
A=0
Forj=1TO15
a=a+（jMOD3）
Nextj
Printa
A、0B、15C、90D、120
29、以下是Command1的单击事件，单击Command1后，在当前目录下创建了一个名为a.txt的文件，该文件内容为（）。
PrivateSubCommand1_Click（）
Open"a.txt"ForOutputAs#1
Print#1,"计算机"；"等级考试"
Close#1
EndSub
A、等级考试 B、计算机等级考试C、计算机D、计算机；等级考试
30、已知一窗体中有如下函数过程和一命令按钮Command1，且Command1的Click事件中只有一行命令：
PrintSum（1,2,3），则单击Command1时，输出结果为（）。
PrivateFunctionSum（a,b,c）
Sum=a+b+c
EndFunction
A:
1B:
2C:
3D:
6
二、填空题。
（每个1分，共20分）
1、创建一个VB应用程序的三个主要步骤是、和
。
2、在VisualBasic的转换函数中，将字符串转换为数值的函数是。
3、要想在代码中给名为txtshow的文本框赋予文本：
GOODWORK！
时，应当编写的语句是 。
4、语句Print"VisualBasic";Tab（7）"Hello"表示第二个输出项在第列输出。
5、在VisualBasic语言中有三种形式的循环结构。
其中，若循环的次数可以事先确定，可使用循环；若要求先判断循环进行的条件，可使用循环或循环。
6、表达式93\7Mod2^2的值是。
7、已知a=3,b=4,c=5,表达式a>bandNotc>aOrc>bAndc8、语句PrintNot10>15And8<5+2的输出结果为。
9、表达式Instr（2,"VisualBasic","Basic"）的值为。
10、设某个程序中要用到一个二维数组，要求数组名为A，类型为字符串类型，第一维下标从1到5，第二维下标从2到6，则相应的数组声明语句为。
11、某一事件过程如下：
PrivateSubcmd1 _Click（）
Form1.Caption=”VB示例”
EndSub
则响应该过程的对象名是，事件名是。
12、PictureBox控件可通过设置其属性为True使之可自动调整大小；而Image控件可通过设置其属性为True，使其加载的图片能自动调整大小以适应Image。
13、计时器控件在是可见的，在是不可见的。
它在后台每隔一定时间间隔触发相应事件。
三、判断题。
（每个1分，共10分）
1．可以在窗体的通用部分声明静态变量。
2．使用声明语句建立一个变量后，VisualBasic会自动对数值类型的变量赋初值0，变长的字符串被初始化为一个零长度的字符串“""”，定长字符串用空格填充，Variant变量被初始化为Enpty，布尔型的变量被初始化为False。
3．决定对象是否可见的属性Visible属性，决定对象可用性的属性是Enabled属性。
4．赋值语句的功能是计算表达式值并转换相同类型数据后为变量或控件属性赋值。
5．当图像框Image控件的Stretch属性为True时，Image控件能自动调整自己的尺寸与显示的图片匹配。
6．在标准模块中用Public声明全局变量，使变量在整个应用程序中有效。
7．列表框和文本框一样均没有Caption属性，但都具有Text属性。
8．随机文件以记录为单位读写，二进制文件以字节为单位读写。
9．当使用Call语法时，参数表必须在括号内，Call关键字也可省略。
10．Msgbox函数的返回值为字符串型。
四、程序填空题。
（每个2分，共30分）
1、若命令按钮的名称为Cmdopen，程序要求单击以上命令按钮时，打开一个窗口form1，请对以下事件过程填空。
PrivateSubCmdopen_
EndSub
2、下面程序运行后，第1行输出，第2行输出
Privatesubcommand_click（）
Dimiasinteger,jasinteger,kasinteger
K=0
Fori=0to10step3
Forj=1to10
Ifj>5thenk=k+4：
exitfor
K=k+1
Nextj
Printi，k
Ifi>8thenexitfor
Nexti
Endsub
3、以下程序是一个评分程序，有10名评委，去掉一个最高分和一个最低分，计算平均分
（设满分为100分）。
试填空。
Privatesubcommand1_click（）
Max=0：
Min=100
Fori=1to10
n=val（inputbox（“请输入分数：
”））
ifthenMax=n
ifthenMin=n
s=s+n
nexti
s=
p=s/8
print“最高分：
”；Max,，“最低分：
”；Min
print“最后得分：
”；p
endsub
4、窗体上有一个命令按钮（command1）和两个文本框（text1与text2）。
在Text1中输入任意一个字符串，单击命令按钮后该字符串以反序的形式出现在Text2中。
试完成程序。
Privatesubcommand1_click（）
Dimnasstring,casstring,dasstring
n=text1.text
m=
fori=mto1step-1
c=
d=d&
nexti
text2.text=d
endsub
5、在下面的程序中，要求循环体执行4次，试填空。
Privatesubcommand1_click（）
X=1
Dowhile
X=X+2
Loop
Endsub
6、以下命令按钮的事件过程用于计算10！
。
Privatesubcommand1_click（）
X=1
Result=
Whilex<=10
Result=
X=X+1
Wend
PrintResult
Endsub
7、执行下面的程序后，第2行输出，第3行输出
Privatesubform_click（）
Dimchasstring,Iasinteger
Ch=”ABC”
Fori=1to3
Ch=Mid（ch,2*i-1,1）+left（ch,len（ch）
Printch
Nexti
Endsub
五、程序分析题。
给出下面程序的运行结果。
（每个5分，共10分）
1、FunctionF（aAsInteger）
b=0
Staticc
b=b+1
c=c+2
F=a+b+c
EndFunction
PrivateSubCommand1_Click（）
DimaAsInteger
a=2
Fori=1To3
PrintF（a）
Nexti
EndSub
写出程序运行时，单击命令按钮在窗体上的输出结果。
2、SubChange（ByValxAsInteger,yAsInteger）
DimtAsInteger
t=x
x=y
y=t
Printx,y
EndSub
PrivateSubForm_Click（）
DimaAsInteger,bAsInteger
a=10:
b=20
Changea,b
Printa,b
EndSub
写出程序运行时单击窗体后，Form1上的输出结果。
姓名_________班级_______考号______
———————————— ————装订线内不可答题——————————————————————————————
《VB》答案专页
一、选择题。
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
二、填空题。
1、2、
3、4、5、
6、
7、8、
9、10、
11、
12、
13、
三、判断题。
1
2
3
4
5
6
7
8
9
10
四、程序填空题。
1、
2、
3、
4、
5、
6、
7、
五、程序分析题。
1、
2、
共五页第五页
升级会员 