计算机二级习题练习

计算机二级考试Visual Basic每日一练（2016-2-5）
第1题：在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1)，然后编写如下事件过程：
PrivateSubCommand1_Click()
x=0
DoWhilex<50
x=(x+2)*(x+3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
EndSub
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）
A.1和0
B.2和72
C.3和50
D.4和168
【单选题】：      

第2题：用下面语句定义的数组的元素个数是。（）
DimA(-3To5)AsInteger
A.6
B.7
C.8
D.9
【单选题】：      

第3题：以下程序的输出结果是（）
OptionBase1
PrivateSubCommand1_Click()
Dima(10),p(3)AsInteger
k=5
Fori=1To10
a(i)=i
Nexti
Fori=1To3
p(i)=a(i*i)
NextI
Fori=1To3
k=k+p(i)*2
Nexti
Printk
Endsub
A.33
B.28
C.35
D.37
【单选题】：      

第4题：在窗体上面画一个命令按钮，然后编写如下事件过程：
OptionBase1
PrivateSubCommandl_Click()
Dima
a=Array(1,2,3,4)
j=1
Fori=4ToStep-1
s=s+a(i)*j
j=j*10
Nexti
Prints
EndSub
运行上面的程序，单击命令按钮，其输出结果是。（）
A.4321
B.12
C.34
D.1234
【单选题】：      

第5题：在窗体上面一个命令按钮（其Name属性为Commandl），然后编写如下代码：
OptionBase1
PrivateSubCommandl_Click()
Dima(4,4)
Fori=1To4
Forj=1To4
a(i,j)=(i-1)*3+j
Nextj
Nexti
Fori=3To4
Forj=3To4
Printa(j,i);
Nextj
Print
Nexti
EndSub
程序运行后，单击命令按钮，其输出结果为。（）
A.69
B.710
C.811
D.912
【单选题】：      

第6题：假定有如下的Sub过程：
SubS（xAsSingle,yAsSingle）
t=x
x=t/y
y=tMody
EndSub
在窗体上画一个命令按钮，然后编写如下事件过程：
PrivateSubCommandl_Click()
DimaAsSingle
DimbAsSingle
a=5
b=4
Sa,b
Printa,b
EndSub
程序运行后，单击命令按钮，输出结果为。（）
A.54
B.11
C.1.254
D.1.251
【单选题】：      

第7题：阅读程序：
FunctionF(aAsInteger)
b=0
Staticc
b=b+1
c=c+1
f=a+b+c
EndFunction
PrivateSubCommandl_Click()
DimaAsInteger
a=2
Fori=1To3
PrintF(a)
Nexti
EndSub
运行上面的程序，单击命令按钮，输出结果为。（）
A.4
B.4
C.4
D.4
【单选题】：      

第8题：阅读程序：
SubsubP(b()AsInteger)
Fori=1To4
b(i)=2*i
Nexti
EndSub
PrivateSubCommandl_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.出错
【单选题】：      

第9题：下列不能打开菜单编辑器的操作是。（）
A.按Ctrl+E
B.单击工具栏中的“菜单编辑器”按钮
C.执行“工具”菜单中的“菜单编辑器”命令
D.按Shift+Alt+M
【单选题】：      

第10题：假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为。（）
A.MenuItem.Enabled=False
B.MenuItem.Enabled=True
C.MenuItem.Visible=True
D.Menultem.Visible=False
【单选题】：      

 

您正在结束答题

请确认是否提交试卷？

继续做题 确认提交