2010计算机等级考试二级VB预测题(2)

m = m / 10

End Sub

Private Sub Command1_Click()

Dim x As Integer, y As Integer

x = 12: y = 34

Call Procl(x, y)

Print x; y

End Sub

A：12 3

B：2 3

C：12 34

D：2 34

参考答案：D 题分：6

4、以下关于函数过程的叙述中，正确的是______。

A：在函数过程中，过程的返回值可以有多个

B：函数过程形参的类型与函数返回值的类型没有关系

C：当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递D：如果不指明函数过程参数的类型，则该参数没有数据类型

参考答案：B 题分：6

5、以下说法错误的是______。

A：函数过程可以带参数

B：子过程没有返回值

C：函数过程没有返回值

D：子过程可以带参数

参考答案：C 题分：6

6、在窗体上画一个命令按钮（名称为Command1），然后编写如下事件过程：Private Sub Command1_Click()

Dim b As Integer

b = b + 1

End Sub

运行程序，三次单击命令按钮后，变量b的值是：______。

A：2

B：1

C：0

D：3

参考答案：B 题分：6

7、假定有以下函数过程：

Function Fun(S As String) As String

Dim s1 As String

For i = 1 To Len(S)

s1=UCase(Mid(S,i,1))+s1

Next i

Fun = s1

End Function

在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

Dim Str1 As String,Str2 As String

Str1 = InputBox("请输入一个字符串")

Str2= Fun(Str1)

Print Str2

End Sub

程序运行后，单击命令按钮，如果在输入对话框中输入字符串"abcdefg"则单击"确定"按钮后在窗体上的输出结果为______。

A：GFEDCBA

B：ABCEDFG

C：gfedcba

D：abcdefg

参考答案：A 题分：6

8、Sub过程与Function过程最根本的区别是______。

A：两种过程参数的传递方式不同

B：Function过程可以有参数，Sub过程不可以

C：Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以

D：Sub过程的过程名不能返回值，而Function过程能通过过程名返回值

参考答案：D 题分：6

9、在代码中定义了一个子过程：

Sub P(a,b)

...

End Sub

下面______调用该过程的格式是正确的。

A：Call P

B：Call P 10,20

C：P(10,20)

D：Call P(10,20)

参考答案：D 题分：6

10、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：

Private Sub Command1_Click()

Static X As Integer

Static Y As Integer

Cls

Y = 1

Y = Y + 5

X = 5 + X

Print X, Y

End Sub

程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为______。

A：15 15

B：15 6

C：15 16

D：5 6

参考答案：B 题分：6

11、设有以下循环结构

Do

循环体

Loop While<条件>

则以下叙述中错误的是______。

A：循环体中可以使用Exit Do语句

B："条件"可以是关系表达式、逻辑表达式或常数

C：若"条件"是一个为0的常数，则一次也不执行循环体

D：如果"条件"总是为True，则不停地执行循环体

参考答案：C 题分：6

12、在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：

Private Function fun(ByVal m As Integer)

If m Mod 2 = 0 Then

fun = 2

Else

fun = 1

End If

End Function

Private Sub Command1_Click()

Dim i As Integer, s As Integer

s = 0

For i = 1 To 5

s = s + fun(i)

Next

Print s

End Sub

程序运行后，单击命令按钮，在窗体上显示是______。

A：7

B：6

C：8

D：9

参考答案：A 题分：6

VB考试四

1、某人编写了如下程序，用来求10个整数（整数从键盘输入）中的最大值：

Private Sub Command1_Click()

Dim a(10) As Integer,max As Integer

For k=1 To 10

a(k)=InputBox("输入一个整数")

Next k

max=0

For k=1 To 10

If a(k)>max Then

max=a(k)

End If

Next k

Print max

End Sub

运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的，程序需要修改。下面的修改中可以得到正确运行结果的是______。

A：把max=a(k)改为a(k)=max

B：把If a(k)>max Then改为If a(k)<max Then

C：把第2个循环语句For k=1 To 10改为For k=2 To 10

D：把max=0改为max=a(10)

参考答案：D

2、设有语句：Open "d:\Test.txt" For Output As #1，以下叙述中错误的是______。

A：执行该语句后，就可以通过Print#语句向文件Test.txt中写入信息

B：用该语句建立的文件的文件号为1

C：该语句打开d盘根目录下一个已存在的文件Test.txt，之后就可以从文件中读取信息D：若d盘根目录下无Test.txt文件，则该语句创建此文件

参考答案：C

3、工程中有2个窗体，名称分别为Form1、Form2，Form1为启动窗体，该窗体上有命令按钮Command1。要求程序运行后单击该命令按钮时显示Form2，则按钮Click事件过程应该是______。

A：Private Sub Command1_Click()

Form2.Load

End Sub

B：Private Sub Command1_Click()

Form2.Visible

End Sub

C：Private Sub Command1_Click()

Load Form2

End Sub

D：Private Sub Command1_Click()

Form2.Show

End Sub

参考答案：D

4、在窗体上画一个名为Command1的命令按钮，然后编写如下代码：

Option Base 1

Private Sub Command1_Click()

Dim a

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

j=1

For i=4 To 1 Step -1

s=s+a(i)*j

j=j*10

Next i

Print s

End Sub

运行上面的程序，其输出结果是______。

A：12

B：1234

C：34

D：4321

参考答案：B

5、设在窗体中有一个名称为List1的列表框，其中有若干个项目（如图）。要求选中某一项后单击Command1按钮，就删除选中的项，则正确的事件过程是______。

A：Private Sub Command1_Click()

List1.Clear List1.ListIndex

End Sub

B：Private Sub Command1_Click()

List1.Clear

End Sub

C：Private Sub Command1_Click()

List1.RemoveItemList1.ListIndex

End Sub

D：Private Sub Command1_Click()

List1.RemoveItem

End Sub

参考答案：C

6、窗体上有一个名称为Frame1的框架（如图），若要把框 …… 此处隐藏：3031字，全部文档内容请下载后查看。喜欢就下载吧 ……