VB单选题(第6章)

349 ()属性决定了按Tab键时焦点在各个控件之间移动的顺序. A) Index B) TabStop C) TabIndex D) SetFocus 答案 C

350 VB的过程有三种,它们是(). A) 事件过程、子过程和函数过程

B) Sub过程、Function过程和Property过程 C) 事件过程、函数过程和属性过程 D) Sub过程、函数过程和通用过程 答案 A

351 要定义一个变量为全局变量,应使用()关键字. A) Static B) Public C) Private D) Sub 答案 B

352 下面函数过程语句说明合法的是(). A) Sub f1(ByVal n%( )) B) Sub f1(n%) As Integer C) Function f1%(f1%)

D) Function f1%( ByVal n%) 答案 D

353 要想从子过程调用后返回两个结果,下面子过程语句说明合法的是(). A) Sub f2(ByVal n%, ByVal m%) B) Sub f1(n%, ByVal m%) C) Sub f1(n%, m%)

D) Sub f1(ByVal n%, m%) 答案 C

354 Sub和Function的最大差别在于______. A) Function有返回值,而Sub没有 B) Function需要输入参数,而Sub不用

C) Sub可以用Call语句调用,而Function不行 D) 两者并无不同 答案 A

355 记录长度最大可取的值是______字节. A) 32767 B) 32768 C) 65535 D) 65536 答案 A

356 写出如下程序运行结果.

Function f(m As Integer) As Integer b = 1

Static c As Integer b = b + 1 c = c + 1 f = m * b * c End Function

Private Sub Command1_Click() Dim a As Integer a = 2

sum=0

For I = 1 To 3 sum=sum+ f(a) Next I print sum End Sub A) 12 B) 16 C) 20 D) 24 答案 D

357 在窗体上画一个名称为Command1的按钮,并有下面程序,当按下Command1按钮后,程序输出的结果是 Private Sub Command1_Click() Dim a%, b%

a = 50: b = 100

Print \调用前\ Swap a, b

Print \调用后\End Sub

Private Sub Swap(ByVal x%, y%) Dim t%

t = x: x = y: y = t End Sub

A) 调用前A=50 B=100 调用后A=50 B=100 B) 调用前A=50 B=100 调用后A=100 B=50 C) 调用前A=50 B=100 调用后A=50 B=50 D) 调用前A=50 B=100 调用后A=100 B=100 答案 C

358 在窗体上画一个名称为Label1、标题为\考试\的标签,两个名称分别为Command1和Command2、标题分别为\开始\和\停止\的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500.编写如下程序:

Private Sub Form_Load() Timer1.Enabled = False End Sub

Private Sub Command1_Click() Timer1.Enabled = True End Sub

Private Sub Command2_Click() Timer1.Enabled = False End Sub

Private Sub Timer1_Timer() If Label1.Left < Width Then

Label1.Left = Label1.Left + 120 Else

Label1.Left = 0 End If End Sub

程序运行后,单击\开始\按钮,标签在窗体中移动.对于这个程序,以下叙述中错误的是

A) 标签的移动方向为自左向右

B) 单击\停止\按钮后再单击\开始\按钮,标签从停止的位置继续移动 C) 当标签全部移出窗体后,将从窗体的另一端出现并重新移动 D) 标签每隔1秒移动一次 答案 D

359 Sub过程与Function过程最根本的区别是 A) Sub过程可以有参数,Function过程不可以 B) Function过程可以有参数,Sub过程不可以 C) 两种过程参数的传递方式不同

D) Sub过程的过程名不能返回值,而Function过程能通过过程名返回值 答案 D

360 假定一个工程由两个窗体文件Form1及Form2和一个标准模块文件Model1组成. Model1代码如下: Public x As Integer Public y As Integer Public Sub S1() x =1 S2 End Sub Sub S2() y=10

Form1.Show End Show

Form2的Load事件过程如下: Private Sub Form_Load() S1 End Sub

其中Form2被设置为启动窗体.程序运行后,各模块的执行顺序是 A) Form1-> Form2 ->Model1 B) Form2-> Form1 ->Model1 C) Form1-> Model1->Form2 D) Form2-> Model1 -> Form1 答案 D

361 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:

Private Sub Command1_Click()

Dim x, y, z As Integer x = 5 y = 7 z = 0

Text1.Text = \Call P1(x, y, z)

Text1.Text = Str(x) & Str(z) End Sub

Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer)

a=a+1 b=b+1

c = a + b End Sub

程序运行后,如果单击命令按钮,则在文本框中显示的内容是 A) 5 14

B) 6 14 C) 5 0 D) 6 0 答案 A

362 设有如下的用户定义类型: Type Worker number As String name As string age As Integer End Type

则以下正确引用该类型成员的代码是 A) Worker name=\李四\B) Dim s As Worker s.name=\李四\

C) Dim s As Type Worker s.name=\李四\D) Dim s As Type s.name=\李四 \答案 B

363 在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮(名称为Command1).编写如下程序 Private Sub Form_Load()

Text1.Text=\End Sub

Private Sub Command1_Click() x=Val(Text1.Text) y=Val(Text2.Text) Text3.Text=GCD(x,y) End Sub

Function GCD(ByVal x As Integer,ByVal y As Integer) Do While y<>0 tmp=x Mod y x=y y=tmp Loop GCD=x

End Function

运行程序,在Text1文本框中输入18,在Text2文本框中输入12,然后单击命令按钮,则在Text3文本框中显示的内容是 A) 4 B) 6 C) 12 D) 18 答案 B

364 以下正确的描述是: 在Visual Basic 应用程序中 A) 过程的定义可以嵌套,但过程的调用不能嵌套 B) 过程的定义不可以嵌套,但过程的调用能嵌套 C) 过程的定义过程的调用均可以嵌套 D) 过程的定义过程的调用均不可以嵌套 答案 B

365 以下关于过程及过程参数的描述,错误的是: A) 过程的参数可以是控件的名称

B) 用数组作为过程的参数时,使用的传地址的方式

C) 只有函数过程能够将过程中矗立的信息传回到调用的程序中 D) 窗体可以作为过程的参数 答案 C

366 下面过程运行后显示的结果是

Pubic Sub F1(n%,ByVal m%) Private Sub Command1_Click()

N=n Mod 10 Dim x%,y% M=m\\10 x=12:y=34 End Sub Call F1(x,y) Print x,y End Sub A) 2 34 B) 12 34 C) 2 3 D) 12 3 答案 A

367 如下程序：

Private Sub Command1_Click() Print p1(3,7) End Sub

Public function p1!(x!,n%) If n=0 Then P1=1 Else If n Mod 2=1 Then P1=x*p1(x,n\\2) Else P1=p1(x,n\\2)\\x End If End If End Function 运行的结果是 A) 18 B) 7 C) 14 D) 27 答案 D

368 如下程序：运行的结果是 Dim a%, b%, c%

Public Sub p1(x%, y%) Dim c% x = 2 * x: y = y + 2: c = c + y End Sub

Public Sub p2(x%, ByVal y%) Dim c% x = 2 * x:: y = y + 2: c = x + y End Sub

Private Sub Command1_Click() a = 2: b = 4: c = 6 Call p1(a,B) Print \ Call p2(a,B) Print \End Sub

A) a=2 b=4 c=6 a=4 b=6 c=10 B) a=4 b=4 c=10 a=8 b=8 c=16 C) a=4 b=6 c=6 a=8 b=6 c=6 D) a=4 b=6 c=14 a=8 b=8 c=6 答案 C

369 如下程序：

Public Sub Proc(a%()) Static I% Do a(I) = a(I) + a(I + 1) I = I + 1 Loop While I < 2 End Sub

Private Sub Command1_Click() Dim m%, I%, x%(10) For I = 0 To 4: x(I) = I + 1: Next I For I = 0 To 2: Call Proc(x): Next I For I = 0 To 4: Print x(I);: Next I End Sub

A) 3 4 7 5 6 B) 3 5 7 9 5 C) 2 3 4 4 5 D) 4 5 6 7 8 答案 B

370 假定一个工程由一个窗体Form1 和两个标准模块文件Model1及 Model2组成。Model1的代码如下： Public x As Integer Public y As Integer Sub S1() x=1 S2 End Sub

Sub S2() y=10

Form1.Show

End Sub

Model2的代码如下：

Sub Main() S1 End Sub

其中Sub Main被设置成启动过程，程序运行后，各模块的执行顺序是： A) Fomr1→Model1→Model2 B) Model1→Model2→Fomr1 C) Model2→ Model1→Fomr1 D) Model2→Fomr1→Model1 答案 C

371 以下关于过程及过程参数的描述中,错误的是(). A) 过程的参数可以是控件名称

B) 用数组作为过程的参数时,使用的是\传地址\方式

C) D) 答案 372 A) B) C) D) 答案

按\传值\方式传送参数时,形参的变化有可能会改变实际参数的值. 窗体可以作为过程的参数 C

以下关于过程及过程参数的描述中,错误的是(). 过程的参数可以是控件名称 窗体可以作为过程的参数

用数组作为过程的参数时,使用的是\传地址\方式

按\传值\方式传送参数时,有可能会改变实际参数的值. D

本文来源：https://www.bwwdw.com/article/4zk6.html