国家二级（VB）机试模拟试卷375
选择题
1.为了使文本框同时具有垂直和水平滚动条，应先把MultiLine属性设置为True，然后再把ScrollBars属性设置为( )。(D)
A. O
B. 1
C. 2
D. 3
解析：文本框的ScrollBars属性值，0表示无滚动条，1表爪只有水平滚动条，2表示只有垂直滚动条，3表示水平和垂直滚动条都有。故D选项正确。
2.在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为\\(D)
A. Option1.Value＝False
Check1.Value＝True
B. Option1.Value＝True
Check1.Value＝0
C. Option2.Value＝False
Check1.Value＝2
D. Option1.Value＝True
Check1.Value＝1
解析：单选按钮控件的Value属性值为True表示被选中，False表示未被选中；复选框控件的Value属性值为0表示未选中，1表示选中，2表示禁止。本题中是单选按钮和复选框都被选中，故D选项正确。
3.设有如下一段程序：
Private Sub Command1_Click()
Static a As Variant
a＝Array(\\(D)
A. 变量声明语句有错，应改为Static a(5)As Variant
B. 变量声明语句有错，应改为Static a
C. 可以正常运行，在窗体上显示three
D. 可以正常运行，在窗体上显示four
解析：题目中变量a被定义为Variant类型，Variant 是一种特殊的数据类型，除了定长 String 数据及用户定义类型外，可以包含任何种类的数据。变量a被赋值为字符串数组，数组默认下标从0开始，因此元素a(3)的值为\\
4.窗体上有一个名称为Command1的命令按钮，其事件过程如下：
Private Sub Command1_Click()
X=\\(D)
A. 信息框的标题是Basic
B. 信息框中的提示信息是Programming
C. c的值是函数的返回值
D. MsgBox的使用格式有错
解析：Right(x，11)是从字符串变量x右边取11个字符，即“Pmgramming”，这个字符串存入变量a中。Mid(x，7，5)是从字符串变量x的第7个字符开始取5个字符，即“Basic，此字符串存入变量b中。MsgBox的格式为：MsgBox(Prompt[，Button][，Title])，参数中只有Pmmpt是必需的，如果省略Button则显示一个确定按钮，因此题目显示的消息框有一个确定按钮，标题是“Basic”，信息是“Programming”。MsgBox的返回值是一个与所选按钮有关的整数。
5.要想使列表框只允许单选列表项，应设置的属性为( )。(C)
A. Style
B. Selected
C. MultiSelect
D. Enabled
解析：列表框的Style属性是设置列表框的外形；
Selected属性在程序运行中设置或返回列表项的选中状态；
Enabled属性设置列表框可用不可用；
MultSelect用来设置选择列表项的方式。0为默认，只允许单选列表项；1为复选，可同时选中一个或多个列表项，但要一个一个选中；2也为复选，可一个一个选中列表项，也可连续选中。故选C。
6.在E盘当前目录文件夹下建立一个名为“Student．txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序( )。
Pri vate Type student
StuName As String*10
StuGrade As String*10
StuAge As Integer
End Type
Private Sub Form Click()
Dim s As student
Open\\(C)
A. Print#1，s
B. Print#1，i
C. Put#1，s
D. Put#1，i
解析：本题考查文件操作。题目中要求以随机的方式(Random)打开一个文件，打开文件的格式为：Open FileName For Random As #文件号[Len=记录长度]，然后以Put命令写入一条记录，格式为：Put[#]文件号，[记录号]，变量名。若省略记录号，表示在当前记录号下写入记录型变量，逗号(，)不可以省略。
7.以下程序的功能是：把父目录下顺序文件smtextl.txt的内容读入内存，并在文本框Text3中显示出来。请选择适合横线处的语句( )。
Private Sub Commandl_Click( )
Dim inData As String
Text3．Text=““
Open”．．＼smtextl．txt” ________ AS#1
Do While___________
Input#1．inData
Text3．Text=Text3．Text&inData
Loop
Close#1
End Sub(A)
A. For Input Not EOF(1)
B. For Output EOF(1)
C. For Append Not EOF(1)
D. For Random EOF(1)
解析：考查文件的打开。打开顺序文件的基本格式为：Open FileName For Mode As#FileNumber。其中，FileName表示要打开的文件的路径；Mode为文件打开模式：OutPut用于输出、Append用于追加写入、Input用于读取；FileNumber为打开文件时指定的句柄(文件号)。中是需要读取顺序文件中的数据，因此打开模式为：Input；当通过Input#语句读取文件中数据时，为避免程序出错，常以Not EOF(文件号)作为循环条件，用于判断是否已到文件结尾。
8.下面是求最大公约数的函数的首部( )。
Function fun(By Val x As Integer，ByVal y As Integer)As Integer
若要输出8、12、16这3个数的最大公约数，
下面正确的语句是(D)
A. Print fun(8，12)，fun(12，16)，fun(16，8)
B. Print fun(8，12，16)
C. print fun(8，12)，fun(12，16)，fun(16)
D. Print fun(8，fun(12，16))
解析：函数过程在传递参数时，形参表与实参表中对应变量的名字不必相同，但参数的个数、对应位置和对应类型必须相同。本题中的fun函数有两个参数，任何对于fun的调用都必须传递实参为两个整犁值；选项A)中得到3个结果，显然不是我们所需要的；选项D)中的函数嵌套调用能够求出3个数的最大公约数
本文档预览：3600字符，共18570字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
