2014年全国计算机等级《二级VB》上机考试冲刺试题(3)

下列操作不能向工程中添加窗体的是（　　）。

下列选项中不属于软件生命周期开发阶段任务的是（　　）。

表达式"4+5/6*7/8 Mod 9"的值是（　　）。

数据库系统的核心是（　　）。

以下叙述中错误的是（　　）。

下列关于过程及过程参数的描述中，错误的是（　　）。

有下列事件过程：
Private Sub Co mmand1＿Click（　　）
b ＝10
Do Until b ＝－1
a＝InputBox（＂请输入a 的值＂）
a＝Val（a）
b ＝InputBox（＂请输入b 的值＂）
b ＝Va（b）
a＝a＊b
Loop
Print a
End Sub
程序运行后，依次输入数值30，20，10，－1后，输出结果是（　　）。

支持子程序调用的数据结构是（　　）。

对关系S和R进行集合运算，结果中既包含S中的所有元组也包含R中的所有元组，这样的集合运算称为（　　）。

窗体上有1个名称为List1的列表框，其中已经输入了若干个项目，如图所示；还有2个文本框，名称分别为Text1、Text2，1个名称为Command1的命令按钮，并有下列事件过程。
　　
Private Sub Co mmand1＿Click（）
Di mstr As Stri ng ，s As Stri ng ，k As Integer
s ＝Text1
str ＝＂＂
For k ＝List1．ListCount －1To 0Step －1
If InStr（List1．List（k），s）＞0Then
str ＝str ＆List1．List（k）＆＂＂
End If
Next k
If str ＝＂＂Then
Text2＝＂没有匹配的项目＂ Els
e Text2＝str
End If
End Sub
程序运行时，在Text1中输入＂京＂，单击命令按钮，则在Text2中显示的内容是（　　）。

执行以下程序段后，变量c$的值为（　　）。
a$＝＂Visual Basic Programi ng＂
b$＝＂Quick＂
c$＝b$＆UCase（Mid$（a$，7，6））＆Right$（a$，11）

刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（　　）。

关于MDI 窗体，下列说法正确的是（　　）。

在窗体（Name 属性为Form1）上画两个文本框（其Name 属性分别为Text1和Text2）和一个命令按钮（Name属性为Co mmand1），然后编写如下两个事件过程：
Private Sub Co mmand1＿Click（）
a＝Text1．Text ＋Text2．Text Print a
End Sub
Private Sub Form＿Load（）
Text1．Text ＝＂＂ Text2．Text ＝＂＂
End sub
程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为（　　）。

在C盘当前文件夹下建立一个名为SDat ．txt 的顺序文件。要求用InputBox 函数输入5名学生的学号（StuNo）、姓名（StuName）和英语成绩（StuEng）。则在下列横线处应填入的语句是（　　）。
Private Sub Form＿Click（）
Open ＂C：＼SDat ．txt＂For Output As 1
For i ＝1To 5
StuNo ＝InputBox（＂请输入学号＂）
StuName ＝InputBox（＂请输入姓名＂）
StuEng ＝Val（InputBox（＂请输入英语成绩＂））
Next i
Close ＃1
EndSub

目录列表框Path 属性所表示的含义是（　　）。

有下列函数过程：
Function Func2（a As Integer ，b As Integer）As Integer
Static m As Integer ，i As Integer
m＝0
i ＝2
a＝i ＋m＋1
b ＝i ＋a＋b
Func2＝m
End Function
在窗体上画一个命令按钮，然后编写下列事件过程：
Private Sub Co mmandl＿Click（）
Di m P As Integer ，k As Integer ，m As Integer
k ＝4
m＝1
P＝Func2（k ，m）
Print k ；m
P＝Func2（km）
Print k ＝m End Sub
程序运行后，单击命令按钮，输出结果是（　　）。

在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（　　）。

下列叙述菜单设计的语句正确的是（　　）。

下列各控件不包含滚动条的控件是（　　）。

要将名为MyForm 的窗体显示出来，正确的使用方法是（　　）。

在面向对象方法中，不属于"对象"基本特点的是（　　）。

为了使列表框中的项目分为多列显示，需要设置的属性为（　　）。

在窗体上有1个名称为Co mmonDialog1的通用对话框和1个名称为Co mmand1的命令按钮，以及其他一些控件。要求在程序运行时，单击Co mmand1按钮，则显示打开文件对话框，并在选择或输入了1个文件名后，就可以打开该文件。下列是Co mmand1＿Click 事件过程的两种算法。
算法1：
Private Sub Co mmand1＿Click（）
Co mmonDialogl ．ShowOpen
Open Co mmonDialogl ．File Name For Input As ＃1
End Sub
算法2：
Private Sub Co mmand1＿Click（）
Co mmonDialogl ．ShowOpen
If Co mmonDialogl ．File Name ＜＞＂＂Then
Open Co mmonDialogl ．File Name For Input As ＃1
EndIf
End Sub
下列关于这两种算法的叙述中正确的是（　　）。

下列叙述正确的是（　　）

在窗体上画一个命令按钮，其名称为Commandl。程序运行后，单击命令按钮，输出结果是（　　）。
Private Sub pl （n As Integer）
For i ＝n To 1Step ＝1
x＝Stri ng（i ，＂＊＂）
Print x
Next i
End Sub
Private Sub Commandl＿Click（）
pl（3）
EndSub

在窗体上画一个名称为Co mmand1的命令按钮，并编写以下程序：
Private Sub Co mmand1＿Click（）
Di mn ％，b ，t
t ＝1：b ＝1：n ＝2
Do
b ＝b＊n
t ＝t ＋b
n ＝n ＋1
Loop Until n ＞9
Print t
End Sub
此程序计算并输出一个表达式的值，该表达式是（　　）。

在用通用对话框控件建立"保存"文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件（即．txt 文件），则正确的描述格式是（　　）。

有三个关系R、S 和T 如下：
　　
由关系R 和S 通过运算得到关系T，则所使用的运算为（　　）。

对长度为n 的线性表进行顺序查找，在最坏情况下所需要的比较次数为（　　）。

下列程序要求用户输入一个年份，并能够判断用户输入的年份是否是闰年，横线处应填（　　）。
Sub EnSure（　　）
Di myear As Integer
year ＝Val（InputBox（＂请输入年份：＂））
If（year Mod 4＝0_________year Mod 100＜＞0）
________（year Mod 400＝0）Then
Print ＂您输入的是闰年＂
Else
Print ＂不是闰年，是普通年份＂
End If
End Sub

设有下列程序
Private Sub Form＿Click（）
x＝50
For i ＝1To 4
y ＝InputBox（＂请输入一个整数＂）
y ＝Val（y）
If y Mod 5＝0Then
a＝a＋y
x＝y
Else
a＝a＋x
End If
Next i
Print a
End Sub
程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为（　　）。

要清除已经在图片框Picturel 中打印的字符串而不清除图片框中的图像，应使用语句（　　）。

下列选项中不符合良好程序设计风格的是（　　）。

下列说法错误的是（　　）。

两个或两个以上模块之间关联的紧密程度称为（　　）。

假定在工程文件中有一个标准模块，其中定义了如下记录类型：
Type Books
Name As Stri ng＊10
TelNum As Stri ng＊20
End Type
要求在执行事件过程Co mmand1＿Click 时，在顺序文件Person ．txt 中写入一条记录。下列能够完成该操作的事件过程是（　　）。

窗体上有两个文本框Textl、Text2以及一个命令按钮Commandl ，编写下列程序：
Di mY As Integer
Private Sub Commandl＿Click（）
Di m X As Integer
x＝2
Textl ．Text ＝p2（p1（X），Y）
Text2．Text ＝pl（x）
End Sub
Private Function pl（X As Integer）As Integer
x＋x＋y∶y ＝x＋y
pl ＝x＋y
End Function
Private Function p2（X As Integer ，Y As Integer）As Integer
p2＝2＊x＋y
End Function
当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为（　　）。

窗体文件的扩展名是（　　）。

请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。
（1）在名称为Form1的窗体上放置一个名称为Drive1的驱动列表框控件，一个名称为Dir1的目录列表框控件、一个名称为File1的文件列表框控件。程序运行时，可以对系统中的文件进行浏览。如图46-1所示。
　　
图46-1
注意：程序中不得使用任何变量；保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp。
（2）在名称为Form1的窗体上放置一个名为Label1的标签控件和一个名为Timer1的计时器控件，程序运行后，文本框中显示的是当前的时间，而且每一秒文本框中所显示的时间都会随时间的变化而改变，并且显示的字体为四号宋体字，如图46-2所示。
　　
图46-2
注意：程序中不得使用任何变量；保存时必须存放在考生文件夹下，窗体文件名为sj2.frm，工程文件名为sj2.vbp。

（1）在窗体上建立一个二级菜单，该菜单含有"文件"和"编辑"（名称分别为vbFile和vbEdit）两个主菜单项，其中"文件"菜单包括"打开"、"保存"和"关闭"3个子菜单项（名称分别为vbOpen、vbSave和vbClose）。在名称为Form1的窗体上建立两个主菜单，其标题分别为"文件"和"编辑"，名称分别为vbFile和vbEdit，在"文件"菜单下有3个子菜单项，标题分别为"打开"、"保存"和"关闭"，名称分别为vbOpen、vbSave和vbClose。要求程序运行后，如果选中"文件"下的某个菜单项，则通过MsgBox对话框显示该菜单项的标题，如图31-3所示。
　　
图31-3
注意：保存时必须存放在考生文件夹下，窗体文件名为sj3.frm，工程文件名为sj3.vbp。
（2）在考生文件夹下有工程文件sj4.vbp及窗体文件sj4.frm，该程序是不完整的，请在有"?"的地方填入正确内容，然后删除"?"及代码前的所有注释符（即'号），但不能修改其他部分。存盘时不得改变文件名和文件夹。
在窗体上建立一个名称为Command1，标题为"计算"的命令按钮，再建立一个名称为Text1的文本框。运行界面如图31-4所示。要求程序运行后，若单击"计算"按钮，将计算200~350之间所有素数的和，在文本框中显示结果，同时把结果存入文件out.txt中。（在考生文件夹中有标准模块mode.bas,其中的writedata过程可以把结果存入文件，而isprimenum函数可以判断整数x是否为素数，如果是素数，则函数返回True，否则返回False，考生可以把该模块文件添加到自己的工程中。）
　　
图31-4

在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm，该程序是不完整的，请在有"?"的地方填入正确内容，然后删除"?"及代码前的所有注释符（即'号），但不能修改其他部分。存盘时不得改变文件名和文件夹。
窗体Form1中有一命令按钮与一个水平滚动条。命令按钮的名称为Command1，标题为"移动"；水平滚动条的名称为HScroll1。单击"移动"按钮后，在弹出的对话框中输入数值。输入一个整数后，单击"移动"，滚动条中的滚动块移动到指定的刻度，如果超过了滚动条的最大刻度，则不移动，并且在窗体上显示"输入的数值太大"，如果超过了滚动条的最小刻度，则不移动，并且在窗体上显示"输入的数值太小"。如图8-5所示。
　　
图8-5