已用时 00:00:00
计算机二级考试Visual Basic模拟试题(2016-2-5)
1题:为了暂时关闭计时器,应把该计时器的某个属性设置为False,这个属性是。()
A.Visible
B.Timer
C.Enabled
D.Interval
【单选题】:      

2题:为了把一个记录型变量的内容写入文件中指定的位置,所使用的语句的格式为。()
A.Get文件号,记录号,变量名
B.Get文件号,变量名,记录号
C.Put文件号,变量名,记录号
D.Put文件号,记录号,变量名
【单选题】:      

3题:对窗体编写如下事件过程:
PrivateSubForm_MouseDown(ButtonAsInteger,_
ShiftAsInteger,XAsSingleYAsSingle)
IfButton=2Then
Print"AAAAA"
EndIf
EndSub
PrivateSubForm_MouseUp(ButtonAsInteger,_
ShiftAsInteger,XAsSingle,YAsSingle)
Print"BBBBB"
EndSub
程序运行后,如果单击鼠标右键,则输出结果为()    。
A.AAAAA
B.BBBBB
C.AAAAA
D.BBBBB
【单选题】:      

4题:为了在运行时能显示窗体左上角的控制框(系统菜单),必须()。
A.把窗体的Contro1Box属性设置为Fale,其他属性任意
B.把窗体的ControlBox属性设置为True,并且把BoderStyle属性设置为1-5
C.把窗体的ControlBox属性设置为False,同时把BoderStyle属性调协为非0值
D.把窗体的ControlBox属性设置为True,同时把BoderStyle属性设置为0值
【单选题】:      

5题:对窗体编写如下代码:
OptionBase1
PrivateSubForm_KeyPress(KeyAsciiAsInteger)
a=Array(237,126,87,48,498)
m1=a(1)
m2=1
IfKeyAscii=13Then
Fori=2To5
Ifa(i)>mlThen
m1=a(j)
m2=i
EndIf
Nexti
EndIf
Printm1
Printm2
EndSub
程序运行后,按回车键,输出结果为()
A.48
B.237
C.498
D.498
4154
【单选题】:      

6题:当运行程序时,系统自动执行启动窗体的某个事件过程。这个事件过程是()
A.Load
B.Click
C.Unload
D.GotFocus
【单选题】:      

7题:无论何控件,都具有一个共同属性。这个属性是()
A.Text
B.Font
C.Name
D.Caption
【单选题】:      

8题:在一行内写多条语句时,语句之间要用某个符号分隔。这个符号是()
A.,
B.;
C.、
D.:
【单选题】:      

9题:表达式3∧2*2+3MOD10\4的值是()
A.18
B.1
C.19
D.0
【单选题】:      

10题:下面的变量名合法的是()
A.k_name
B.kame
C.name
D.k-name
【单选题】:      

11题:设有如下变量声明Dimtime1AsDate,为变量time1正确赋值的表达式是()
A.time1=#11:34:04#
B.time1=Format(Time,"yy:mm:dd")
C.time1=#"11:34:04"#
D.time1=Format("hh:mm:ss",Time)
【单选题】:      

12题:表达式12000+"129"&200的值是()
A.12329
B."12129200"
C."12000129200"
D."12329"
【单选题】:      

13题:若设a=4,b=5,则下列表达式值为真的是()
A.(True+a)>0Andb>10
B.a>bOrb>10-a
C.(False-b<0)Eqv(a>b)
D.a>bXorb+3>5
【单选题】:      

14题:当窗体上的文字或图形被覆盖或最小化后能恢复原貌,需要设置窗体的属性是()
A.Appearance
B.Visible
C.Enable
D.Autoredraw
【单选题】:      

15题:VisualBasic是一种面向对象的程序设计语言,构成对象的三要素是(B)
A.属性、控件和方法
B.属性、事件和方法
C.窗体、控件和过程
D.控件、过程和模块
【单选题】:      

16题:下列程序段错误的是()
A.DimaAsInteger
a=array(1,2,3,4)
B.Dima(),b()
a=array(1,2,3,4):b=a
C.DimaAsVariant
a=array(1,"asd",true)
D.Dima()AsVariant
a=array(1,2,3,4)
【单选题】:      

17题:表达式String(1,"Iamstudent")+Replace("amharass","rass","ppy")&"!"的值是()
A."Iamhappy!"
B."IamstudentIamsamharassstudentamhappy!"
C."Iamstudentamharass!"
D."Iamstudentamhappy!"
【单选题】:      

18题:下列程序段中,能正常结束循环的是()
A.I=1
Do
I=I+2
LoopUntilI=10
B.I=5
Do
I=I+1
LoopUntilI<0
C.I=10
Do
I=I+1
LoopUntilI>0
D.I=6
Do
I=I-2
LoopUntilI=1
【单选题】:      

19题:引用列表框(List1)最后一个数据项应使用的表达式是()
A.List1.List(List1.ListCount)
B.List1.List(List1.ListCount-1)
C.List1.List(ListCount)
D.List1.List(ListCount-1)
【单选题】:      

20题:有如下程序:
OptionBase1
PrivateSubCommand1_Click()
Dimx,y(3,3)
x=Array(1,2,3,4,5,6,7,8,9)
Fori=1To3
Forj=1To3
y(i,j)=x(i*j)
If(j>=i)ThenPrinty(i,j);
Nextj
Print
Nexti
EndSub
运行时输入出的结果是()
A.123
246
468
B.123
246
C.1
24
369
D.123
46
9
【单选题】:      

 

您正在结束答题

请确认是否提交试卷?

继续做题 确认提交