二级Visual+Basic语言程序设计模拟175.docx

1、二级Visual+Basic语言程序设计模拟175模拟 二级Visual Basic语言程序设计模拟175单项选择题第1题：下列叙述中，不属于设计准则的是( )。A.提高模块独立性B.使模块的作用域在该模块的控制域中C.设计成多入口、多出口模块D.设计功能可预测的模块参考答案：C 大量软件设计表明，以下的设计准则是可以借鉴为设计的指导和对软件结构图进行优化，这些准则是：提高模块独立性；模块规模适中：深度、宽度、扇出和扇入适当；使模块的作用域在该模块的控制域中；应减少模块的接口和界面的复杂性；设计成单入口、单出口的模块；设计功能可预测的模块。第2题：在窗体Form1上放一个名为Text1的文本框

2、和一个名为Command1的命令按钮，然后编写一个事件过程。要求程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“VB等级考试二级”。以下能正确实现上述操作的事件过程是_。A.Private Sub Text1Change() CommandlCaption=“VB等级考试二级” End SubB.rivate Sub Command1-Click() Caption=“VB等级考试二级” End SubC.Private Sub FormlClick() TextlCaption=“VB等级考试二级” End SubD.Private Sub CommandlClick()

3、Text1Text=“VB等级考试二级” End Sub参考答案：A 本题考查文本框的事件。文本框的Click事件是单击文本框时触发的，Change事件是每次文本框中文本发生改变时都触发的事件。题中要求当文本框的字符改变以后实现要求，因此应通过文本框的Change事件更改Commandl的Caption属性。第3题：窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据：Private Sub Command1_Click()Dim s1 As String, s2 As StringOpen c:d4.dat For Append A

4、s #3Line Input #3, s1Line Input #3, s2Text1.Text=s1+s2Close End Sub该程序运行时有错误，应该进行的修改是_。A.将Open语句中的For Append改为For InputB.将Line Input改为LineC.将两条Line Input语句合并为Line Input #3, s1, s2D.将Close语句改为Close #3参考答案：A 文件打开方式中的Append意味着打开的文件是顺序输出方式，也就是说打开文件是为了向其中写入数据的而不是要读出数据。因此Openc:d4.datFor Append As #3应该改为Op

5、en c:d4.dat For Input As #3。所以A选项正确。Clsoe语句中的文件号可以省略，这时会关闭所有打开的文件。 知识点 选项个数4 试题编号 分数 题目类型 难度第4题：以下叙述中正确的是()。A.任何时候都可以使用标准工具栏的”菜单编辑器”按钮打开菜单编辑器B.只有当代码窗口为当前活动窗口时，才能打开菜单编辑器C.只有当窗体设计窗口为当前活动窗体时，才能打开菜单编辑器D.任何时候都可以使用”工具”菜单下的”菜单编辑器”命令，打开菜单编辑器参考答案：C 考查菜单编辑器。在窗体设计界面中，可以使用”工具”菜单下的”菜单编辑器”命令，或使用工具栏上的菜单编辑器命令，来打开菜单

6、编辑器。在代码窗口中，菜单编辑器命令为灰色的，不可以使用。第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中有菜单，其结构如表。要求在程序运

7、行时，在Form1的文本框Text1中输入口令并按回车键(回车键的ASC码为13)后，隐藏Form1，显示Form2。若口令为”XSLNCER”，所有菜单项都可见：否则看不到”成绩录入”菜单项。为此，某人在Form1窗体文件中编写如下程序：Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii=1 3 ThenIf TexlText=“XSLNCER”ThenForm2inputVisible=TrueElseForm2inputVisible=FalseEnd If End IfForm1HideForm2ShowEnd Sub程

8、序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。下面修改方案中正确的是()。A.把2个Form2inputVisible中的”Form2”删去B.把Form1中Text1文本框及相关程序放到Form2窗体中C.把IfKeyAsii=13 Then改为IfKeyAscii=“XSLNCER”ThenD.把Form1Hide、Form2Show两行移动到2个EndIf之问参考答案：D 根据题干的描述，刚刚输入口令的第一个字符时就隐藏了Form1显示Form2，与预期的键入回车时才隐藏Form1显示Form2不符，可以判断是在进行KeyAscii条件判断时出了问题。观察代

9、码可以看到，Form1Hide和Form2Show语句处于KeyAscii=13的If判断之外，这样无论键入的第一个字符是否是回车都将执行这两条语句，造成了题干描述的错误现象。解决方案也很简单，只要把这两条语句移到两个End If之间，令其受到KeyAscii=13的If判断即可。第7题：下列叙述中正确的是_。A.软件交付使用后还需要进行维护B.软件一旦交付使用就不需要再进行维护C.软件交付使用后其生命周期就结束D.软件维护是指修复程序中被破坏的指令参考答案：A 知识点 选项个数4 试题编号 分数 题目类型 难度第8题：设窗体上有一个水平滚动条HScroll1和一个命令按钮Command1，及

10、下面的事件过程：Private Sub Form_Load()HScroll1.Min=0HScroll1.Max=100End SubPrivate Sub Command1_Click()HScroll1.Value=70End Sub程序运行时单击命令按钮，则滚动条上滚动块位置的图示是_。参考答案：C题目中程序运行时设置了水平滚动条所能表示的最小值为0，能表示的最大值为100，当单击命令按钮时，设置水平滚动条的当前位置为70，即在水平滚动条中部偏右的位置，按各个选项图形的所示，C选项的图示与题目相符。第9题：有如下过程：Private Sub Command1_Click()Dim Na

11、me As String * 20Open file1.dat For Random As #1 Len = 20k = 1Do While Not EOF(1)Get #1, k, NamePrint Namek = k + 2LoopClose #1End Sub这一过程的功能是 _A.读入文件file1.dat中所有记录号为偶数的记录并显示在窗体上B.读入文件file1.dat中所有记录号为奇数的记录并显示在窗体上C.读入文件file1.dat中记录号为1的记录并显示在窗体上D.把Name中的数据写进文件file1.dat中参考答案：B Open语句兼有打开文件和建立文件两种功能。Ope

12、n file1.dat For Random As #1 Len = 20以随机方式打开file1.dat，记录的长度为20个字节。EOF函数用来返回测试文件的结束状态，对于顺序文件来说，如果已达到文件尾，则函数返回值为True，否则返回值为False。利用EOF函数，可以避免在文件输入时出现输入超出文件尾的错误。EOF（n）的含义是已到达文件尾，Not EOF(n)的含义是没有到达n所对应文件的末尾。 Do While Not EOF(1)保证循环执行，直到已到达文件号为1的文件尾。Get#文件号，【记录号】，变量这一语句实现的功能是将一个打开的磁盘文件的一条记录读到一个变量中。Get #1

13、， k， Name，打开文件号1文件，将记录号为k的记录读到变量Name。Print Name将Name显示在窗体上。k的初始值为1，在循环中k=k+2，保证了循环中操作的记录号为奇数，即将读入文件file1.dat中所有记录号为奇数的记录显示在窗体上。故选项B正确，A项和C项表述错误。程序中并没有把Name中的数据写进文件file1.dat中的语句，故D项错误。故选择B项。第10题：窗体的MouseUp事件过程如下：Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)En

14、d Sub关于以上定义，以下叙述中错误的是_。A.根据Shift参数，能够确定使用转换键的情况B.根据X、Y参数可以确定触发此事件时鼠标的位置C.Button 参数的值是在MouseUp事件发生时，系统自动产生的D.MouseUp是鼠标向上移动时触发的事件参考答案：D MouseUp事件是鼠标松开时触发的事件过程，事件过程的Button参数值由系统产生，为被按下的键，Shift参数表示Shift、Ctrl和Alt键的状态，X、Y参数表示光标的当前位置。 知识点 选项个数4 试题编号 分数 题目类型 难度第11题：单击命令按钮时，下列程序的执行结果是（）。Private Sub Command1

15、_Click( )Dim a As Integer, b As Integer, c As Integera=3:b=4:c=5Print SecProc(c, b, a)End SubFunction FirProc(x As Integer, y As Integer, z As Integer)FirProc=2 * x + y + 3 * z+2End FunctionFunction SecProc(x As Integer, y As Integer, z As Integer)SecProc=FirProc(z, x, y)+ x+7End FunctionA.20B.25C.3

16、7D.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(

17、c，b，a)=25+5+7=37。第12题：假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片(注意，清除图片，而不是删除图片框)，应采用的正确方法是_。A.单击图片框，然后按Del键B.执行语句 Picture1.PictureLoadPicture()C.执行语句 Picture1.PictureD.执行语句：Picture1.Cls参考答案：B A选项按Del键不能删除图片；C选项中Pictue属性值不能为空字符串，语法错误；D选项中Cls方法只能清除图片上显示的内容，不能清除图片。要将图片框中的图片清除，用B选项方法可以。故B选项正确。第13题：设有下列二叉树：

18、对此二叉树前序遍历的结果为（）。A.ZBTYCPXAB.ATBZXCYPC.ZBTACYXPD.ATBZXCPY参考答案：B 本题考查二叉树的遍历。所谓二叉树的前序遍历（DLR），是指在访问根结点、遍历左子树与遍历右子树这三者中，首先访问根结点，然后遍历左子树，最后遍历右子树，并且，在遍历左右子树时，上述规则同样适用，即“根左右”，故该二叉树的前序遍历结果为“ATBZXCYP”。第14题：设窗体名称为form1。以下叙述中正确的是（ ）。A.运行程序时，能够加载窗体的事件过程是form1_LoadB.运行程序时，能够加载窗体的事件过程是Form1_LoadC.程序运行中用语句：form1.Na

19、me = New 可以更改窗体名称D.程序运行中用语句：form1.Caption = 新标题 可以改变窗体的标题参考答案：D 一个控件的事件过程由控件的实际名字（Name属性）、下划线和事件名称组成，而窗体事件过程由“Form”、下划线和事件名组成。因此，无论窗体名称是什么，加载窗体的事件过程总是Form_Load。窗体的名称即Name属性在程序运行时不可以更改，窗体的标题即Caption属性则可以在程序运行时更改。因此D）选项叙述正确。第15题：下列描述中，正确的是()。A.线性链表是线性表的链式存储结构B.栈与队列是非线性结构C.双向链表是非线性结构D.只有根结点的二叉树是线性结构参考答

20、案：A 根据数据结构中各数据元素之间前后关系的复杂程度，一般将数据结构分为两大类型：线性结构与非线性结构。如果一个非空的数据结构满足下列两个条件：有且只有一个根结点；每个结点最多有一个前件，也最多有一个后件。则称该数据结构为线性结构，又称线性表。所以线性表、栈与队列、线性链表都是线性结构，而二叉树是非线性结构。第16题：在计算机中，算法是指_。A.查找方法B.处理方法C.解题方案的准确而完整的描述D.排序方法参考答案：C 计算机算法是指解题方案的准确而完整的描述，它有以下几个基本特征：可行性、确定性、有穷性和拥有足够的情报。本题答案为C。 知识点 选项个数4 试题编号 分数 题目类型 难度第1

21、7题：VisualBasic60集成环境的主窗口中不包括()。A.标题栏B.菜单栏C.状态栏D.工具栏参考答案：C Visual Basic60集成环境的主窗口也称为设计窗口，它位于集成环境的顶部，该窗口由标题栏、菜单栏和工具栏组成。第18题：编写如下程序：Private Sub Command1_Click()Dim i As Integer, j As Integern=InputBox(输入一个大于1的正整数)For i=2 To nFor j=2 To Sqr(i)If i Mod j=0 Then Exit ForNext jIf jSqr(i)Then Print iNext iE

22、nd Sub该程序的功能是_。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的命令按钮，并编写如下程序：Private Type RecordID As Intege

23、rName As String * 20End TypePrivate Sub Command1_Click()Dim MaxSize,NextChar,MyCharOpen d:tempfemale.txt For Input As #1MaxSize = LOF(1)For NextChar = MaxSize To 1 Step -1MyChar = Input(1,#1)Next NextCharPrint EOF(1)Close #1End Sub运行程序，单击命令按钮，其输出结果为（ ）。A.TrueB.FalseC.0D.Null参考答案：A 程序中以顺序输入方式打开d：temp

24、female.txt文件。LOF函数用于取得打开文件的长度。EOF函数用于测试文件的是否结束。根据文件长度值，利用Input函数逐一取出文件中的字符，每读取一个字符，文件指针就自动下移，指向下一个字符。当执行最后一次循环时，Input函数读取了最后一个字符，文件指针再向下移动就会指向文件的结尾。因此当使用EOF函数测试文件是否结束时，就会返回True。所以，Print语句会直接输出“True”。因此本题答案为A）。第20题：为了使文本框中的文本能够水平滚动，应采取的正确方法是 _A.把文本框的ScrollBars属性设置为1-HorizontalB.把文本框的MultiLine属性设置为Tru

25、eC.同时把文本框的ScrollBars属性设置为1-Horizontal，MultiLine属性设置为TrueD.在文本框下面画一个长度与文本框宽度相同的水平滚动条控件参考答案：C ScrollBars属性用来确定文本框中有无滚动条，只有当MultiLine属性设置为True时，ScrollBars属性才有效。只有同时把文本框的ScrollBars属性设置为1-Horizontal，MultiLine属性设置为True时，文本框中的文本才能够水平滚动，故C正确，A项和B项都错误。D项不能满足题目需要，故错误。第21题：向文本框中输入字符时，下面能够被触发的事件是（ ）。A.GotFocusB

26、.KeyPressC.ClickD.MouseDown参考答案：B 向文本框中输入文本时，有按键的动作，因此会触发KeyPress事件。故选B。第22题：以下程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”，的条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容，在横线处应填写_。Private Sub Command 1 Click_x=Val(TextlText)If ThenPrint xElseTextlSetFocusTextlText=“”End IfEnd SubA.x4=1 And x5=2B.x4=1 Or x5=

27、2C.x Mod 4=1 And x Mod 5=2D.x Mod 4=1 Or x Mod 5=2参考答案：C 本题考查条件表达式的描述和如何获得焦点。题中的两个条件“除以4余1，除以5余2”关系为并列关系，可以表示为“x Mod 4=l And x Mod 5=2”。第23题：算法的空间复杂度是指（ ）。A.算法在执行过程中所需要的计算机存储空间B.算法所处理的数据量C.算法程序中的语句或指令条数D.算法在执行过程中所需要的临时工作单元数参考答案：A 算法的空间复杂度是指算法在执行过程中所需要的内存空间，因此本题答案为A）。第24题：在窗体Form1上放一个名为Text1的文本框和一个名为

28、Command1的命令按钮，然后编写 一个事件过程。要求程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设 置为“VB等级考试二级”。以下能正确实现上述操作的事件过程是( )。A.Private Sub Text l_Change() Command1Caption=”VB等级考试二级” End SubB.Private Sub Command 1_Click() Caption=”VB等级考试二级” End SubC.Private Sub Form1_Click() Text1Caption=”VB等级考试二级” End SubD.Private Sub Command 1_Cl

29、ick() Text1Text=”VB等级考试二级” End Sub参考答案：A 本题考查文本框的事件。文本框的Click事件是单击文本框时触发的，Change事件是每次文本框中文本发生改变时都触发的事件。题中要求当文本框的字符改变以后实现要求，因此应通过文本框的Change事件更改Command1的Caption属性。第25题：以下叙述中正确的是()。A.一个Sub过程至少要有一个Exit Sub语句B.一个Sub过程必须有一个End Sub语句C.可以在Sub过程中定义一个Function过程，但不能定义Sub过程D.调用一个Function过程可以获得多个返回值参考答案：B 考查过程。常

30、见过程分为Sub过程和Function函数过程。一个Sub过程必须有一个End Sub语句，二者是成对出现的。过程不可以嵌套定义，但可以嵌套调用。一个函数过程仅可以有一个返回值。第26题：目录列表框Path属性的作用是（）。A.显示当前驱动器或指定驱动器上的目录结构B.显示当前驱动器或指定驱动器上的某目录下的文件C.显示根目录下的文件名D.显示路径下的文件参考答案：A 文件控件中驱动器的Path属性适用于目录列表用来设置或返回当前驱动器的路径。第27题：在窗体上面一个命令按钮，名称为Command1，然后编写如下代码： Option Base 0 Private Sub Command1Click() Dim A1(4)As Integer，A2(4)As Integer For k：0 T0 2 A1(k+1)=InputBox(“请输入一个整数”) A2(3一k)=A1(k+1) Next k Print A2(k) End Sub