二级vb选择题 下载本文

内容发布更新时间 : 2024/3/29 9:29:44星期一 下面是文章的全部内容请认真阅读。

If TypeOf x Is Label Then

x Caption=\计算机等级考试\ Else

xPicture=LoadPicture(\ End If End Sub

Private Sub Label1_Click() Call display(Label1) End Sub

Private Sub Picture1_Click() Call display(Picture1) End Sub

对以上程序,下列叙述中错误的是( )。 A) 程序运行时会出错

B) 单击图片框,在图片框中显示一幅图片 C) 过程中的x是控件变量

D) 单击标签,在标签中显示一串文字 参考答案:A

【解析】程序中定义了一个过程display(x as Control),它的参数x是一个控件变量。当单击Picture1控件或Label1控件时,都会调用display过程,而传入的参数分别是这两个参数的控件名,在display过程中程序判断参数传入控件的类型,如果是标签控件,就在它的标题上显示\计算机等级考试\,否则就认为是图片控件,就在图片框中加载一个图片显示出来。程序运行正常,因此A选项错。 5.以下选项中,不合法的Visual Basic的变量名是( )。 A) a5b B) _xyz C) a_b D) andif

参考答案:B

6.下列合法的变量名是( )。 A) sum-a B) num_9 C) print$ D) 5avg

参考答案:B

【解析】VB中变量的命名规则为:①必须以字母或汉字开头②由字母、汉字、数字或下划线组成③不能使用VB的保留字。变量名sum-a中有-减号,不合法;print是VB保留字,不能作变量名,不合法;5avg不能以数字开头,不合法。故选B。

7.以下合法的VB变量名是( )。 A) _x B) 2y C) a#b

第 11 页 共 96 页

D) x_1_x

参考答案:D

【解析】VB中变量的命名规则为:①必须以字母或汉字开头②由字母、汉字、数字或下划线组成③不能使用VB的保留字。_x不能以_下划线开头,不合法;2y不能以数字开头,不合法;a#b中有#,不合法;D选项符合命名规则,故D选项正确。

8.为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为( )。 A) Dim pi As Integer B) Dim pi(7)As Integer C) Dim pi As Single D) Dim pi As Long 参考答案:C

【解析】单精度Single或双精度Double型的变量能够保存浮点型小数,整型Integer和长整型Long的变量只能保存整型数据。本题中圆周率为3.14159,小数,可用定义一个Single或Double型变量来保存。故选C。

9.执行语句 Dim X, Y As Integer 后( )。 A) X和Y均被定义为整型变量 B) X和Y均被定义为变体类型变量

C) X被定义为整型变量,Y被定义为变体类型变量 D) X被定义为变体类型变量,Y被定义为整型变量 参考答案:D

【解析】声明变量时可以同时声明多个变量,但要分别说明每个变量的数据类型。如果定义变量时不说明数据类型,默认是Variant变体类型变量。

本题中用Dim同时定义了两个变量X、Y,变量X没说明数据类型,所以是Variant型变量,Y是整型变量。故选D选项正确。

10.设有如下程序:

Option Base 1

Dim a(3, 4)As Integer, b(4, 3)As Integer Private Sub Command1_Click() '循环1

For i=1 To 3 For j=1 To 4

b(j, i)=a(i, j) Next j Next i '循环2

x=b(1, 1) For i=1 To 4 For j=1 To 3

Print b(i, j);

If x

程序中的数组a已被赋值。以下关于上述程序的叙述中,正确的是( )。 A) 窗体模块中,不能使用Dim声明a、b数组 B) \循环1\可以正常运行

第 12 页 共 96 页

C) \循环2\中循环变量i、j的终值不对,所以不能正常运行

D) 程序可以正常运行,x中保存的是数组b中所有元素中最小的数 参考答案:B

【解析】Dim用于在标准模块、窗体模块或过程中定义变量或数组。程序可以正常运行,x中保存的是数组b元素中的最大值。

11.某人编写了向随机文件中写一条记录的程序,代码如下:

Type RType

Name As String * 10 Tel As String * 20 End Type

Private Sub Command1_Click() Dim p As RType

p.Name=InputBox(\姓名\ p.Tel=InputBox(\电话号\

Open \ Put #1, , p Close #1 End Sub

该程序运行时有错误,修改的方法是( )。 A)在类型定义\之前加上\B)Dim p As RType必须置于窗体模块的声明部分 C)应把Open语句中的For Random 改为 For Output D)Put语句应该写为Put #1,p.Name , p.Tel (36)有如下程序:

Private Sub Form_Click()

Dim s As Integer, p As Integer p=1

For i=1 To 4 For j=1 To i s=s+j Next j p=p * s Next i Print p End Sub

程序运行后,单击窗体,则输出结果是( )。 A) 在类型定义\之前加上\B) Dim p As RType必须置于窗体模块的声明部分 C) 应把Open语句中的For Random 改为 For Output D) Put语句应该写为Put #1,p.Name , p.Tel 参考答案:A

【解析】记录类型的定义必须放在模块的声明部分,当在标准模块中定义时,关键字Type前可以有Public(默认)或Private,而如果在窗体模块中定义,则必须在前面加上关键字Private。Open语句中使用For Random表示文件以随机方式存取。Put语句的语法为:Put #文件号,[记录号],变量。其中\变量\是除对象变量和数组变量外的任何变量。

12.设窗体文件中有下面的事件过程:

第 13 页 共 96 页

Private Sub Command1_Click() Dim s a%=100 Print a End Sub

其中变量a和s的数据类型分别是( )。 A) 整型,整型 B) 变体型,变体型 C) 整型,变体型 D) 变体型,整型 参考答案:C

【解析】变量s定义时没有指明数据类型,默认为Variant变体型。变量a是用整型的类型符号%声明,并同时赋值100,所以变量a的数据类型为整型。故C选项正确。 13.下面程序运行时,若输入 395 ,则输出结果是( )。

Private Sub Command1_Click() Dim x%

x=InputBox(\请输入一个3位整数\

Print x Mod 10,x\\100,(x Mod 100)\\10 End Sub A) 3 9 5 B) 5 3 9 C) 5 9 3 D) 3 5 9 参考答案:B

【解析】本题中x定义为整型变量,通过输入对话框输入395,按\确定\按钮后,InputBox函数把返回值395赋给变量x。表达式395 Mod 10 ,结果是5,395\\100结果为3,(395 Mod 100)\\10 的结果为9。故B选项正确。 14.有如下数据定义语句:

Dim X,Y As Integer 以上语句表明( )。 A) X、Y均是整型变量

B) X是整型变量,Y是变体类型变量 C) X是变体类型变量,Y是整型变量 D) X是整型变量,Y是字符型变量 参考答案:C

【解析】用Dim可同时定义多个变量,但变量要分别声明其数据类型,如果不声明数据类型,默认是Variant变体型变量。

本题中,变量X定义时没声明数据类型,所以为Variant型变量,变量Y是整型变量。故C选项正确。 15.为了声明一个长度为128个字符的定长字符串变量StrD,以下语句中正确的是( )。 A) Dim StrD As String

B) Dim StrD As String(128) C) Dim StrD As String[128] D) Dim StrD As String*128 参考答案:D

【解析】有定长和不定长的字符串变量。默认情况下,定义的字符串变量属于不定长的,字符串长度可以改变,比如:Dim str As String。如果声明一个定长字符串变量,形如Dim str As String *字符个数。故D选项正确。

第 14 页 共 96 页

16.有如下语句序列:

Dim a, b As Integer Print a Print b

执行以上语句序列,下列叙述中错误的是( )。 A) 输出的a值是0 B) 输出的b值是0 C) a是变体类型变量 D) b是整型变量 参考答案:A

【解析】任何变量在被声明后都会有一个初始值。一般情况下,数值型变量的初始值为0;字符串变量的初始值为空字符串;变体型变量的初始值为空值,即Null值;布尔型的初始值为假,即False。 本题中变量a定义时没有声明数据类型,默认为Variant变体型变量,默认值是Null;变量b定义为整型变量,默认值为0。所以输出a为空白,b为0 。故A选项错误。

17.若变量a未事先定义而直接使用(例如:a=0),则变量a的类型是( )。 A) Integer B) String C) Boolean D) Variant 参考答案:D

【解析】VB不要求必须先定义再使用。如果没有提前定义变量,就直接使用,系统就会将变量的数据类型指定为默认数据类型Variant变体型。故选D。 17.设有如下一段程序:

Private Sub Command1_Click() Static a As Variant

a=Array(\, \, \, \, \ Print a(3) End Sub

针对上述事件过程,以下叙述中正确的是( )。

A) 变量声明语句有错,应改为Static a(5)As Variant B) 变量声明语句有错,应改为Static a C) 可以正常运行,在窗体上显示three D) 可以正常运行,在窗体上显示four 参考答案:D

【解析】题目中变量a被定义为Variant类型,Variant 是一种特殊的数据类型,除了定长 String 数据及用户定义类型外,可以包含任何种类的数据。变量a被赋值为字符串数组,数组默认下标从0开始,因此元素a(3)的值为\。

18.工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是: Public x As Integer Private y As Integer 窗体文件的程序代码是: Dim a As Integer

Private Sub Form_Load() Dim b As Integer

a=2:b=3:x=10:y=20 End Sub

第 15 页 共 96 页