2016计算机二级vb考试题及答案

计算机二级vb的学习内容：按照新大纲，需要学习的内容有：VB基本概念、集成开发环境、可视化编程方法、基本输入输出、常用控件功能及使用、VB控制结构语句等。

以下是计算机二级vb的考试模拟试题，希望对大家的复习有所帮助!

　　单选题

1、

A.n As Integer j As Integer

B.n As Integer Static j As Integer

l n As Integer J As Integer

l n As Integer Static j As Integer

2、 下列各种窗体事件中，不能由用户触发的事件是(　　)。

事件和Unload事件

k事件和Unload事件

k事件和DblClick事件

事件和Initialize事件

3、

A.4321

B.12

C.34

D.1234

4、 在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为ComTest1。设窗体Form1标题为“MyForm1”.双击控件数组中的第3个按钮，打开代码编辑器，编写如下代码：

Privae Sub ComTest 1_Click(Index As Integer)

ion=”MyForm2”

End Sub

运行时，单击按钮数组中的第1个按钮，则窗体标题显示为(　　)。

1

est1

rm1

rm2

5、 下列操作中不能向工程中添加窗体的是(　　)。

A.执行“工程”菜单中的“添加窗体”命令

B.单击工具栏上的“添加窗体”按钮

C.右击窗体，在弹出的菜单中选择“添加窗体”命令

D.右击工程资源管哩器，在弹出的菜单中选择“添加”命令，然后在下一级菜单中选择“添加窗体”命令

6、 下面程序运行时，若输入“Visual Basic Programming”，则在面体上输出的是(　　)。

A.3

B.2

C.1

D.0

7、 下列关于窗体的描述中，错误的是(　　)。

A.窗体的Height、Width属性用于设置窗体的高和宽

B.窗体的Load事件在加载窗体时发生

C.当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止

D.执行UnLoad Form1语句后，窗体Form1消失，但仍在内存中

8、 设已经在窗体上添加了一个通用对话框控件CommonDialogl，以下语句正确的是(　　)。

er=ALLL Files |*.*|=|Pictures(*.Bmp)|*.Bmp

er="ALLL Files"|*.*|"Pictures(*.Bmp)"|*.Bmp

er={ALLL Files{|*.*|Pictures(*.Bmp)|*.Bmp}

er="ALLL Files |*.*|Pictures(*.Bmp)|*.Bmp"

9、 窗体上建立了一个名为CommonDialong1的通用对话框，用下面的语句建立一个对话框：

Comm,on=2，则以下语句与之等价的是(　　)。

Open

Save

Color

Font

10、如果一个直线控件在窗体上呈现为一条垂直线，则可以确定的是(　　)。

A.它的`Y1、Y2属性的值相等

B.它的X1、X2属性的值相等

C.它的X1、Y1属性的值分别与X2、Y2属性的值相等

D.它的X1、X2属性的值分别与Y1、Y2属性的值相等

11、窗体上有一个名称为Framel的框架(如图)，若要把框架上显示的“Framel”改为汉字“框架”，下面正确的语句是(　)

{Page}

12、以下关于过程及过程参数的描述中，错误的是(　){Page}

13、

14、

15、 下列控件属性中，属性值的类型不相同的一项是(　　)。

l控件的Enabled属性与TextBox控件的Enabled属性

onBraon控件的Value属性与CheckBox控件的Value属性

antt控件的Default属性与Command控件的Cancel属性

and控件的Ⅵsible属性与Frame控件的Ⅵsible属性

16、 下列不能打开]：具箱窗口的操作是(　　)。

A.执行“视图”菜单中的“工具箱”命令

B.按Alt+F8键

C.单击工具栏上的“工具箱”按钮

D.按Alt+V，然后按Alt+X键

17、

A.9 8 7 6 3 2

B.2 3 6 7 8 9

C.9 8 7 6 3

D.2 3 6 7 8

18、为达到把a、b中的值交换后输出的目的，某人编程如下：{Page}

Private Sub Command1_Click()

a%=10：b%=20

Call swap(a，B.：Print a，b

End Sub

Private Sub swap(ByVal aAs Integer，ByVal bAs Integer)

c=a：a=b：b=c

End Sub

在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是。

A.调用swap过程的语句错误，应改为：Call swap a，b

B.输出语句错误，应改为：Print “a”，“b”

C.过程的形式参数有错，应改为：swap(ByRef a As Integer，ByRef b As Integer)

中3条赋值语句的顺序是错误的，应改为a=b：b=c：c=a

19、

　　填空题

20、下面的程序执行时，可以从键盘输入一个正整数，然后把该数的每位数字按逆序输出。例如：输入7685，则输出5 8 6 7;输人1000，则输出0 0 0 1。请填空。

Private Sub Command1_Click()

Dim x As Integer

X=InputBox(“请输入一个正整数”)

While x> 【11】

Print x Mod 10;

x=x10

Wend

Print 【12】

End Sub