选择题填空题练习集附答案.docx
- 文档编号:16036976
- 上传时间:2023-07-10
- 格式:DOCX
- 页数:37
- 大小:28.04KB
选择题填空题练习集附答案.docx
《选择题填空题练习集附答案.docx》由会员分享,可在线阅读,更多相关《选择题填空题练习集附答案.docx(37页珍藏版)》请在冰点文库上搜索。
选择题填空题练习集附答案
说明
本练习摘自全国计算机等级考试试卷,仅供复习参考。
用红色标记的选项为参考答案。
用蓝色标记的选项为不在这次的考试范围
如果发现题目或答案有错,请发电子邮件知会老师,xkping@,谢谢。
第一部分(0609)
一、单选题
11.以下叙述正确的是
(A)窗体的Name属性指定窗体的名称,用来标识一个窗体
(B)窗体的Name属性值是显示在窗体标题栏中的文本
(C)可以在运行期间改变窗体的Name属性的值
(D)窗体的Name属性值可以空
12.以下叙述中错误的是
(A)打开一个工程文件时,系统自动装入与该工程有关的窗体文件
(B)保存VisualBasic程序时,应分别保存窗体文件及工程文件
(C)VisualBasic应用程序只能以解释的方式执行
(D)窗体的Name属性值可以可空
13.设a=2,b=3,c=4,下列表达式的值是
Nota<=cOr4*c=b^2Andb<>a+c
(A)-1
(B)1
(C)True
(D)False
14.设有发下声明的用户定义类型:
TypeStudent
numberAsString
nameAsString
ageAsInteger
EndType
则以下正确引用该类型成员的代码是
(A)Student.name="李明"
(B)DimsAsStudent:
s.name="李明"
(C)DimsAsTypeStudent:
s.name="李明"
(D)DimsAsType:
s.name="李明"
15.设a=5,b=6,c=7,d=8,执行下列语句后,x的值为
x=IIf((a>b)And(c>b),10,20)
(A)10
(B)20
(C)True
(D)False
16.执行以下程序段后,变量c$的值为
a$="VisualBasicProgramming"
b$="Quick"
c$=b$&UCase(Mid$(a$,7,6))&Right$(a$,12)
(A)VisualBASICProgramming
(B)QuickBasicProgramming
(C)QUICKBasicProgramming
(D)QuickBASICProgramming
17.在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Label1),程序运行后,如果在文本框中输入指定的信息,则立即在标签中显示相同的内容。
以下可以实现上述操作的事件过程是
(A)
PrivateSubText1_click()
Label1.Caption=Text1.Text
EndSub
(B)
PrivateSubText1_Change()
Label1.Caption=Text1.Text
EndSub
(C)
PrivateSubLabel1_Change()
Label1.Caption=Text1.Text
EndSub
(D)
PrivateSubLabel1_Click()
Label1.Caption=Text1.Text
EndSub
18.在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Labell,然后编写如下事件过程:
PrivateSubCommand1_Click()
Counter=0
Fori=1To4
Forj=6To1Step-2
Counter=Counter+1
Nextj
Nexti
Label1.Caption=Str(Counter)
EndSub
程序运行后,.单击命令按钮,标签中显示的内容是
(A)11
(B)12
(C)16
(D)20
19.在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
DimIAsInteger,nAsInteger
Fori=0To50
i=i+3
n=n+1
Ifi>10ThenExitFor
Next
Text1.Text=Str(n)
EndSub
程序运行后,单击命令按钮,在文本框中显示的值是
(A)5
(B)4
(C)3
(D)2
20.在窗体上画一个命令按钮和两个标签,其名称分别为Commandl、Labell和Label2,然后编写如下事件过程:
PrivateSubCommand1_Click()
a=0
Fori=1To10
a=a+1
b=0
Forj=1To10
a=a+1
b=b+2
Nextj
Nexti
Label1.Caption=Str(a)
Label2.Caption=Str(b)
EndSub
程序运行后,单击命令按钮,在标签Label1和Label2中显示的内容分别是,
(A)10和20
(B)20和110
(C)200和110
(D)110和20
22.在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
PrivateSubCommand1_Click()
DimiAsInteger,jAsInteger
Dima(10,10)AsInteger
Fori=1To3
Forj=1To3
a(i,j)=(i-1)*3+j
Printa(i,j)
Nextj
Nexti
EndSub
程序运行后,单击命令按钮,窗体上显示的是
(A)123(B)234(C)147(D)123
246345258456
369456369789
23.在窗体上画一个命令按钮,名称为Command1,然后编写如下代码:
OptionBase0
PrivateSubCommand1_C1ick()
DimA(4)AsInteger,B(4)AsInteger
Fork=0To2
A(k+1)=InputBox("请输入一个整数")
B(3-k)=A(k+1)
Nextk
PrintB(k)
EndSub
程序运行后,单击命令按钮,在输入对话框中分别输入2、4、6,输出结果为
(A)0
(B)2
(C)3
(D)4
24.有以下程序:
OptionBase1
Dimarr()AsInteger
PrivateSubForm_Click()
DimiAsInteger,jAsInteger
ReDimarr(3,2)
Fori=1To3
Forj=1To2
arr(i,j)=i*2+j
Nextj
Nexti
ReDimPreservearr(3,4)
Forj=3To4
arr(3,j)=j+9
Nextj
Printarr(3,2);arr(3,4)
EndSub
程序运行后,单击窗体,输出结果为
(A)813
(B)013
(C)712
(D)00
25.以下叙述中正确的是
(A)一个Sub过程至少要有一个ExitSub语句
(B)一个Sub过程必须有一个EndSub语句
(C)可以在Sub过程中定义一个Function过程,但不能定义Sub过程
(D)调用一个Function过程可以获得多个返回值
26.有以下程序
SubsubP(b()AsInteger)
Fori=1To4
b(i)=2*i
Nexti
EndSub
PrivateSubCommand1_Click()
Dima(1To4)AsInteger
a
(1)=5:
a
(2)=6:
a(3)=7:
a(4)=8
subPa()
Fori=1To4
Printa(i)
Nexti
EndSub
运行上面的程序,单击命令按钮,输出结果为
(A)2(B)5(C)10(D)出错
4612
6714
8816
27.设有如下通用过程
PublicFunctionFun(xStrAsString)AsString
DimtStrAsString,strLAsInteger
tStr=""
strL=Len(xStr)
i=1
DoWhilei<=strL/2
tStr=tStr&Mid(xStr,i,1)&Mid(xStr,strL–i+1,1)
i=i+1
Loop
Fun=tStr
EndFunction
在窗体上画—个名称为Text1的文本框和一个名称为Command1的命令按钮。
然后编写如下的事件过程:
PrivateSubCommand1_Click()
DimS1AsString
S1="abcdef"
Text1.Text=UCase(Fun(S1))
EndSub
程序运行后,单击命令按钮,则Text1中显示的是
(A)ABCDEF
(B)abcdef
(C)AFBECD
(D)DEFABC
28.在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程:
PrivateSubTxtA_KeyPress(KeyAsciiAsInteger)
EndSub
假定焦点已经位于文本框中,则能够触发KeyPress事件的操作是
(A)单击鼠标
(B)双击文本框
(C)鼠标滑过文本框
(D)按下键盘上的某个键
30.以下说法中正确的是
(A)任何时候都可以通过执行“工具”菜单中的“菜单编辑器”命令打开菜单编辑器
(B)只有当某个窗体为活动窗体时,才能打开菜单编辑器
(C)任何时候都可以通过单击标准工具栏上的“菜单编辑器”按钮打开菜单编辑器
(D)只有当代码窗口为活动窗口时,才能打开菜单编辑器
32.以下叙述中错误的是
(A)一个工程中可以包含多个窗体文件
(B)在一个窗体文件中用Public定义的通用过程不能被其他窗体调用
(C)窗体和标准模块需要分别保存为不同类型的磁盘文件
(D)用Dim定义的窗体层变量只能在该窗体中使用
33.以下叙述中错误的是
(A)语句“Dima,bAsInteger”声明了两个整型变量
(B)不能在标准模块中定义Static型变量
(C)窗体层变量必须先声明,后使用
(D)在事件过程或通用过程内定义的变量是局部变量
二、填空题
请将每空的正确答案写在答题卡【11】~【15】序号的横线上,答在试卷上不得分。
6.描述“X是小于100的非负整数”的VisualBasic表达式是【6】。
x>=0Andx<100
7.在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。
程序运行后,Command1为禁用(灰色),此时如果在文本框中输入字符,则命令按钮Command1变为可用。
请填空。
PrivateSubForm_Load()
Command1.Enabled=False
EndSub
PrivateSubText1【7】()Change或KeyPress
Command1.Enabled=True
EndSub
8.在窗体上画一个名称为“Command1”的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
DimaAsString
a="123456789"
Fori=1To5
PrintSpace(6-i);Mid$(a,【8】,2*i-1)6-i
Nexti
EndSub
程序运行后,单击命令按钮,窗体上的输出结果是
5
456
34567
2345678
123456789
请填空。
9.以下程序的功能是:
将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A
(1)到A(10)依次赋给B(1,1)到B(1,10),把A(11)到A(20)依次赋给B(2,1)到B(2,10),……,把A(91)到A(100)依次赋给B(10,1)到B(10,10)。
请填空。
OptionBase1
PrivateSubForm_Click()
DimiAsInteger,jAsInteger
DimA(1To100)AsInteger
DimB(1To10,1To10)AsInteger
Fori=1To100
A(i)=Int(Rnd*100)
Nexti
Fori=1To【9】10
Forj=1To【10】10
B(i,j)=【11】A((i-1)*10+j)
PrintB(i,j);
Nextj
Nexti
EndSub
第二部分(0504)
一、选择题
下列各题(A)、(B)、(C)、(D)四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。
11.在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。
程序运行以后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。
以下能实现上述操作的事件过程是:
(A)
PrivateSubText1_Change()
Command1.Caption="计算机等级考试"
EndSub
(B)
PrivateSubCommand1_Click()
Caption="计算机等级考试"
EndSub
(C)
PrivateSubForm1_Click()
Text1.Caption="计算机等级考试"
EndSub
(D)
PrivateSubCommand1_Click()
Text1.Text="计算机等级考试"
EndSub
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
EndSub
程序运行后单击窗体,则在弹出的信息框中的标题栏中显示的信息是:
(A)MicrosoftVisual (B)Microsoft (C)Basic (D)5
15.设a="a",b="b",c="c",d="d",执行语句x=IIf((ad),"A","B")后,x的值为:
(A)"a" (B)"b" (C)"B" (D)"A"
16.为了使命令按钮(名称为Command1)右移200,应使用的语句是
(A)Command1.Move-200 (B)Command1.Move200
(C)Command1.Left=Command1.Left+200(D)Command1.Left=Command1.Left-200
17.在窗体上画一个文本框,然后编写如下事件过程:
PrivateSubForm_Click()
x=InputBox("请输入一个整数")
Printx+Text1.Text
EndSub
程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容是:
(A)123 (B)456 (C)579 (D)123456
18.在窗体上画一个文本框和一个计时器控件,名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000,Enabled属性设置为False,程序运行后,如果单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。
以下是实现上述操作的程序:
PrivateSubCommand1_Click()
Timer1._________
EndSub
PrivateSubTimer1_Timer()
Text1.Text=Time
EndSub
在______处应填入的内容是
(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属性,然后按回车键
21.在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
PrivateSubCommand1_Click()
DimiAsInteger,xAsInteger
Fori=1To6
Ifi=1Thenx=i
Ifi<=4Then
x=x+1
Else
x=x+2
EndIf
Nexti
Printx
EndSub
程序运行后,单击命令按钮,其输出结果为
(A)9 (B)6 (C)12 (D)15
22.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
c="ABCD"
Forn=1To4
Print_________
Next
EndSub
程序运行后,单击命令按钮,要求在窗体上显示如下内容:
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
Nexti
后,x的值为
(A)16 (B)17 (C)18 (D)19
24.在VisualBasic工程中,可以作为启动对象的程序是
(A)任何窗体或标准模块
(B)任何窗体或过程
(C)SubMain过程或其他任何模块
(D)SubMain过程或任何窗体
25.假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是
(A)数组中每个命令按钮的名称(名称属性)均为Command1
(B)数组中每个命令按钮的标题(Caption属性)都一样
(C)数组中所有命令按钮可以使用同一个时间过程
(D)用名称Command1(下标)可以访问数组中的每个命令按钮
26.把窗体的KeyPreview属性设置为True,然后编写如下事件过程:
PrivateSubForm_KeyPress(KeyAsciiAsInteger)
DimchAsString
ch=Chr(KeyAscii)
KeyAscii=Asc(UCase(ch))
PrintChr(KeyAscii+2)
EndSub
程序运行后,按键盘上的A键,则在窗体上显示的内容是
(A)A (B)B (C)C (D)D
27.在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:
PrivateSubCommand1_Click()
a=InputBox("请输入日期(1-31)")
t="旅游景点:
"_
&IIf(a>0Anda<=10,"长城","")_
&IIf(a>10Anda<=20,"故宫","")_
&IIf(a>20Anda<=30,"颐和园","")
Text1.Text=t
EndSub
程序运行后,如果从键盘输入16,则在文本框中显示的内容是:
(A)旅游景点:
长城故宫
(B)旅游景点:
长城颐和园
(C)旅游景点:
颐和园
(D)旅游景点:
故宫
28.在窗体上画一个名称为Label1的标签,然后编写如下事件过程:
PrivateSubForm_Click()
Dimarr(10,10)AsInteger
DimiAsInteger,jAsInteger
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 选择题 填空 练习 答案