一填空共10题共计20分.docx
《一填空共10题共计20分.docx》由会员分享，可在线阅读，更多相关《一填空共10题共计20分.docx（15页珍藏版）》请在冰豆网上搜索。
一填空共10题共计20分
一、填空共10题（共计20分）
第1题（分）题号:
1867难度:
中第2章
在VisualBasic中，默认缺省的数据类型为【1】
答案：
=======（答案1）=======
Variant
=========或=========
Variant类型
=========或=========
变体
=========或=========
变体类型
第2题（分）题号:
1973难度:
中第3章
窗体Form1的Name属性为Myfrm,则它的load事件过程名为【1】
答案：
=======（答案1）=======
form_load
第3题（分）题号:
270难度:
中第3章
将焦点定位于命令按钮Command1之上的语句为【1】.
答案：
=======（答案1）=======
=========或=========
SetFocus
第4题（分）题号:
1797难度:
中第8章
设有以下函数过程：
Functionfun（mAsInteger）AsInteger
DimkAsInteger,sumAsInteger
sum=0
Fork=mTo1Step-2
sum=sum+k
Nextk
fun=sum
EndFunction
若在程序中用语句s=fun（10）调用此函数，则s的值为【1】。
答案：
=======（答案1）=======
30
第5题（分）题号:
1389难度:
中第3章
如果要每隔15秒产生一个计时器事件,则Interval属性应设置为【1】.
答案：
=======（答案1）=======
15000
第6题（分）题号:
1969难度:
中第2章
可获得当前系统日期的函数是【1】
答案：
=======（答案1）=======
date（）
=========或=========
date
第7题（分）题号:
1773难度:
中第6章
设有如下程序段：
x=2
Fori=1To10Step-2
x=x+i
Next
运行以上程序后，i的值是【1】。
答案：
=======（答案1）=======
1
第8题（分）题号:
43难度:
中第1章
一个工程可以包括多种类型的文件,其中,扩展名为.frm的文件表示【1】文件.
答案：
=======（答案1）=======
窗体
第9题（分）题号:
1320难度:
中第7章
数组元素个数可以改变的数组称为【1】.
答案：
=======（答案1）=======
动态数组
第10题（分）题号:
221难度:
中第2章
把条件1<=X<12写成VB逻辑表达式为【1】.
答案：
=======（答案1）=======
x>=1andx<12
=========或=========
1<=xand12>x
=========或=========
x>=1and12>x
=========或=========
1<=xandx<12
二、判断共10题（共计10分）
第1题（分）题号:
1131难度:
中第9章
菜单选项"Enabled"属性与"Visible"属性是相同的.
答案：
N
第2题（分）题号:
309难度:
中第1章
所有的对象都有caption属性.
答案：
N
第3题（分）题号:
269难度:
中第3章
单选按钮控件和复选框控件都具有Value属性,它们的作用完全相同.
答案：
N
第4题（分）题号:
311难度:
中第3章
通过改变属性窗口中的Name属性,可以改变窗体上显示的标题.
答案：
N
第5题（分）题号:
1422难度:
中第3章
为了给三个变量赋初值1，赋值语句是：
x=y=z=1。
答案：
N
第6题（分）题号:
271难度:
中第3章
当计时器控件的interval属性值设置为0时,会连续不断地激发Timer事件.
答案：
N
第7题（分）题号:
221难度:
中第1章
VB是一种面向对象的程序设计语言.
答案：
Y
第8题（分）题号:
245难度:
中第9章
"菜单编辑器"中至少要填"名称"框,才能正确完成菜单栏的设计.
答案：
Y
第9题（分）题号:
368难度:
中第8章
如果在过程调用时使用按地址传递参数,则在被调过程中不可以改变实参的值.
答案：
N
第10题（分）题号:
1125难度:
中第2章
在程序运行过程中,变量中的值不会改变,而常量中的值会被改变.
答案：
N
三、单项选择共10题（共计10分）
第1题（分）题号:
4467难度:
易第3章
若要使某命令按钮在运行时不可见，可设置（）属性为False来实现。
A:
Visible
B:
Cancel
C:
Default
D:
Enabled
答案：
A
第2题（分）题号:
2480难度:
易第2章
下列（）是日期型常量.
A:
"2/1/02"
B:
37258
C:
#2/1/02#
D:
|2/1/02|
答案：
C
第3题（分）题号:
3606难度:
较易第3章
窗体的Enabled属性的属性值是（）类型的数据.
A:
整型
B:
字符型
C:
逻辑型
D:
实型
答案：
C
第4题（分）题号:
4260难度:
中第3章
设在窗体上有1个名称为Combol的组合框，含有5个项目，要删除最后一项，正确
的语句是（）。
A:
B:
4
C:
D:
5
答案：
B
第5题（分）题号:
3260难度:
中第8章
Sub过程与Function过程最根本的区别是
A:
Sub过程可以有参数,Function过程不可以
B:
Function过程可以有参数,Sub过程不可以
C:
两种过程参数的传递方式不同
D:
Sub过程的过程名不能返回值,而Function过程能通过过程名返回值
答案：
D
第6题（分）题号:
3478难度:
中第3章
将数据项"China"添加到列表框（List1）中成为第一项应使用的语句是（）。
A:
〞China〞,0
B:
〞China〞,1
C:
0,〞China〞
D:
1,〞China〞
答案：
A
第7题（分）题号:
3456难度:
较难第2章
表达式printLen（trim（"abcd"）&"123"）的结果是
A:
9
B:
7
C:
abcd
D:
123
答案：
B
第8题（分）题号:
3197难度:
中第6章
以下程序的循环次数是______.
PrivateSubCommand1_Click（）
Forj=8To35Step3
Printj;
Nextj
EndSub
A:
10
B:
9
C:
27
D:
8
答案：
A
第9题（分）题号:
373难度:
中第9章
下列可调整图片框的大小以适合图片的属性是（）.
A:
stretch
B:
autosize
C:
picture
D:
oledropmode
答案：
B
第10题（分）题号:
3470难度:
中第5章
语句Ifx=1Theny=1,下列说法正确的是
A:
x=1和y=1均为赋值语句
B:
x=1和y=1均为关系表达式
C:
x=1为关系表达式,y=1为赋值语句
D:
x=1为赋值语句,y=1为关系表达式
答案：
C
四、程序填空共2题（共计20分）
第1题（分）题号:
451难度:
中第6章
'-------------------------------------------------------
'【程序填空】
'-------------------------------------------------------
'题目：
以下程序的功能是：
从键盘上输入若干个学生的考试分数，
'统计总分，当输入负数（<0）时结束输入，
'输出结果，请将程序补充完整。
'-------------------------------------------------------
PrivateSubForm_Click（）
Dimx,sumAsSingle
x=InputBox（"Enterascore"）
'**********SPACE**********
DoWhile【】
'**********SPACE**********
sum=sum+【】
x=InputBox（"Enterascore"）
Loop
Print"sum=";sum
EndSub
答案：
=======（答案1）=======
x>=0
=========或=========
0<=x
=======（答案2）=======
x
第2题（分）题号:
2难度:
中第7章
'-------------------------------------------------------
'【程序填空】
'-------------------------------------------------------
'功能：
要求输入若干学生的成绩，计算平均分和高于平均分的
'人数，并将这两个数据放入数组的最后。
'-------------------------------------------------------
PrivateSubForm_Click（）
Dimmark（）AsInteger,i%,n%,aver
n=InputBox（"输入学生的人数"）
ReDimmark（1Ton）
aver=0
Fori=1Ton
mark（i）=Int（Rnd*101）
aver=aver+mark（i）
Nexti
'**********SPACE**********
ReDim【】mark（1Ton+2）'增加两个元素,存放平均分和高于平均分的人数,原来的学生成绩仍保留
mark（n+1）=aver/n
mark（n+2）=0
Fori=1Ton
'**********SPACE**********
Ifmark（i）>mark（【】）Thenmark（n+2）=mark（n+2）+1
Nexti
Fori=1Ton
Print"mark（";i;"）=";mark（i）
Nexti
Print"平均分=";mark（n+1）,"高于平均分人数=";mark（n+2）
EndSub
答案：
=======（答案1）=======
Preserve
=======（答案2）=======
n+1
=========或=========
1+n
五、程序设计共2题（共计20分）
第1题（分）题号:
150难度:
易第6章
'-------------------------------------------------
'【程序设计】
'-------------------------------------------------
'题目：
（事件）单击窗体。
'（响应）求1-1/2+1/3-1/4+……+1/99-1/100的值。
'将结果存入变量J中，并输出在窗体上。
'要求使用for循环
'-------------------------------------------------
答案：
----------------------
DimiAsInteger
Fori=1To100
IfiMod2=1Then
j=j+1/i
ElseIfiMod2=0Then
j=j-1/i
EndIf
Next
Printj
----------------------
第2题（分）题号:
58难度:
中第8章
'-------------------------------------------------
'【程序设计】
'-------------------------------------------------
'题目：
编写函数fun，函数的功能是：
求1~1000以内能
'同时被m、n整除的数的总和。
如：
'm为15，n为11时，显示"3465"
'存储总和的变量必须为Sum
'要求使用For语句来实现。
'-------------------------------------------------
'注意：
请在指定的事件内编写代码
'代码只能写在两行标识之间
'不得修改已有代码
'保存时不得修改窗体和工程文件的名称及路径，否则后果自负。
'-------------------------------------------------
PrivateFunctionfun（mAsInteger,nAsInteger）AsLong
DimSumAsLong
'**********Program**********
'**********End**********
EndFunction
PrivateSubForm_Load（）
Show
Printfun（15,11）
NJIT_VB
EndSub
PrivateSubNJIT_VB（）
DimiAsInteger
Dima（10）AsString
DimfInAsInteger
DimfOutAsInteger
fIn=FreeFile
Open&"\"ForInputAs#fIn
fOut=FreeFile
Open&"\"ForOutputAs#fOut
Fori=1To10Step2
LineInput#fIn,a（i）
LineInput#fIn,a（i+1）
Print#fOut,Trim（Str（fun（Val（a（i））,Val（a（i+1）））））
Next
Close#fIn
Close#fOut
EndSub
答案：
Sum=0
Fori=1To1000
IfiModm=0AndiModn=0Then
Sum=Sum+i
EndIf
Nexti
fun=Sum
六、VB窗体设计共2题（共计20分）
第1题（分）题号:
19难度:
中第9章
------------------------------------------------
【窗体设计】
------------------------------------------------
题目：
请按照题目要求设计指定的窗体。
建立如（图1）所示界面。
------------------------------------------------
1、在窗体内添加2个按钮（Command1，Command2），1个文
本框（Text1），1个标签（Label1），1个框架（Frame1），
并在框架中添加4个复选框（Check1，Check2，Check3，Check4）。
2、窗体设置：
设置窗体名称（Name）为“Form19”。
设置窗体标题（Caption）为“个人资料”。
3、标签设置：
设置第1个标签（Label1）的标题（Caption）为“输入姓名”。
4、文本框设置：
适当设置文本框的大小和位置。
5、框架设置：
设置框架（Frame1）的标题（Caption）为“爱好”。
设置框架中的第1个复选框（Check1）的标题（Caption）为“体育”。
设置框架中的第2个复选框（Check2）的标题（Caption）为“文学”。
设置框架中的第3个复选框（Check3）的标题（Caption）为“艺术”。
设置框架中的第4个复选框（Check4）的标题（Caption）为“计算机”。
6、按钮设置：
设置第1个按钮（Command1）的标题（Caption）为“确定”。
设置第2个按钮（Command2）的标题（Caption）为“退出”。
第2题（分）题号:
48难度:
中第9章
---------------------------------------------------------------------
【窗体设计】
---------------------------------------------------------------------
题目：
请按照题目要求设计指定的窗体。
（本题有6个项目要完成）
建立如图003所示界面：
注意：
保存时不得修改窗体和工程文件的名称及路径，否则后果自负。
---------------------------------------------------------------------
1、菜单设计
1）设置第一个一级菜单，名称为“Menu1”，标题为“菜单一”
2）设置第二个一级菜单，名称为“Menu2”，标题为“菜单二”
3）将第一个菜单项设置为不可用
4）将第二个菜单项设置为不可见
2、在窗体上方添加一个PictureBox控件
1）设置能自动调整大小
2）背景色设置为蓝色，值为H00FF0000
3）边框风格为0
4）设置离窗体顶端的距离为411
3、在窗体中央添加一个框架控件
1）名称为“框架”
2）标题为“框架”
4、在框架中添加上下两个复选框
1）第一个复选框处于上方，标题为“菜单一有效”
2）第二个复选框处于下方，标题为“菜单二可见”
5、在窗体下方添加一个标签控件
1）设置能够自动调整大小
2）背景风格为透明
3）边框风格为1
4）内容为“菜单与复选框”
3）字体大小为40
6、在框架右方添加一个命令按钮
1）在单击事件里添加代码，使得Menu2可见
----------此为题目要求的最后一行，以下空白---------------------------------------
升级会员 