二级Visual+Basic语言程序设计模拟175.docx
《二级Visual+Basic语言程序设计模拟175.docx》由会员分享，可在线阅读，更多相关《二级Visual+Basic语言程序设计模拟175.docx（22页珍藏版）》请在冰豆网上搜索。
二级Visual+Basic语言程序设计模拟175
[模拟]二级VisualBasic语言程序设计模拟175
单项选择题
第1题：
下列叙述中，不属于设计准则的是（）。
A.提高模块独立性
B.使模块的作用域在该模块的控制域中
C.设计成多入口、多出口模块
D.设计功能可预测的模块
参考答案：
C
大量软件设计表明，以下的设计准则是可以借鉴为设计的指导和对软件结构图进行优化，这些准则是：
提高模块独立性；模块规模适中：
深度、宽度、扇出和扇入适当；使模块的作用域在该模块的控制域中；应减少模块的接口和界面的复杂性；设计成单入口、单出口的模块；设计功能可预测的模块。
第2题：
在窗体Form1上放一个名为Text1的文本框和一个名为Command1的命令按钮，然后编写一个事件过程。
要求程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“VB等级考试二级”。
以下能正确实现上述操作的事件过程是____。
A.PrivateSubText1—Change（）Commandl．Caption=“VB等级考试二级”EndSub
B.rivateSubCommand1-Click（）Caption=“VB等级考试二级”EndSub
C.PrivateSubForml—Click（）Textl．Caption=“VB等级考试二级”EndSub
D.PrivateSubCommandl—Click（）Text1．Text=“VB等级考试二级”EndSub
参考答案：
A
本题考查文本框的事件。
文本框的Click事件是单击文本框时触发的，Change事件是每次文本框中文本发生改变时都触发的事件。
题中要求当文本框的字符改变以后实现要求，因此应通过文本框的Change事件更改Commandl的Caption属性。
第3题：
窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。
以下程序的功能是从顺序文件中读取数据：
PrivateSubCommand1_Click（）
Dims1AsString,s2AsString
Open"c:
\d4.dat"ForAppendAs#3
LineInput#3,s1
LineInput#3,s2
Text1.Text=s1+s2
Close
EndSub
该程序运行时有错误，应该进行的修改是______。
A.将Open语句中的ForAppend改为ForInput
B.将LineInput改为Line
C.将两条LineInput语句合并为LineInput#3,s1,s2
D.将Close语句改为Close#3
参考答案：
A
文件打开方式中的Append意味着打开的文件是顺序输出方式，也就是说打开文件是为了向其中写入数据的而不是要读出数据。
因此Open"c:
\d4.dat"ForAppendAs#3应该改为Open"c:
\d4.dat"ForInputAs#3。
所以A选项正确。
Clsoe语句中的文件号可以省略，这时会关闭所有打开的文件。
[知识点][选项个数]4[试题编号][分数][题目类型][难度]
第4题：
以下叙述中正确的是（）。
A.任何时候都可以使用标准工具栏的”菜单编辑器”按钮打开菜单编辑器
B.只有当代码窗口为当前活动窗口时，才能打开菜单编辑器
C.只有当窗体设计窗口为当前活动窗体时，才能打开菜单编辑器
D.任何时候都可以使用”工具”菜单下的”菜单编辑器”命令，打开菜单编辑器
参考答案：
C
考查菜单编辑器。
在窗体设计界面中，可以使用”工具”菜单下的”菜单编辑器”命令，或使用工具栏上的菜单编辑器命令，来打开菜单编辑器。
在代码窗口中，菜单编辑器命令为灰色的，不可以使用。
第5题：
复选框是否被选中，取决于复选框的（）。
A.Enabled属性
B.Value属性
C.Checked属性
D.Visible属性
参考答案：
B
考查复选框的常见属性。
复选框的Enabled属性决定复选框是否可用，Value属性决定复选框是否选定，其属性值有3种：
0-Unchecked：
表示未被选定，1-Checked：
选定，2-Grayed：
灰色，禁止选择；Visible属性决定其是否可见；复选框没有Checked属性。
第6题：
设工程中有2个窗体：
Form1、Form2，Form1为启动窗体。
Form2中有菜单，其结构如表。
要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键（回车键的ASCⅡ码为13）后，隐藏Form1，显示Form2。
若口令为”XSLNCER”，所有菜单项都可见：
否则看不到”成绩录入”菜单项。
为此，某人在Form1窗体文件中编写如下程序：
PrivateSubText1_KeyPress（KeyAsciiAsInteger）
IfKeyAscii=13Then
IfTexl．Text=“XSLNCER”Then
Form2．input．Visible=True
Else
Form2．input．Visible=False
EndIf
EndIf
Form1．Hide
Form2．Show
EndSub
程序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。
下面修改方案中正确的是（）。
A.把2个Form2．input．Visible中的”Form2”删去
B.把Form1中Text1文本框及相关程序放到Form2窗体中
C.把IfKeyAsii=13Then改为IfKeyAscii=“XSLNCER”Then
D.把Form1．Hide、Form2．Show两行移动到2个EndIf之问
参考答案：
D
根据题干的描述，刚刚输入口令的第一个字符时就隐藏了Form1显示Form2，与预期的键入回车时才隐藏Form1显示Form2不符，可以判断是在进行KeyAscii条件判断时出了问题。
观察代码可以看到，Form1．Hide和Form2．Show语句处于KeyAscii=13的If判断之外，这样无论键入的第一个字符是否是回车都将执行这两条语句，造成了题干描述的错误现象。
解决方案也很简单，只要把这两条语句移到两个EndIf之间，令其受到KeyAscii=13的If判断即可。
第7题：
下列叙述中正确的是______。
A.软件交付使用后还需要进行维护
B.软件一旦交付使用就不需要再进行维护
C.软件交付使用后其生命周期就结束
D.软件维护是指修复程序中被破坏的指令
参考答案：
A
[知识点][选项个数]4[试题编号][分数][题目类型][难度]
第8题：
设窗体上有一个水平滚动条HScroll1和一个命令按钮Command1，及下面的事件过程：
PrivateSubForm_Load（）
HScroll1.Min=0
HScroll1.Max=100
EndSub
PrivateSubCommand1_Click（）
HScroll1.Value=70
EndSub
程序运行时单击命令按钮，则滚动条上滚动块位置的图示是____。
参考答案：
C
题目中程序运行时设置了水平滚动条所能表示的最小值为0，能表示的最大值为100，当单击命令按钮时，设置水平滚动条的当前位置为70，即在水平滚动条中部偏右的位置，按各个选项图形的所示，C选项的图示与题目相符。
第9题：
有如下过程：
PrivateSubCommand1_Click（）
DimNameAsString*20
Open"file1.dat"ForRandomAs#1Len=20
k=1
DoWhileNotEOF
（1）
Get#1,k,Name
PrintName
k=k+2
Loop
Close#1
EndSub
这一过程的功能是____
A.读入文件file1.dat中所有记录号为偶数的记录并显示在窗体上
B.读入文件file1.dat中所有记录号为奇数的记录并显示在窗体上
C.读入文件file1.dat中记录号为1的记录并显示在窗体上
D.把Name中的数据写进文件file1.dat中
参考答案：
B
Open语句兼有打开文件和建立文件两种功能。
Open"file1.dat"ForRandomAs#1Len=20以随机方式打开file1.dat，记录的长度为20个字节。
EOF函数用来返回测试文件的结束状态，对于顺序文件来说，如果已达到文件尾，则函数返回值为True，否则返回值为False。
利用EOF函数，可以避免在文件输入时出现"输入超出文件尾"的错误。
EOF（n）的含义是已到达文件尾，NotEOF（n）的含义是没有到达n所对应文件的末尾。
DoWhileNotEOF
（1）保证循环执行，直到已到达文件号为1的文件尾。
Get#文件号，【记录号】，变量这一语句实现的功能是将一个打开的磁盘文件的一条记录读到一个变量中。
Get#1，k，Name，打开文件号1文件，将记录号为k的记录读到变量Name。
PrintName将Name显示在窗体上。
k的初始值为1，在循环中k=k+2，保证了循环中操作的记录号为奇数，即将读入文件file1.dat中所有记录号为奇数的记录显示在窗体上。
故选项B正确，A项和C项表述错误。
程序中并没有把Name中的数据写进文件file1.dat中的语句，故D项错误。
故选择B项。
第10题：
窗体的MouseUp事件过程如下：
PrivateSubForm_MouseUp（ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle）
……
EndSub
关于以上定义，以下叙述中错误的是______。
A.根据Shift参数，能够确定使用转换键的情况
B.根据X、Y参数可以确定触发此事件时鼠标的位置
C.Button参数的值是在MouseUp事件发生时，系统自动产生的
D.MouseUp是鼠标向上移动时触发的事件
参考答案：
D
MouseUp事件是鼠标松开时触发的事件过程，事件过程的Button参数值由系统产生，为被按下的键，Shift参数表示Shift、Ctrl和Alt键的状态，X、Y参数表示光标的当前位置。
[知识点][选项个数]4[试题编号][分数][题目类型][难度]
第11题：
单击命令按钮时，下列程序的执行结果是（ ）。
PrivateSubCommand1_Click（）
DimaAsInteger,bAsInteger,cAsInteger
a=3:
b=4:
c=5
PrintSecProc（c,b,a）
EndSub
FunctionFirProc（xAsInteger,yAsInteger,zAsInteger）
FirProc=2*x+y+3*z+2
EndFunction
FunctionSecProc（xAsInteger,yAsInteger,zAsInteger）
SecProc=FirProc（z,x,y）+x+7
EndFunction
A.20
B.25
C.37
D.32
参考答案：
C
此题程序代码中用了嵌套调用，我们对这样的问题要多加小心，千万不要把实参和相对应的形参弄混。
主调过程Command1_Click输出的是SecProc（c,b,a）的返回值，调用过程SecProc时，主调过程分别把实参c、b、a地址传给形参x、y、z，此时在过程SecProc中，SecProc=FirProc（a，c，b）＋7。
由此看出，程序段执行此语句时，将调用过程FirProc。
把实参a、c、b的地址分别传给形参x、y、z，此时在过程FirProc中，FirProc=2*x+y+3*z+2，所以FirProc（a，c，b）=6+5+12+2=25，SecProc（c，b，a）=25+5+7=37。
第12题：
假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片（注意，清除图片，而不是删除图片框），应采用的正确方法是____。
A.单击图片框，然后按Del键
B.执行语句Picture1.Picture＝LoadPicture（""）
C.执行语句Picture1.Picture＝""
D.执行语句：
Picture1.Cls
参考答案：
B
A选项按Del键不能删除图片；C选项中Pictue属性值不能为空字符串，语法错误；D选项中Cls方法只能清除图片上显示的内容，不能清除图片。
要将图片框中的图片清除，用B选项方法可以。
故B选项正确。
第13题：
设有下列二叉树：
对此二叉树前序遍历的结果为（ ）。
A.ZBTYCPXA
B.ATBZXCYP
C.ZBTACYXP
D.ATBZXCPY
参考答案：
B
本题考查二叉树的遍历。
所谓二叉树的前序遍历（DLR），是指在访问根结点、遍历左子树与遍历右子树这三者中，首先访问根结点，然后遍历左子树，最后遍历右子树，并且，在遍历左右子树时，上述规则同样适用，即“根－左－右”，故该二叉树的前序遍历结果为“ATBZXCYP”。
第14题：
设窗体名称为form1。
以下叙述中正确的是（）。
A.运行程序时，能够加载窗体的事件过程是form1_Load
B.运行程序时，能够加载窗体的事件过程是Form1_Load
C.程序运行中用语句：
form1.Name="New"可以更改窗体名称
D.程序运行中用语句：
form1.Caption="新标题"可以改变窗体的标题
参考答案：
D
一个控件的事件过程由控件的实际名字（Name属性）、下划线和事件名称组成，而窗体事件过程由“Form”、下划线和事件名组成。
因此，无论窗体名称是什么，加载窗体的事件过程总是Form_Load。
窗体的名称即Name属性在程序运行时不可以更改，窗体的标题即Caption属性则可以在程序运行时更改。
因此D）选项叙述正确。
第15题：
下列描述中，正确的是（）。
A.线性链表是线性表的链式存储结构
B.栈与队列是非线性结构
C.双向链表是非线性结构
D.只有根结点的二叉树是线性结构
参考答案：
A
根据数据结构中各数据元素之间前后关系的复杂程度，一般将数据结构分为两大类型：
线性结构与非线性结构。
如果一个非空的数据结构满足下列两个条件：
①有且只有一个根结点；②每个结点最多有一个前件，也最多有一个后件。
则称该数据结构为线性结构，又称线性表。
所以线性表、栈与队列、线性链表都是线性结构，而二叉树是非线性结构。
第16题：
在计算机中，算法是指______。
A.查找方法
B.处理方法
C.解题方案的准确而完整的描述
D.排序方法
参考答案：
C
计算机算法是指解题方案的准确而完整的描述，它有以下几个基本特征：
可行性、确定性、有穷性和拥有足够的情报。
本题答案为C。
[知识点][选项个数]4[试题编号][分数][题目类型][难度]
第17题：
Visual．Basic6．0集成环境的主窗口中不包括（）。
A.标题栏
B.菜单栏
C.状态栏
D.工具栏
参考答案：
C
VisualBasic6．0集成环境的主窗口也称为设计窗口，它位于集成环境的顶部，该窗口由标题栏、菜单栏和工具栏组成。
第18题：
编写如下程序：
PrivateSubCommand1_Click（）
DimiAsInteger,jAsInteger
n=InputBox（"输入一个大于1的正整数"）
Fori=2Ton
Forj=2ToSqr（i）
IfiModj=0ThenExitFor
Nextj
Ifj＞Sqr（i）ThenPrinti
Nexti
EndSub
该程序的功能是______。
A.判断n是否为素数
B.输出n以内所有的奇数
C.输出n以内所有的偶数
D.输出n以内所有的素数
参考答案：
D
假设输入2、4、9进行验证，输入2时程序会输出2，输入4时，程序会输出2、3，可见程序不是判断n是否为素数，所以A不对。
由前面验证可知，程序也不是输出n以内的所以奇数或偶数，所以B、C也不对。
如果输入9时，程序会输出2、3、5、7，说明程序是输出n以内的所有素数，所以D正确。
[知识点][选项个数]4[试题编号][分数][题目类型][难度]
第19题：
在窗体上画一个名称为Command1的命令按钮，并编写如下程序：
PrivateTypeRecord
IDAsInteger
NameAsString*20
EndType
PrivateSubCommand1_Click（）
DimMaxSize,NextChar,MyChar
Open"d:
\temp\female.txt"ForInputAs#1
MaxSize=LOF
（1）
ForNextChar=MaxSizeTo1Step-1
MyChar=Input（1,#1）
NextNextChar
PrintEOF
（1）
Close#1
EndSub
运行程序，单击命令按钮，其输出结果为（）。
A.True
B.False
C.0
D.Null
参考答案：
A
程序中以顺序输入方式打开d：
\temp\female.txt文件。
LOF函数用于取得打开文件的长度。
EOF函数用于测试文件的是否结束。
根据文件长度值，利用Input函数逐一取出文件中的字符，每读取一个字符，文件指针就自动下移，指向下一个字符。
当执行最后一次循环时，Input函数读取了最后一个字符，文件指针再向下移动就会指向文件的结尾。
因此当使用EOF函数测试文件是否结束时，就会返回True。
所以，Print语句会直接输出“True”。
因此本题答案为A）。
第20题：
为了使文本框中的文本能够水平滚动，应采取的正确方法是____
A.把文本框的ScrollBars属性设置为1-Horizontal
B.把文本框的MultiLine属性设置为True
C.同时把文本框的ScrollBars属性设置为1-Horizontal，MultiLine属性设置为True
D.在文本框下面画一个长度与文本框宽度相同的水平滚动条控件
参考答案：
C
ScrollBars属性用来确定文本框中有无滚动条，只有当MultiLine属性设置为True时，ScrollBars属性才有效。
只有同时把文本框的ScrollBars属性设置为1-Horizontal，MultiLine属性设置为True时，文本框中的文本才能够水平滚动，故C正确，A项和B项都错误。
D项不能满足题目需要，故错误。
第21题：
向文本框中输入字符时，下面能够被触发的事件是（）。
A.GotFocus
B.KeyPress
C.Click
D.MouseDown
参考答案：
B
向文本框中输入文本时，有按键的动作，因此会触发KeyPress事件。
故选B。
第22题：
以下程序段的功能是：
从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”，的条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容，在横线处应填写____。
PrivateSubCommand1Click____
x=Val（Textl．Text）
IfThen
Printx
Else
Textl．SetFocus
Textl．Text=“”
EndIf
EndSub
A.x％4=1Andx％5=2
B.x％4=1Orx％5=2
C.xMod4=1AndxMod5=2
D.xMod4=1OrxMod5=2
参考答案：
C
本题考查条件表达式的描述和如何获得焦点。
题中的两个条件“除以4余1，除以5余2”关系为并列关系，可以表示为“xMod4=lAndxMod5=2”。
第23题：
算法的空间复杂度是指（）。
A.算法在执行过程中所需要的计算机存储空间
B.算法所处理的数据量
C.算法程序中的语句或指令条数
D.算法在执行过程中所需要的临时工作单元数
参考答案：
A
算法的空间复杂度是指算法在执行过程中所需要的内存空间，因此本题答案为A）。
第24题：
在窗体Form1上放一个名为Text1的文本框和一个名为Command1的命令按钮，然后编写 一个事件过程。
要求程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设 置为“VB等级考试二级”。
以下能正确实现上述操作的事件过程是（）。
A.PrivateSubTextl_Change（）Command1．Caption=”VB等级考试二级”EndSub
B.PrivateSubCommand1_Click（）Caption=”VB等级考试二级”EndSub
C.PrivateSubForm1_Click（）Text1．Caption=”VB等级考试二级”EndSub
D.PrivateSubCommand1_Click（）Text1．Text=”VB等级考试二级”EndSub
参考答案：
A
本题考查文本框的事件。
文本框的Click事件是单击文本框时触发的，Change事件是每次文本框中文本发生改变时都触发的事件。
题中要求当文本框的字符改变以后实现要求，因此应通过文本框的Change事件更改Command1的Caption属性。
第25题：
以下叙述中正确的是（）。
A.一个Sub过程至少要有一个ExitSub语句
B.一个Sub过程必须有一个EndSub语句
C.可以在Sub过程中定义一个Function过程，但不能定义Sub过程
D.调用一个Function过程可以获得多个返回值
参考答案：
B
考查过程。
常见过程分为Sub过程和Function函数过程。
一个Sub过程必须有一个EndSub语句，二者是成对出现的。
过程不可以嵌套定义，但可以嵌套调用。
一个函数过程仅可以有一个返回值。
第26题：
目录列表框Path属性的作用是（ ）。
A.显示当前驱动器或指定驱动器上的目录结构
B.显示当前驱动器或指定驱动器上的某目录下的文件
C.显示根目录下的文件名
D.显示路径下的文件
参考答案：
A
文件控件中驱动器的Path属性适用于目录列表用来设置或返回当前驱动器的路径。
第27题：
在窗体上面一个命令按钮，名称为Command1，然后编写如下代码：
OptionBase0
PrivateSubCommand1＿Click（）
DimA1（4）AsInteger，A2（4）AsInteger
Fork：
0T02
A1（k+1）=InputBox（“请输入一个整数”）
A2（3一k）=A1（k+1）
Nextk
PrintA2（k）
EndSub
升级会员 