二级Visual+Basic语言程序设计模拟95 (1)

[模拟] 二级Visual Basic语言程序设计模拟95

单项选择题

第1题：

在窗体上画一个名称为Textl的文本框，然后画．3个单选按钮，并用这3个单选按钮建立一个名为option1的控件数组，程序运行后，如果单击某个单选按钮，则文本框中的字体根据所选择的单选按钮切换，如图1所示。请选择适合空白处的语句____。

Private Sub Option 1——Click(Index As Integer)

Select Case

Case 0：a=“宋体”

Case 1：a：“黑体”

Case 2：a=“楷体GB2312”

End Select

Text1____=a

End Sub

A.Option Text

B.Index Text

C.Index．Font

D.Option Font

参考答案：C

本题考查控件数组。Optionl数组中每个元素的名字为Optionl，依靠不同的Index属性来区分不同的控件。变量a表示选择不同按钮后的不同字体，字体名属性为Font属性集的默认属性(FontName)，这里可以直接使用Font属性。

第2题：

窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。编写如下程序：

Private Sub Command1＿Click()

Dim X As Integer

x=Val(InputBox(“输入数据”))

Text1=Str(x+fun(X)+fun(X))

End Sub

Private Function fun(ByRef n As Integer)

If n Mod 3=0 Then

n＝n+n

Else

n＝n*n

End If

fun=n

End Function

对于上述程序，以下叙述中错误的是( )。

A.语句fun=n有错，因为n是整型，fun没有定义类型

B.运行程序，输入值为5时，文本框中显示655

C.运行程序,输入值为6时，文本框中显示42

D.ByRef表示参数按址传递

参考答案：A

过程fun的功能是将传入的值运算后返回，当传入数值为3的整数倍时返回该值的2倍，否则返回该值的平方。过程Fun的参数指定为ByRef方式，即按址传递，因此会影响实参的值。str函数是将数值转换为字符串。过程fun定义时没有指明返回类型因此默认为Variant类型，它可以表示任何值，因此A选项的说法不正确。

第3题：

现有如下语句：

x=IIf(a 〉50，Int(a＼3)，a Mod 2)

当a=52时，x的值是( )。

A.0

B.1

C.17

D.18

参考答案：C

首先计钎：h(a＼3)即Int(52＼3)=Int(17)=17，52 MOD 2结果为0。再计算IIf(52 〉50，17，0)，52 〉50结果为Tme，所以IIF函数返回17，则x值为17，故选C。

第4题：

窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。设有如下的类型声明：

Type Person

name As String*8

majorAs String*20

End Type

当单击命令按钮时，将两个文本框中的内容写入一个随机文件Test．dat中。设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是()。

A.Open”c：＼Test．dat”ForRandomAs#1 Put#1，1，p Close#1

B.Open”c：＼Test．dat”For Random As#1 Get#1，1,p Close#1

C.Open”c：＼Test．dat”For Random As#1 Len=Len(p) Put #1，1,p Close#1

D.Open”c：＼Test．dat”For Random As#1 Len=Len(p) Get#1，1，p Close#1 参考答案：C

考查随机文件读写。以Random打开随机文件的格式为：Open 文件名For RandomAs#文件号 [Len=记录长度]，该语句可以进行读写操作，写操作格式为：Put#文件号，[记录号],变量名，可以将一个记录变量的内容写到指定的记录位置处，如果忽略记录号，则表示在当前记录后的位置插入一条记录。读操作格式为：Get[#] 文件号，[记录号]，变量名，如果忽略记录号，则读出当前记录后面的那一条记录。

第5题：

以下叙述中错误的是()。

A.一个工程中可以包含多个窗体文件

B.在一个窗体文件中用Private定义的通用过程能被其他窗体调用

C.全局变量必须在标准模块中定义

D.在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件

参考答案：B

考查工程和窗体。VB中一个工程可以包含多个窗体或者多个标准模块、类模块等，这些文件的扩展名不同。标准模块中经常定义全局变量或者全局过程，在一个窗体中用Private定义的过程，作用域为整个窗体，而不是整个工程。

第6题：

以下叙述中错误的是____。

A.在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件

B.以.BAS为扩展名的文件是标准模块文件

C.窗体文件包含该窗体及其控件的属性

D.一个工程中可以含有多个标准模块文件

参考答案：A

第7题：

下列叙述中正确的是____。

A.一个逻辑数据结构只能有一种存储结构

B.数据的逻辑结构属于线性结构,存储结构属于非线性结构

C.一个逻辑数据结构可以有多种存储结构,且各种存储结构不影响数据处理的效率

D.一个逻辑数据结构可以有多种存储结构,且各种存储结构影响数据处理的