计算机等级考试二级VB模拟试题七.docx
《计算机等级考试二级VB模拟试题七.docx》由会员分享，可在线阅读，更多相关《计算机等级考试二级VB模拟试题七.docx（13页珍藏版）》请在冰豆网上搜索。
计算机等级考试二级VB模拟试题七
二级VisualBasic模拟考试题七
一．选择题
1．设一张软盘已染上病毒，能清除病毒的措施是1。
A.删除该软盘上的所有文件B.删除该软盘上的所有可执行文件
C.格式化该软盘D.删除该软盘上的所有批处理文件
2．I/O接口位于2。
A.总线和I/O设备之间B.CPU和I/O设备之间
C.主机和总线之间D.CPU和主存储器之间
3．在Windows95的“资源管理器”窗口中，如果想一次选定多个分散的文件或文件夹，正确的操作是3。
A.按住Ctrl键，用鼠标右键逐个选取
B.按住Ctrl键，用鼠标左键逐个选取
C.按住Shift键，用鼠标右键逐个选取
D.按住Shift键，用鼠标左键逐个选取
4．中文Windows95中，实现全角与半角状态之间的切换，应按的键是4。
A.Shift+空格B.Ctrl十空格C.Shift十CtrlD.Ctrl十F9
5．Windows95中，在删硬盘上的文件时，如果不打算将删除的文件放入“回收站”，应在选定文件后5。
A.直接按键盘上的Deltree键
B.将选定文件拖到回收站中
C.按Ctrl键的同时将选定文件拖到回收站中
D.按Shift键的同时将选定文件拖到回收站中
6.下列设备中，既能向主机输入数据，又能接收主机输出数据的设备是6。
A.CD－ROMB.显示器C.软磁盘驱动器D.光笔、扫描仪
7．下列四个不同数制表示的数中，数值最大的7。
A.二进制数11011101B.八进制数334C.十进制数219D.十六进制数DA
8．下列与两个二进制数运算1011011.101+1100.101结果不等的是8。
A.1101000.01BB.68.4H C.104.2DD.150.2Q
9．在WINDOW95中，若在某一文档中连续进行了多次剪切操作，当关闭该文档后，"剪贴板"中存放的是9。
A.空白B.所有剪切过的内容
C.最后一次剪切的内容D.第一次剪切的内容
10．在WINDOW95的资源管理器窗口中，为了将选定的硬盘上的文件或文件夹复制到软盘，应进行的操作是10。
A.先将它们删除并放入"回收站"，再从"回收站"中恢复
B.用鼠标键将它们从硬盘拖动到软盘
C.先执行"编辑"菜单下的"剪切"命令，再执行"编辑"菜单下的"粘贴"命令
D.用鼠标右键将它们从硬盘拖动到软盘，并从弹出的快捷菜单中选择"移动到当前位置"
11．在Window95的"资源管理器"左部窗口中，若显示的文件夹图标前带有加号（+），意味着该文件夹11。
A.含有下级文件夹B.仅含有文件
C.是空文件夹D.不含下级文件夹
12．下列叙述中正确的是12。
A.计算机病毒只能传染给可执行文件
B.计算机软件是指存储在软盘中的程序
C.计算机每次启动的过程之所以相同，是因为RAM中的所有信息在关机后不会丢失
D.硬盘虽然装在主机箱内，但它属于外存
13．在WINDOW95中，错误的文件名是 13。
A.MY PROGRAM.TXTB.@1$2&3.12#
C.1!
（a）.1aD.A?
B.DOC
14．在word的14视图方式下，可以显示分页效果。
A.普通 B.大纲 C.页面D.主控文档
15．有一个数值152,它与十六进制数6A相等,那么该数值是15。
A.二进制数B.八进制数C.十进制数D.四进制数
16．当前活动窗口是文档mjq．doc的窗口，单击该窗口的“最小化”按扭后16。
A.不显示mjq．doc文档内容，但mjq．doc文档并未关闭
B.该窗口和mjq．doc文档都被关闭
C.mjq．doc文档未关闭，且继续显示其内容
D.关闭了mjq．doc文档,但该窗口并未关闭
17．下列说法错误的是17。
A.在同一模块不同过程中的变量可以同名；
B.不同模块中定义的全局变量不可以同名；
C.引用另一模块中的全局变量时，必须在变量名前加模块名；
D.同一模块中不同级的变量可以同名。
18．利用18函数可以判断在访问文件时是否已经到达了文件尾？
A.LOFB.LOCC.EOFD.BOF
19．一只漂亮的酒杯被摔碎了，则漂亮，酒杯，摔，碎了是19
A.对象，属性，事件，方法B.对象，属性，方法，事件
C.属性，对象，方法，事件D.属性，对象，事件，方法
20．当程序运行时，在窗体上单击鼠标，以下20事件是窗体不会接收到的？
A.MouseDownB.MouseUpC.LoadD.Click
21．下列说法错误的是21。
A.设有一三维数组B（1to5,2,-7to8），则Lbound（B,3）=-7,Ubound（B,1）=5
B.Right（“ABCDE”,3）=“CDE”,mid（“ABCDE”,2,3）=“BCD”
C.int（-3.5）=Cint（-3.5）=Fix（-3.5）=-4
D.Lcase$（“ABC”）=“abc”,Ucase$（“Abc”）=“ABC”,
22．下列说法错误的是22。
A.产生不包含端点的0～100之间的随机整数的表达式可写成a%=int（100*Rnd）
B.产生包含端点的0～100之间的随机整数的表达式可写成a%=int（101*Rnd）
C.Mid$（“我喜欢VisualBasic”,3,4）=“喜欢”,Left$（“我喜欢VisualBasic”,6）=“我喜欢”
D.Ucase（“Basic”）=BASIC,Lcase$（“Basic”）=“basic”
23．
的VB表达式正确的是23
A.2*x*exp（x）*sin（30）/（x+y）/ln（x）+abs（log（y）+atn（y））-6*sin（（x+y）^2）/sin（tan（sqr（x^2+y^2）/（2*3.14159-5）））
B.2*x*e^x*sin（30）/（x+y）/log（x）+abs（log（y）/log（10）+arctg（y））-6*sin（（x+y）^2）/sin（tan（sqr（x^2+y^2）/（2*3.14159-5）））
C.2*x*e^x*sin（3.14159/180*30）/（x+y）/ln（x）+abs（log（y）+arctg（y））-6*sin（（x+y）^2）/sin（tan（sqr（x^2+y^2）/（2*3.14159-5）））
D.2*x*exp（x）*sin（3.14159/180*30）/（x+y）/log（x）+abs（log（y）/log（10）+atn（y））-6*sin（（x+y）^2）/sin（tan（sqr（x^2+y^2）/（2*3.14159-5）））
24．用下列哪个代码段可以实现向顺序文件Test.Date写入数据24。
A.Open“Test.Date”forInputAs#10
Print#10,1,2,3,4,5,6
Close10
B．Open“Test.Date”forOutputAs#10
Put#10,1,2,3,4,5,6
Close10
C．Open“Test.Date”forAppendAs#10
Write#10,1,2,3,4,5,6
Close10
D．Open“Test.Date”forOutputAs#10
Input#10,1,2,3,4,5,6
Close10
25．如果窗体上有命令按钮确定，在代码编辑窗口有与之相对应的OK_Click（）事件，则命令按钮控件的名称属性和Caption属性分别为：
25。
A.OK、确定B.确定、OKC.Command1、确定D.Command1、OK
26.窗体Form1的Name属性是Frm1,它的单击事件过程名是26。
A.Form1_ClickB.Form_ClickC.Frm1_ClickD.Me_Click
27.有变量定义语句Dima,basString,变量；变量a的类型和初值为27。
A.String、0B.String、“”C.Variant、空值D.Variant、0
28.用Write和Input语句向文件中写入多个数据的差别在于28。
A.Write语句将自动加入逗号分隔符
B.Input语句将自动加入逗号分隔符
C.Write语句将自动加入回车
D.Input语句将自动加入回车
29．在程序处于中断模式时，要在立即窗口中显示变量mjq的值,可以输入29后回车即可。
A.？
mjqB.!
mjqC.=mjqD.Displaymjq
30．在VisualBasic中，如果要获取某一对象的联机帮助，只要选中该对象后按下30键。
A.F10B.TabC.F1D.Esc
31．下列31不关闭Windows95的方法。
A.单击“开始”，然后单击“关闭系统”B.[Alt]+[F4]
C.脱曳“开始”按钮到“关闭系统”D.[Ctrl]+[Alt]+[Del]
32．对于计算机网络来说，局域网的基本拓扑结构有32。
A.总线型、环型和星型B.总线型、星型和主从型
C.总线型、对等型和主从型D.总线型、星型和对等型
33．计算机中的数有浮点表示和定点表示，浮点表示的数，通常有两部分组成，即33。
A.指数和基数B.整数和小数C.尾数和小数D.阶码和尾数
34．十六进制数FF.1转换成十进制数是34。
A.255.0625B.255.125C.127.0625D.127.125
35．3.5英寸软盘片的一个角上有一个滑动板,如果移动该滑动块露出一个小孔,则该软盘35。
A.不能读但能写B.不能读出不能写C.只能读不能写D.能读写
36．在因特网（Internet）中,电子公告板的缩写是36。
A．FTPB．WWWC．BBSD．E-mail
37．在Window95的窗口中，选中末尾带有省略号（…）的菜单意味着37。
A.将弹出下一级菜单 B.将执行该菜单命令
C.表明该菜单项已被选用 D.将弹出一个对话框
38．下列四条叙述中，正确的一条是38。
A.假若CPU向外输出20位地址，则它能直接访问的存储空间可达1MB
B.PC机在使用过程中突然断电，SRAM中存储的信息不会丢失
C.PC机在使用过程中突然断电，DRAM中存储的信息不会丢失
D.外存储器中的信息可以直接被CPU处理
39.关于图文框和文本框的说法正确的是39。
A.图文框中既可以有文本也可以有图形，而文本框中只能有图形
B.图文框和文本框周围都可以环绕正文；
C.当我们往图文框增加内容时图文框会自动变大，文本框则不会
D.当我们“删除图文框”或删除文本框时，框内的内容也将被删除
40．Word中用来选取文本的快捷键是40。
A．Shift+→B．Alt+→C．Ctrl+→D．Alt+Ctrl+→
41.在WINDOW95中，为了在目标列表框中看到文件的名字、大小、类型和修改时间等属性，41。
A.需要在文件夹窗口选择“查看/大图标”命令
B.需要在文件夹窗口选择“查看/小图标”命令
C.需要在文件夹窗口选择“查看/详细资料”命令
D.需要在文件夹窗口选择“查看/列表”命令
二．填空题
1．执行下列程序后，a的值为
（1），b的值是
（2）。
PrivateSubForm_Click（）
DimaAsInteger,bAsInteger
a=1:
b=2
a=sum（a,b）
b=sum（a,b）
Printa,b
EndSub
PublicFunctionsum（aAsInteger,bAsInteger）AsInteger
sum=a*b+a
b=a*b
EndFunction
2．执行下列程序后，窗体第一行的输出结果为（3），第二行的输出结果为（4）。
PrivateSubForm_Click（）
w=10:
x=9:
y=8:
z=7
Printw>xAndy<=zOrx>yXorx>w*2-z
PrintNot（w>yAndx=z）And（y<>xXorw>z）
EndSub
3．Fibonacci数列的递推公式如下：
编写程序打印出它的前20项，要求打印的项数n由InputBox函数输入，每行只显示4个数，设置的程序界面如下图所示，请完善程序：
PrivateSubForm_Click（）
Dimn%
n=（5）
ForI=1Ton
Printfibo（I）,
IfIMod4=0Then（6）
NextI
EndSub
PublicFunction（7）AsLong
Ifn=1Orn=2Then
fibo=1
Else
fibo=fibo（n-1）+fibo（n-2）’注意等号左边的fibo不能写成fibo（n）
EndIf
EndFunction
4．下面代码段的打印结果是sum=（8）、a
（2）=（9）。
PrivateSubForm_Click（）
DimiAsInteger,a（）AsInteger,sumAsInteger
Fori=1to5
ReDima（i）
a（i）=i
nexti
fori=1to5
sum=sum+a（i）
nexti
Printsum,a
（2）
EndSub
5．下面代码段的打印结果是x=（10）、y=（11）。
Privatexasinteger,yasinteger
PrivateSubForm_Click（）
x=10:
y=5
Change（x）,y
printx,y
Endsub
PrivateSubChange（aasinteger,basinteger）
a=a+b
b=a-b
Endsub
6．下面代码段的打印结果是（12）和（13）。
PrivateSubForm_Click（）
DimBAsString,AAsString,IAsInteger
B=”GAFBXCNDH”
ForI=1toLen（B）Step2
A=A&Chr（Asc（Mid（B,I,1））-5）
NextI
PrintA,I
EndSub
7.以下程序中，命令按钮的”Caption”属性是“计算”，命令按钮的名称是（14），输入Txta.Text=21，Txtb.Text=9，单击窗体上的“计算”按钮，则在窗体上输出的第一行结果是：
（15），在窗体上输出的第二行结果是：
（16）,推测这段程序的作用是求两个数的（17）和（18）。
OptionExplicit
PrivateSubCalc_Click（）
Dima%,b%,c%,d%,e%,I%
a=Val（Txta.Text）
b=Val（Txtb.Text）
Ifa>bThenc=bElsec=a
ForI=2Toc
If（aModI）=0And（bModI）=0Thend=I
NextI
e=a*b/d
Print"Gcd（"&a&","&b&"）=";d
Print"Lcm（"&a&","&b&"）=";e
EndSub
8．单击窗体，执行以下程序中，窗体第一行的输出结果为（19），第二行的输出结果为（20）。
OptionExplicit
PrivatexAsInteger:
PrivateyAsInteger
PrivateSubForm_Click（）
x=1:
y=1
test
Printx;y
EndSub
Subtest（）
DimyAsInteger
Printx;y
x=2:
y=2
EndSub
9．单击窗体，执行以下程序中，窗体第一行的输出结果为（21），第二行的输出结果为（22）。
OptionExplicit
Privatex1AsInteger,x2AsInteger
PrivateSubForm_Click（）
x1=1:
x2=1
test1x1,x2
Printx1;x2
test2x1*1,（x2）
Printx1;x2
EndSub
Subtest1（ByValaAsInteger,bAsInteger）
a=a+1
b=b+1
EndSub
Subtest2（aAsInteger,bAsInteger）
a=a+1
b=b+1
EndSub
10．单击窗体，执行以下程序中，窗体第一行的输出结果为（23），第二行的输出结果为（24）。
PrivateSubForm_Click（）
test3
EndSub
PrivateSubtest（xAsInteger）
DimiAsInteger
Ifx<>Sgn（x）Then
Calltest（x-1）
Fori=Sgn（x）Tox
Printx;
Nexti
Print
EndIf
EndSub
11．单击窗体，执行以下程序中，窗体第一行的输出结果为（25），第三行的输出结果为（26），第五行的输出结果为（27）。
OptionExplicit
Dimi%,j%,k%
PrivateSubForm_Click（）
i=0:
j=1:
k=2
Callq（0,k）:
Printi,j,k
Callq（1,k）:
Printi,j,k
Callq（2,j）:
Printi,j,k
EndSub
PrivateSubq（ByValh%,j%）
Dimi%
i=j
Ifh=0Then
Callp（j）
Else
Ifh=1Then
Callp（i）
Else
Callr
EndIf
EndIf
EndSub
PrivateSubp（i%）
i=i+1
Printi,j,k
EndSub
PrivateSubr（）
i=i+1
EndSub
12.某城市举行体育彩票的发行，规定每10万张彩票为一个开奖组，共有10组，用A~J表示不同的组。
奖券为一个五位数，前面加组号。
例如B10365表示B组的奖券。
规定每组设特等奖的个数由键盘输入。
现用计算机编程产生中奖号,注意同一组不能有相同的中签号。
在Text1文本框中输入每组中签个数5，单击窗体的“产生”按钮（名称为Command1）,运行的程序界面如下：
各组的中奖号码显示在Picture1框中。
请完善程序：
PrivateSubCommand1_Click（）
DimzqlAsInteger
Dimg（）
Picture1.Cls
zql=Val（Text1.Text）
ReDimg（1Tozql）
Fori=（28）
Callcp（g,zql）’或cpg,zql
Forj=1Tozql
Picture1.PrintChr$（i）&（29）
Nextj
Picture1.Print
Nexti
EndSub
PrivateSubcp（h,s）
Randomize
Fori=1Tos
h（i）=Int（100000*Rnd）
Ifi>1Then
Forj=i-1To1
Ifh（j）=h（i）Then（30）
Nextj
EndIf
Nexti
EndSub
升级会员 