计算机二级VB模拟试题1Word格式.docx
- 文档编号:3288695
- 上传时间:2023-05-01
- 格式:DOCX
- 页数:15
- 大小:21.90KB
计算机二级VB模拟试题1Word格式.docx
《计算机二级VB模拟试题1Word格式.docx》由会员分享,可在线阅读,更多相关《计算机二级VB模拟试题1Word格式.docx(15页珍藏版)》请在冰点文库上搜索。
C、不同的数据只能被对应的应用程序所使用
D、以上三种说法都不对
10.用树形结构表示实体之间联系的模型是____。
A、关系模型
B、网状模型
C、层次模型
D、以上三个都是
11.在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。
程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。
以下能实现上述操作的事件过程是
A、PrivateSubText1_Change()
Command1.Caption="
计算机等级考试"
EndSub
B、PrivateSubCommand1_Click()
Caption="
C、PrivateSubForm_Click()
Text1.Caption="
D、PrivateSubCommand1_Click()
Text1.Text="
12.设a=5,b=4,c=3,d=2,下列表达式的值是
3>
2*bOra=cAndb<
>
cOrc>
d
A、1
B、True
C、False
D、2
13.设a=”MicrosoftVisualBasic”,则以下使变量的b值为”VisualBasic”的语句是
A、b=Left(a,10)
B、b=Mid(a,10)
C、b=Right(a,10)
D、b=Mid(a,11,10)
14.假定有如下的窗体事件过程:
PrivateSubForm_Click()
a$="
MicrosoftVisualBasic"
b$=Right(a$,5)
c$=Mid(a$,1,9)
MsgBoxa$,34,b$,c$,5
程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是
A、MicrosoftVisual
B、Microsoft
C、Basic
D、5
15.设a="
a"
,b="
b"
,c="
c"
,d="
d"
,执行语句x=IIf((a<
b)Or(c>
d),"
A"
"
B"
)后,x的值为
A、"
B、"
C、"
D、"
16.为了使命令按钮(名称为Command1)右移200,应使用的语句是
A、Command1.Move-200
B、Command1.Move200
C、Command1.Left=Command1.Left+200
D、Command1.Left=Command1.Left-200
17.在窗体上画一个文本框,然后编写如下事件过程:
x=InputBox("
请输入一个整数"
)
Printx+Text1.Text
程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为
A、123
B、456
C、579
D、123456
18.在窗体上画一个文本框和一个计时器控件,名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000,Enabled属性设置为False。
程序运行后,如果单击命令按钮,则每隔一秒中在文本框中显示一次当前的时间。
以下是实现上述操作的程序:
PrivateSubCommand1_Click()
Timer1._______
PrivateSubTimer1_Timer()
Text1.Text=Time
在_____处应填入的内容是
A、Enabled=True
B、Enabled=False
C、Visible=True
D、Visible=False
19.假定在图片框Picture1中装入一个图形,为了清除该图形(不删除图片框),应采用的正确方法是
A、选择图片框,然后按Del键
B、执行语句Picture1.Picture=LoadPicture("
"
C、执行语句Picture1.Picture="
D、选择图片框,在属性窗口中选择Picture属性条,然后按回车键
20.在窗体上画一个名称为List1的列表框,一个名称为Label1的标签,列表框中显示若干个项目,当单击列表框中某个项目时,在标签中显示被选中项目的名称。
下列能正确实现上述操作的程序是
A、PrivateSubList1_Click()
Label1.Caption=List1.ListIndex
B、PrivateSubList1_Click()
Label1.Name=List1.ListIndex
C、PrivateSubList1_Click()
Label1.Name=List1.Text
D、PrivateSubList1_Click()
Label1.Caption=List1.Text
21.在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
DimiAsInteger,xAsInteger
Fori=1To6
Ifi=1Thenx=i
Ifi<
=4Then
x=x+1
Else
x=x+2
EndIf
Nexti
Printx
程序运行后,单击命令按钮,其输出结果为
A、9
B、6
C、12
D、15
22.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程,
c="
ABCD"
Forn=1To4
Print____
Next
程序运行后,单击命令按钮,要求在窗体上显示如下内容:
D
CD
BCD
ABCD
则在____处应填入的内容为
A、Left(c,n)
B、Right(c,n)
C、Mid(c,n,1)
D、Mid(c,n,n)
23.执行以下程序段
DimxAsInteger,iAsInteger
x=0
Fori=20To1Step-2
x=x+i\5
后,x的值为
A、16
B、17
C、18
D、19
24.在VisualBasic工程中,可以作为“启动对象“的程序是
A、任何窗体或标准模块
B、任何窗体或过程
C、SubMain过程或其他任何模块
D、SubMain过程或任何窗体
25.假定建立一个名称为Command1的命令按钮数组,则以下说法中错误的是
A、数组中每个命令按钮的名称(Name属性)均为Command1
B、数组中每个命令按钮的标题(Caption属性)都一样
C、数组中所有命令按钮可以使用同一个事件过程
D、用名称Command1(下标)可以访问数组中的每一个命令按钮
26.把窗体的KeyPreview属性设置程为True,然后编写如下事件过程
PrivateSubForm_KeyPress(KeyAsciiAsInteger)
DimchAsString
ch=Chr(KeyAscii)
KeyAscii=Asc(UCase(ch))
PrintChr(KeyAscii+2)
程序运行后,按键盘上的“A“键,则在窗体上显示的内容是
A、A
B、B
C、C
D、D
27.在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:
a=InputBox("
请输入日期(1~31)"
t="
旅游景点:
_
&
IIf(a>
0Anda<
=10,"
长城"
)_
10Anda<
=20,"
故宫"
20Anda<
=31,"
颐和园"
Text1.Text=t
程序运行后,如果从键盘上输入16,则在文本框中显示的内容是
A、旅游景点:
长城故宫
B、旅游景点:
长城颐和园
C、旅游景点:
颐和园
D、旅游景点:
故宫
28.在窗体上画一个名称为Label1的标签,然后编写如下事件过程:
Dimarr(10,10)AsInteger
DimiAsInteger,jAsInteger
Fori=2To4
Forj=2To4
arr(i,j)=i*j
Nextj
Label1.Caption=Str(arr(2,2)+arr(3,3))
程序运行后,单击窗体,在标签中显示的内容是
A、12
B、13
C、14
29.在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程:
PrivateFunctionfun(ByValmAsInteger)
IfmMod2=0Then
fun=2
fun=1
EndFunction
DimiAsInteger,sAsInteger
s=0
Fori=1To5
s=s+fun(i)
Prints
程序运行后,单击命令按钮,在窗体上显示的是
A、6
B、7
C、8
D、9
30.阅读程序:
OptionBase1
Dimarr()AsInteger
ReDimarr(3,2)
Fori=1To3
Forj=1To2
arr(i,j)=i*2+j
ReDimPreservearr(3,4)
Forj=3To4
arr(3,j)=j+9
Printarr(3,2)+arr(3,4)
程序运行后,单击窗体,输出结果为
A、21
D、25
31.在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
DimcAsInteger,dAsInteger
d=0
c=6
x=Array(2,4,6,8,10,12)
Fori=1To6
Ifx(i)>
cThen
d=d+x(i)
d=d-c
Printd
程序运行后,如果单击命令按钮,则在窗体上输出的内容为____。
A、10
B、16
D、20
32.设有如下程序
c=4
d=InputBox("
DoWhiled>
Ifd>
c=c+1
Loop
Printc+d
程序运行后,单击命令按钮,如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0,则输出结果是____。
B、11
C、10
33.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串:
MicrosoftVisualBasicProgramming
然后编写如下事件过程:
Open"
d:
\temp\outf.txt"
ForOutputAs#1
Fori=1ToLen(Text1.Text)
c=Mid(Text1.text,i,1)
Ifc>
="
Andc<
Z"
Then
Print#1,LCase(c)
Close
程序运行后,单击命令按钮,文件outf.txt中的内容是____。
A、MVBP
B、mvbp
C、M
V
B
P
D、m
v
b
p
34.在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
DimSWAsBoolean
Functionfunc(XAsInteger)AsInteger
IfX<
20Then
Y=X
Y=20+X
func=Y
PrivateSubForm_MouseDown(ButtonAsInteger,_
ShiftAsInteger,XAsSingle,YAsSingle)
SW=False
PrivateSubForm_MouseUp(ButtonAsInteger,_
SW=True
DimintNumAsInteger
intNum=InputBox("
IfSWThen
Printfunc(intNum)
程序运行后,单击命令按钮,将显示一个输入对话框,如果在对话框中输入25,则程序的执行结果为____。
A、输出0
B、输出25
C、输出45
D、无任何输出
35.设有如下通用过程:
PublicSubFun(a()AsInteger,xAsInteger)
Fori=1To5
x=x+a(i)
窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。
然后编写如下的事件过程:
Dimarr(5)AsInteger,nAsInteger
arr(i)=i+i
Funarr,n
Text1.Text=Str(n)
程序运行后,单击命令按钮,则在文本框中显示的内容是____。
A、30
B、25
C、20
二、填空题(每空2分,共计30分)
1.某二叉树中度为2的结点有18个,则该二叉树中有__19__个叶子结点。
输入答案,中间不含空格:
2.在面向对象方法中,类的实例称为对象____。
3.诊断和改正程序中错误的工作通常称为__程序调试__。
4.在关系数据库中,把数据表示成二维表,每一个二维表称为__关系__。
5.问题处理方案的正确而完整的描述称为__算法__。
6.以下语句的输出结果是__12345.68__。
PrintInt(12345.6789*100+0.5)/100
7.在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Text1.text="
VB程序设计"
PrivateSubText1_Change()
Picture1.Print"
VBProgramming"
程序运行后,单击窗体,则在文本框中显示的内容是_VB程序设计___,而在图片框中显示的内容是____。
8.上一题
10VBProgramming
10
9.阅读下面的程序:
DimCheckAsBoolean,CounterAsInteger
Check=True
Counter=5
Do
DoWhileCounter<
20
Counter=Counter+1
IfCounter=10Then
Check=False
ExitDo
Loop
LoopUntilCheck=False
PrintCounter
程序运行后,单击窗体,输出结果为_10___。
10.设有如下程序:
DimaAsInteger,sAsInteger
n=8
s=0
s=s+n
n=n-1
LoopWhilen>
以上程序的功能是____。
程序运行后,单击窗体,输出结果为____。
计算1到8的累加
11.上一题
36
12.设有如下程序:
Dimarr1
DimMinAsInteger,iAsInteger
arr1=Array(12,435,76,-24,78,54,866,43)
Min=____
Fori=2To8
Ifarr1(i)<
MinThen____
Print"
最小值是:
;
Min
以上程序的功能是:
用Array函数建立一个含有8个元素的数组,
然后查找并输出该数组中各元素的最小值。
请填空。
12
13.上一题
Min=arr1(i)
14.在名称为Form1的窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程:
Open"
\test\smtext1.txt"
ForInputAs#1
DoWhileNot____
LineInput#1,aspect$
whole$=whole$+aspect$+Chr$(13)+Chr&
(10)
Text1.Text=whole$
Chose#1
\test\smtext2.txt"
ForOutputAs#1
Print#1,____
Close#1
上述程序的功能是,把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来,
然后把该文本框中的内容存入磁盘文件smtext2.txt。
EOF
(1)
15.上一题
Text1.text
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机二级VB 模拟试题1 计算机 二级 VB 模拟 试题