2019年9月计算机二级VB试题

发布于 2019-06-10 16:57  编辑:simi
0
计算机等级考试题库 扫码微信刷题


二级VB试题.jpg


人生就像是一杯白开水,放入糖就是甜的,放入盐就是咸的。想,都是问题,做,才是答案!输在犹豫,赢在行动,赶快动起来刷二级VB试题吧。


1.设有如下程序段:

x=2

Forc=1To4Step2

x=x+c

Nextc

运行以上程序后,x的值是(A)

A.6

B.7

C.8

D.9

 

2.以下叙述中错误的是(A)

A.在KeyPress事件过程中不能识别键盘键的按下与释放

B.在KeyPress事件过程中不能识别回车键

C.在KeyDown和KeyUp事件过程中,从键盘输入的字母"A"和字母"a"对应的KeyCode视作相同的字母

D.在KeyDown和KeyUp事件过程中,从大键盘上输入的"1"和从右侧小键盘上输入的"1"被视作不同的字符

 

3.执行如下两条语句,窗体上显示的是(C)

A=9.8596

PrintFormat(a,"000.00")

A.0,009.86

B.9.86

C.009.86

D.0,009.86

 

4.在窗体上画一个名称为CommandDialog1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程:

PrivateSubCommand1_Click()

CommonDialog1.FileName=""

CommonDialog1.Filter="Allfile|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"

CommonDialog1.FilterIndex=1

CommonDialog1.DialogTitle="VBTest"

CommonDialog1.Action=1

EndSub

对于这个程序,以下叙述中错误的是(D)

A.该对话框被设置为"打开"对话框

B.在该对话框中指定的文件名为空

C.该对话框的标题为VBTest

D.在该对话框中指定的默认文件类型为文本文件(*.Txt)

 

5.设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下:

PrivateSubCommand1_Click()

DimaAsInteger

a=10

Callg(Form2,a)

EndSub

PrivateSubg(fAsForm,xAsInteger)

y=Iif(x>10,100,-100)

f.Show

f.Caption=y

EndSub

运行以上程序,正确的结果是(B)

A.Form1的Caption属性值为100

B.Form2的Caption属性值为-100

C.Form1的Caption属性值为-100

D.Form2的Caption属性值为100

 

6.在窗体上画一个名称为Command1的命令按钮,并编写如下程序:

PrivateSubCommand1_Click()

DimxAsInteger

StaticyAsInteger

x=10

y=5

Callf1(x,y)

Printx,y

EndSub

PrivateSubf1(ByRefx1AsInteger,y1AsInteger)

x1=x1+2

y1=y1+2

EndSub

程序运行后,单击命令按钮,在窗体上显示的内容是(D)

A.105

B.125

C.107

D.127

 

7.OptionBase1

PrivateSubCommand1_Click()

Dima10)AsInteger

DimnAsInteger

n=3

Ifn<10Then

CallGetArray(a,n)

EndIf

EndSub

PrivateSubGetArray(b()AsInteger,nAsInteger)

Dimc10)AsInteger

j=0

Fort=1Ton

b(t)=Rnd*100

Ifb(t)/2=b(t)\2Then

j=j+1

c(j)=b(t)

EndIf

Nextt

Printj

EndSub

以下叙述中错误的是(C)

A.数组b中的数范围为0-100

B.c数组下标的下界从1开始

C.GetArray过程的参数n是按值传送的

D.语句Ifb(t)/2=b(t)\2Then是判断数组b中元素的值是否为整数

 

8.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:

OptionBase1

PrivateSubCommand1_Click()

Dima

a=Array(1,2,3,4,5)

Forc=1ToUbound(a)

a(c)=a(c)+c-1

Nextc

Printa3

EndSub

程序运行后,单击命令按钮,则在窗体上显示的内容是(B)

A.4

B.5

C.6

D.7

 

9.阅读程序:

OptionBase1

PrivateSubForm_Click()

Dimarr

DimSum%

Sum=0

arr=Array(1,3,5,7,9)

Fort=1To5

Sum=Sum+arr(t)

Nextt

PrintSum

EndSub

程序运行后,单击窗体,输入结果为(B)

A.5

B.9

C.25

D.15

 

10.在窗体上画一个名称为File1的文件列表框,并编写如下程序:

PrivateSubFile1_DblClick()

x=Shell(File1.FileName,1)

EndSub

以下关于该程序的叙述中,错误的是(A)

A.x没有实际作用,因此可以将该语句写为:CallShell(File1,FileName,1)

B.双击文件列表框中的文件,将触发该事件过程

C.要执行的文件的名字通过File1.FileName指定

D.File1中显示的是当前驱动器、当前目录下的文件



考无忧小编为大家介绍一款实用的考无忧网校:计算机等级考试题库,涵盖了计算机等级各方面内容,同样所有习题交互式答题,有答案,有解析,相信会在您的备考道路上,助您一臂之力!以上的二级VB试题,也会助您考试成功的!





文章推荐:

全国计算机等级考试可以不考一级直接考二级吗?

2019年全国计算机等级考试题库“二级MS Office 高级应用考试大纲”

全国计算机等级考试报考成功后可以退费吗?(内附计算机等级考试题库)


温馨提示:

考试想拿高分吗?更多计算机等级考试题库二级ms office试题请点击查看>>>二级ms office

想要了解更多的计算机等级考试题库请点击下载>>>计算机等级考试题库

想知道更多关于计算机等级考试题库的近期资讯吗?点击进入>>>计算机等级考试题库资讯


本文网址:http://www.k51.com.cn/info/jsjdjks/1906/1053942.html
选择分享到: