2014年计算机二级VB模拟试题及答案（4）

　　查看汇总：2014年计算机二级VB模拟试题及答案汇总

　　一、选择题

　　1、任何控件都有的属性是( )。

　　A.BackColor

　　B.Caption

　　C.Name

　　D.BorderStyle

　　2、设计数据库的存储结构属于(　　)

　　A.需求分析

　　B.概念设计

　　C.逻辑设计

　　D.物理设计

　　3、某人创建了1个工程，其中的窗体名称为Form1;之后又添加了1个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是(　　)。

　　A.在工程属性对话框中把"启动对象"设置为Form2

　　B.在Forml 的Load 事件过程中加入语句Load Form2

　　C.在Form2的Load 事件过程中加入语句Form2.Show

　　D.把Form2的TabIndex 属性设置为l ，把Form1的TabIndex 属性设置为2

　　4、设有如下通用过程：

　　Public Function Fun(xStr As Stri ng)As Stri ng

　　Di mt Str As Stri ng ，strLAs Integer

　　tStF=""

　　strL=Len(xStr)

　　i =1 Do While i <=strL/2

　　tStr =Tstr &Mid(xStr ，i ，1)&Mid(xStr ，strL-i+1，1)

　　i =i +l

　　Loop

　　Fun =tStr

　　End Function

　　在窗体上画一个名称为Co mmand1的命令按钮。然后编写如下的事件过程：

　　Private Sub Co mmandI_Click()

　　Di mS1As Stri ng

　　S1="abedef"

　　Pri m UCase(Fun(S1))

　　End Sub

　　程序运行后，单击命令按钮，输出结果是(　　)。

　　A.ABCDEF

　　B.abcdef

　　C.AFBECD

　　D.DEFABC

　　5、下列关于栈的描述正确的是(　　)。

　　A.在栈中只能插入元素而不能删除元素

　　B.在栈中只能删除元素而不能插入元素

　　C.栈是特殊的线性表，只能在一端插入或删除元素

　　D.栈是特殊的线性表，只能在一端插入元素，而在另一端删除元素

　　6、下列程序段的运行结果是(　　)。

　　Sub sele(　　)

　　Di mn As Integer

　　i =21：n =3

　　Do While i >n

　　i =i -n

　　Loop

　　Print i

　　End Sub

　　A.2

　　B.4

　　C.5

　　D.3

　　7、复选框的Value 属性为0时，表示该复选框(　　)。

　　A.未被选中

　　B.被选中

　　C.框内有灰色的勾

　　D.操作有误

　　8、在窗体上有一个名称为Check1的复选框数组(含4个复选框)，还有一个名称为Text1的文本框，初始内容为空。程序运行时，单击任何复选框，则把所有选中的复选框后面的方字罗列在文本框中(见图)。下面能实现此功能的事件过程是(　　)。

　　A.Private Sub Check1_Click(Index As Integer)

　　Text1.Text =""

　　For k =0To 3

　　If Check1(k).value =1Then

　　Text1.Text =Text1.Text &Check1(k).Caption &""双引号中是空格 End If Next k

　　End Sub

　　B.Private Sub Check1_Click(Index As Integer)

　　For k =0To 3

　　If Check1(k).Value =1Then

　　Text1.Text =Text1.Text &Check1(k).Caption &""双引号中是空格

　　End If

　　Next k

　　End Sub

　　C.Private Sub Check1_Click(Index As Integer)

　　Text1.Text ="" For k =0To 3 If Check1(k).Value =1Then

　　Text1.Text =Text1.Text &Check1(Index).Caption &""双引号中是空格

　　End If

　　Next k

　　End Sub

　　D.Private Sub Check1_Click(Index As Integer)

　　Text1.Text ="" For k =0To 3

　　If Check1(k).Value =1Then

　　Text1.Text =Text1.Text &Check1(k).Caption &""双引号中是空格

　　Exit For

　　End If

　　Next k

　　End Sub

　　9、在窗体上添加一个命令按钮，名为Co mmand1，其单击事件中有下列程序段，则事件过程执行后，文本框中输出

　　(　　)。

　　For i =1To 4

　　For j=1To 3

　　x=3

　　For k =1To 2

　　x=x+3

　　Next k

　　Next j

　　Next i

　　Textl .Text =Str(x)

　　A.3

　　B.6

　　C.9

　　D.12

　　10、下列关于Sub 过程的叙述正确的是(　　)。

　　A.一个Sub 过程必须有一个Exit Sub 语句

　　B.一个Sub 过程必须有一个End Sub 语句

　　C.在Sub 过程中可以定义一个Function 过程

　　D.可以用Goto 语句退出Sub 过程