国家二级（VB）机试模拟试卷15（共359题）

国家二级（VB）机试模拟试卷15（共9套）（共359题）国家二级（VB）机试模拟试卷第1套一、选择题(本题共40题，每题1.0分，共40分。)1、支持子程序调用的数据结构是()。A、栈B、树C、队列D、二叉树标准答案：A知识点解析：栈支持子程序调用。栈是一种只能在一端进行插入或删除的线性表，在主程序调用子函数时要首先保存主程序当前的状态，然后转去执行子程序，最终把子程序的执行结果返回到主程序中调用子程序的位置，继续向下执行，这种调用符合栈的特点，因此本题的答案为A。2、下列叙述中正确的是()。A、栈是"先进先出"的线性表B、队列是"先进后出"的线性表C、循环队列是非线性结构D、有序线性表既可以采用顺序存储结构，也可以采用链式存储结构标准答案：D知识点解析：栈是先进后出的线性表，所以A错误；队列是先进先出的线性表，所以B错误；循环队列是线性结构的线性表，所以C错误。3、对于循环队列，下列叙述中正确的是()。A、队头指针是固定不变的B、队头指针一定大于队尾指针C、队头指针一定小于队尾指针D、队头指针可以大于队尾指针，也可以小于队尾指针标准答案：D知识点解析：循环队列的队头指针与队尾指针都不是固定的，随着入队与出队操作要进行变化。因为是循环利用的队列结构所以对头指针有时可能大于队尾指针有时也可能小于队尾指针。4、算法的空间复杂度是指()。A、算法在执行过程中所需要的计算机存储空间B、算法所处理的数据量C、算法程序中的语句或指令条数D、算法在执行过程中所需要的临时工作单元数标准答案：A知识点解析：算法的空间复杂度是指算法在执行过程中所需要的内存空间。所以选择A。5、算法的有穷性是指()。A、算法程序的运行时间是有限的B、算法程序所处理的数据量是有限的C、算法程序的长度是有限的D、算法只能被有限的用户使用标准答案：A知识点解析：算法原则上能够精确地运行，而且人们用笔和纸做有限次运算后即可完成。有穷性是指算法程序的运行时间是有限的。6、对长度为n的线性表排序，在最坏情况下，比较次数不是n(n－1)/2的排序方法是()。A、快速排序B、冒泡排序C、直接插入排序D、堆排序标准答案：D知识点解析：除了堆排序算法的比较次数是O(nlog2n)，其他的都是n(n－1)/2。7、在面向对象方法中，不属于"对象"基本特点的是()。A、一致性B、分类性C、多态性D、标识唯一性标准答案：A知识点解析：对象有如下一些基本特点：标识唯一性、分类性、多态性、封装性、模块独立性好。所以选择A。8、一间宿舍可住多个学生，则实体宿舍和学生之间的联系是()。A、一对一B、一对多C、多对一D、多对多标准答案：B知识点解析：因为一间宿舍可以住多个学生即多个学生住在一个宿舍中，但一个学生只能住一间宿舍，所以实体宿舍和学生之间是一对多的关系。9、有两个关系R，S如下：由关系R通过运算得到关系S，则所使用的运算为()。A、选择B、投影C、插入D、连接标准答案：B知识点解析：投影运算是指对于关系内的域指定可引入新的运算。本题中S是在原有关系R的内部进行的，是由R中原有的那些域的列所组成的关系。所以选择B。10、将E－R图转换为关系模式时，实体和联系都可以表示为()。A、属性B、键C、关系D、域标准答案：C知识点解析：从E－R图到关系模式的转换是比较直接的，实体与联系都可以表示成关系，E－R图中属性也可以转换成关系的属性。11、在VB集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，这个按钮是()。A、B、C、D、标准答案：D知识点解析：无法重复，运行，添加标准EXE工程，结束运行。D选项正确。12、设x是整型变量，与函数IIf(x>0，－x，x)有相同结果的代数式是()。A、|x|B、－|x|C、xD、－x标准答案：B知识点解析：IIF函数是条件函数，本题的含义是如果x>0条件成立，即x为正数，就返回－x，即x的负数，否则返回x(它本身)，两种情况都是返回负数。根据这一点，选项B符合要求。故B选项正确。13、以下选项中，不合法的VisualBasic的变量名是()。A、a5bB、_xyzC、a_bD、andif标准答案：B知识点解析：VB中变量的命题贵族为：①必须以字母或汉子开头②有字母、汉子、数学或下划线组成③不能使用VB已经占用的关键词。本题选项B中变量以下划线开头，不合法。故B选项错误。14、以下数组定义语句中，错误的是()。A、Statica(10)AsIntegerB、Dimc(3，1To4)C、Dimd(－10)D、Dimb(0To5，1To3)AsInteger标准答案：C知识点解析：定义数组有2种格式：第1种格式：数组每一维的只给出下标的上界，即可以使用的下标的最大值。格式为Dim|public|private|static<数组名>(上界，[上界…])[As类型名]形如：Dima(5)AsInterger，Dimb(4,5)AsInteger这种形式，数组各维的下标的下界只能为0或1，而且下标的上界>＝下界。本题中C选项下标上界－10<0或1，故A选项正确，C选项错误。第2种格式：数组的每一维下标的上界和下界都说明。格式为Dim|public|private|static<数组名>((下界to上界)[，(下界to上界)…])形如：Dima(－2to5)AsIntergerDima(1to3，2to6)AsInterger这种形式，数组各维下标的下界没有限制，只要保证下标的上界>＝下界就行。故D选项正确。以上两种形式也可以混合使用。故B选项也正确。15、以下关于过程及过程参数的描述中，错误的是()。A、调用过程时可以用控件名称作为实际参数B、用数组作为过程的参数时，使用的是"传地址"方式C、只有函数过程能够将过程中处理的信息传回到调用的程序中D、窗体(Form)可以作为过程的参数标准答案：C知识点解析：过程定义时，形参除了可以是整型、单精度、双精度等数据类型外，还可以是控件或窗口等对象型。相对应的调用过程时实参也可以是一般数据类型、控件名或窗体。故A、D选项正确。调用过程时，如果过程的参数是数组，则实参传给形参的是地址，这个地址是用数组名表示的一个符号地址，是数组的起始地址，形参和实参用的是同一个地址，在过程中形参的改变会引起实参的改变。故B选项正确。在过程调用时，不只是函数过程能把过程中处理的信息传回到调用程序中，Sub过程也可以。Sub过程中形参声明时前面有关键字ByRef或省略ByRef(默认)时，实参和形参之间传递的是地址，Sub过程中形参的变化也会引起实参的变化，这样Sub过程中处理的信息也可以传回调用程序中。故C选项说法错误。16、在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明：PrivateTypePersonnameAsString*8majorAsString*20EndTypeDimpAsPerson设文本框中的数据已正确地赋值给Person类型的变量p，当单击"保存"按钮时，能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是()。A、Open"c：\Test2.dat"ForOutputAs#1Put#1，1，pClose#1B、Open"c：\Test2.dat"ForRandomAs#1Get#1，1，pClose#1C、Open"c：\Test2.dat"ForRandomAs#1Len＝Len(p)Put#1，1，pClose#1D、Open"c：\Test2.dat"ForRandomAs#1Len＝Len(p)Get#1，1，pClose#1标准答案：C知识点解析：在VB中可以访问的文件有：顺序文件、随机文件和二进制文件。不同文件存取方式不同，但处理的步骤大致一样：①用Open语句打开文件，并为文件制定一个文件号。根据文件的的存取方式使用不同的模式打开文件。本题是随机文件，读写的是一条一条的记录，所以用ForRandom模式打开，记录的长度为Person类型变量p的长度。②从文件中读出数据进行处理或处理数据后，把数据写入文件。本题是把变量的数据写入随机文件，所以用Put语句写入。③文件操作结束，关闭文件。各种文件关闭统一用Close#文件号关闭。综合一下，故选C。17、下面有关标准模块的叙述中，错误的是()。A、标准模块不完全由代码组成，还可以有窗体B、标准模块中的Private过程不能被工程中的其他模块调用C、标准模块的文件扩展名为.basD、标准模块中的全局变量可以被工程中的任何模块引用标准答案：A知识点解析：标准模块中只包含其他窗体模块中公用的一些变量、过程等代码，不包括窗体。故选项A错误。标准模块中用Private声明的过程属于私有过程，只能被它所在的模块中的其他过程调用，不能被工程中其他模块调用，用Public声明的全局变量属于公用变量，可以被工程中的任何模块引用。标准模块的文件扩展名是.bas。18、可以产生30～50(含30和50)之间的随机整数的表达式是()。A、Int(Rnd*21＋30)B、Int(Rnd*20＋30)C、Int(Rnd*50－Rnd*30)D、Int(Rnd*30＋50)标准答案：A知识点解析：因为Rnd函数产生的随机数范围是大于等于0而小于1。要产生30～50(含30和50)之间的随机整数，可先产生0～(50－30)，即0～20之间的随机整数，然后在这个基础上再加上30。Rnd*20生成0～20之间的随机数中不包括20，所以要用Int(Rnd*21)可产生0～20之间的随机整数，然后加上30，综合起来就是Int(Rnd*21＋30)，故A选项正确。19、下面程序运行时，若输入395，则输出结果是()。PrivateSubCommand1_Click()Dimx%x＝InputBox("请输入一个3位整数")PrintxMod10，x\100，(xMod100)\10EndSubA、395B、539C、593D、359标准答案：B知识点解析：本题中x定义为整型变量，通过输入对话框输入395，按"确定"按钮后，InputBox函数把返回值395赋给变量x。表达式395Mod10，结果是5,395\100结果为3，(395Mod100)\10的结果为9。故B选项正确。20、某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中：PrivateSubCommand1_Click()Open"out.txt"ForOutputAs#2Print"Text1"Close#2EndSub调试时发现没有达到目的，为实现上述目的，应做的修改是()。A、把Print"Text1"改为Print#2，Text1B、把Print"Text1"改为PrintText1C、把Print"Text1"改为Write"Text1"D、把所有#2改为#1标准答案：A知识点解析：要把文本框中的内容写入文本文件中，首先要用Open语句的ForOutput模式打开文本文件，并为文件制定一个文件号，然后，用Print语句将文本写入文本文件，最后关闭文件。本题中Click事件过程中第1、3条语句正确。第2条语句Print语句的格式是：Print#文件号，要写入的内容，原语句错误。根据格式按选项A修改正确，故A选项正确。21、为了使文本框同时具有垂直和水平滚动条，应先把MultiLine属性设置为True，然后再把ScrollBars属性设置为()。A、0B、1C、2D、3标准答案：D知识点解析：文档的ScrollBars属性值，0表示无滚动条，1表示只有水平滚动条，2表示只有垂直滚动条，3表示水平和垂直滚动条都有。故D选项正确。22、文本框Text1的KeyDown事件过程如下：PrivateSubText1_KeyDown(KeyCodeAsInteger，ShiftAsInteger)...EndSub其中参数KeyCode的值表示的是发生此事件时()。A、是否按下了Alt键或Ctrl键B、按下的是哪个数字键C、所按的键盘键的键码D、按下的是哪个鼠标键标准答案：C知识点解析：参数KeyCode返回的是所按键的键码，而且大小写字母键码值相同。故选C。23、在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为"宋体"和"黑体"；1个复选框(名称为Check1，标题为"粗体")和1个文本框(名称为Text1，Text属性为"改变文字字体")，窗体外观如图所示。程序运行后，要求"宋体"单选按钮和"粗体"复选框被选中，则以下能够实现上述操作的语句序列是()。A、Option1.Value＝FalseCheck1.Value＝TrueB、Option1.Value＝TrueCheck1.Value＝0C、Option2.Value＝FalseCheck1.Value＝2D、Option1.Value＝TrueCheck1.Value＝1标准答案：D知识点解析：单选按钮控件的Value属性值为True表示被选中，False表示未被选中；复选框控件的Value属性值为0表示未选中，1表示选中，2表示禁止。本题中是单选按钮和复选框都被选中，故D选项正确。24、以下说法中正确的是()。A、当焦点在某个控件上时，按下一个字母键，就会执行该控件的KeyPress事件过程B、因为窗体不接受焦点，所以窗体不存在自己的KeyPress事件过程C、若按下的键相同，KeyPress事件过程中的KeyAscii参数与KeyDown事件过程中的KeyCode参数的值也相同D、在KeyPress事件过程中，KeyAscii参数可以省略标准答案：A知识点解析：B选项错误原因：窗体有自己的KeyPress事件过程；C选项错误原因：KeyPress事件过程中的KeyAscii参数返回按键的ASCII码值，大小写字母返回值不同；而KeyDown事件过程中的KeyCode参数返回的是按键代码，大小写字母返回值相同。故按下的键相同时，keyAscii和KeyCode参数不一定返回相同值；D选项错误原因：KeyPress事件中的KeyAscii参数不能省略。A选项正确。25、下列关于通用对话框CommonDialog1的叙述中，错误的是()。A、只要在"打开"对话框中选择了文件，并单击"打开"按钮，就可以将选中的文件打开B、使用CommonDialog1.ShowColor方法，可以显示"颜色"对话框C、CancelError属性用于控制用户单击"取消"按钮关闭对话框时，是否显示出错警告D、在显示"字体"对话框前，必须先设置CommonDialog1的Flags属性，否则会出错标准答案：A知识点解析：打开对话框主要用来获取用户指定的文件信息并供程序使用，对话框本身并不提供打开文件功能，这些功能需另外编写代码才能实现，所以在"打开"对话框中可选中某文件，但不能打开。故A选项错误。26、在利用菜单编辑器设计菜单时，为了把组合键"Alt＋X"设置为"退出(X)"菜单项的访问键，可以将该菜单项的标题设置为()。A、退出(X&)B、退出(&X)C、退出(X#)D、退出(#X)标准答案：B知识点解析：要使菜单项的快捷键设置为Alt＋字母，就要在菜单项的标题中设置为&＋字母。本题把"Alt＋X"设置为"退出(X)"菜单项，则菜单项的标题设置为"退出(&X)"。故选B。27、以下能够触发文本框Change事件的操作是()。A、文本框失去焦点B、文本框获得焦点C、设置文本框的焦点D、改变文本框的内容标准答案：D知识点解析：改变文本框中的内容时就会触发它的Change事件，故选D。28、假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片(注意，清除图片，而不是删除图片框)，应采用的正确方法是()。A、单击图片框，然后按Del键B、执行语句Picture1.Picture＝LoadPicture("")C、执行语句Picture1.Picture＝""D、执行语句：Picture1.Cls标准答案：B知识点解析：A选项按Del键不能删除图片；C选项中Pictue属性值不能为空字符串，语法错误；D选项中Cls方法只能清除图片上显示的内容，不能清除图片。要将图片框中的图片清除，用B选项方法可以。故B选项正确。29、窗体上有一个名称为Frame1的框架(如图)，若要把框架上显示的"Frame1"改为汉字"框架"，下面正确的语句是()。A、Frame1.Name＝"框架"B、Frame1.Caption＝"框架"C、Frame1.Text＝"框架"D、Frame1.Value＝"框架"标准答案：B知识点解析：框架的Name属性是设置框架的名称；Caption属性设置框架的标题，是在框架的左上角显示的内容；框架控件没有Text和Value属性。故B选项正确。30、在窗体上画一个名称为Combo1的组合框，名称为Text1的文本框，以及名称为Command1的命令按钮，如图所示。运行程序，单击命令按钮，将文本框中被选中的文本添加到组合框中，若文本框中没有选中的文本，则将文本框中的文本全部添加到组合框中。命令按钮的事件过程如下：PrivateSubCommand1_Click()IfText1.Se1Length<>0ThenElseCombo1.AddItemText1EndIfEndSub程序中横线处应该填写的是()。A、Combo1.AddItemText1.TextB、Combo1.AddItemText1.SelStartC、Combo1.AddItemText1.SelTextD、Combo1.AddItemText1.SelLength标准答案：C知识点解析：根据题意可知，横线处应该是将文本框中选中文本添加到组合框中。文本框Text属性返回整个文本框中的文本，故A选项错误；SelStart属性返回选中文本的起始位置，故B选项错误；SelLength属性返回选中文本的长度，故D选项错误；SelText属性返回选中的文本，故C选项正确。31、设有如下一段程序：PrivateSubCommand1_Click()StaticaAsVarianta＝Array("one"，"two"，"three"，"four"，"five")Printa(3)EndSub针对上述事件过程，以下叙述中正确的是()。A、变量声明语句有错，应改为Statica(5)AsVariantB、变量声明语句有错，应改为StaticaC、可以正常运行，在窗体上显示threeD、可以正常运行，在窗体上显示four标准答案：D知识点解析：题目中变量a被定义为Variant类型，Variant是一种特殊的数据类型，除了定长String数据及用户定义类型外，可以包含任何种类的数据。变量a被赋值为字符串数组，数组默认下标从0开始，因此元素a(3)的值为"four"。32、求1！＋2！＋……＋10！的程序如下：PrivateFunctions(xAsInteger)f＝1Fori＝1Toxf＝f*iNexts＝fEndFunctionPrivateSubCommand1_Click()DimiAsIntegerDimyAsLongFori＝1To10NextPrintyEndSub为实现功能要求，程序的横线处应该填入的内容是()。A、Calls(i)B、CallsC、y＝y＋s(i)D、y＝y＋s标准答案：C知识点解析：题目中过程s的功能是实现一个数的阶乘，而题目是求1到10的阶乘的和，则程序空缺处应该是过程s返回值的累加，因此就应该为y＝y＋s(i)。33、窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：PrivateSubText1_KeyUp(KeyCodeAsInteger，ShiftAsInteger)DimcAsStringc＝UCase(Chr(KeyCode))Text2.Text＝Chr(Asc(c)＋2)EndSub当向文本框Text1中输入小写字母a时，文本框Text2中显示的是()。A、AB、aC、CD、c标准答案：C知识点解析：KeyDown和KeyUp事件的KeyCode参数返回的是"键"，即按字母"A"和"a"时得到的KeyCode的值是相同的，都是&H41。因此程序中对输入"a"时得到的KeyCode，经Chr函数转为字符后为"A"，经Ucase函数转换仍为"A"，所以变量c中的字符为"A"。Asc(c)将返回变量c中的第一个字符的ASCII，加2后，再由Chr函数转为字符即为"A"后面的第2个字符，即"C"。所以答案应为选项C。34、设窗体上有一个文本框Text1和一个命令按钮Command1，并有以下事件过程：PrivateSubCommand1_Click()DimsAsString，chAsStrings＝""Fork＝1ToLen(Text1)ch＝Mid(Text1，k，1)s＝ch＋sNextkText1.Text＝sEndSub程序执行时，在文本框中输入"Basic"，然后单击命令按钮，则Text1中显示的是()。A、BasicB、cisaBC、BASICD、CISAB标准答案：B知识点解析：Len函数返回字符串的长度，Mid函数为字符串中部截取函数格式为：Mid(字符串，起始位置，长度)。程序中，For循环的终值是Text1中输入的字符串的长度，即"Basic"的长度，为5。循环体中Mid函数从第一个字符开始依次取出一个字符，然后与上次取出的字符连接，本次取出的字符在前，上次取出的字符在后。最终变量s中应该是"cisaB"。35、假定有以下函数过程：FunctionFun(SAsString)AsStringDims1AsStringFori＝1ToLen(S)s1＝LCase(Mid(S，i，1))＋s1NextiFun＝s1EndFunction在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimStr1AsString，Str2AsStringStr1＝InputBox("请输入一个字符串")Str2＝Fun(Str1)PrintStr2EndSub程序运行后，单击命令按钮，如果在输入对话框中输入字符串"abcdefg"，则单击"确定"按钮后在窗体上的输出结果为()。A、ABCDEFGB、abcdefgC、GFEDCBAD、gfedcba标准答案：D知识点解析：程序中过程Fun的For循环的功能是从参数字符串中依次取出一个字符经Lcase函数转为小写字母后存入另一个字符串变量的首部，即将输入的字符串转为小写并倒序排列。函数Len用于返回字符串的长度，过程中字符串的长度做为For循环的终值。Mid是字符串中部截取函数，用来从指定位置开始截取指定个数的字符。过程中使用Mid(S，i，1)，通过循环依次取出字符串的字符，然后使本次取出的字符连接到之前取出的字符前面，实现了字符串倒序排列。程序中输入字符串为"abcdefg"，倒序并转为小写后为"gfedcba"。36、为计算an的值，某人编写了函数power如下：PrivateFunctionpower(aAsInteger，nAsInteger)AsLongDimsAsLongp＝aFork＝1Tonp＝p*aNextkpower＝pEndFunction在调试时发现是错误的，例如Printpower(5,4)的输出应该是625，但实际输出是3125。程序需要修改。下面的修改方案中有3个是正确的，错误的一个是()。A、把Fork＝1Ton改为Fork＝2TonB、把p＝p*a改为p＝p^nC、把Fork＝1Ton改为Fork＝1Ton－1D、把p＝a改为p＝1标准答案：B知识点解析：程序中计算an的算法有误，由于已经将a的值赋给了p，在后边的For循环中再乘n次a显然就多乘了一次a，因此，要改正此程序或者将p＝a改为p＝1，或者将fork＝1ton改成fork＝1ton－1或fork＝2ton。而B选项将p＝p*a改为p＝p^n将会导致p＝p^n执行n次，得不到正确结果。37、窗体上有名称分别为Text1、Text2的文本框，名称为Command1的命令按钮。运行程序，在Text1中输入"FormList"，然后单击命令按钮，执行如下程序：PrivateSubCommand1_Click()Text2.Text＝UCase(Mid(Text1.Text，5，4))EndSub在Text2中显示的是()。A、formB、listC、FORMD、LIST标准答案：D知识点解析：Mid为中部截取函数，格式为Mid(字符串，起始位置，长度)，Ucase函数的作用是把字符串中的小写字母转换为大写字母。题目中Mid函数截取字符串"FormList"第5个字符开始的4个字符，结果为"List"，Ucase函数把"List"全部变为大写，即"LIST"。38、窗体上有名称为Command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1(Simple)，并有如下事件过程：PrivateSubCommand1_Click()Fori＝0ToList1.ListCount－1IfList1.Selected(i)＝TrueThenList2.AddItemTextEndIfNextEndSub上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是()。A、将For循环的终值改为List1.ListCountB、将List1.Selected(i)＝True改为List1.List(i).Selected＝TrueC、将List2.AddItemText改为List2.AddItemList1.List(i)D、将List2.AddItemText改为List2.AddItemList1.ListIndex标准答案：C知识点解析：题目程序不能将List1中的选中项添加到List2中，List2.AddItemText一行有误，应该改为List2.AddItemList1.List(i)才能使List1中每个选中的行添加到List2中。列表框控件的List属性保存了列表框中所有值的数组，可以通过下标访问数组中的值。39、窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。窗体文件的程序如下：PrivateTypexaAsIntegerbAsIntegerEndTypePrivateSubCommand1_Click()DimyAsxy.a＝InputBox("")Ify.a\2＝y.a/2Theny.b＝y.a*y.aElsey.b＝Fix(y.a/2)EndIfText1.Text＝y.bEndSub对以上程序，下列叙述中错误的是()。A、x是用户定义的类型B、InputBox函数弹出的对话框中没有提示信息C、若输入的是偶数，y.b的值为该偶数的平方D、Fix(y.a/2)把y.a/2的小数部分四舍五入，转换为整数返回标准答案：D知识点解析：x是用户定义的一种变量类型，可以使用它来声明变量。InputBox("")函数的提示信息为""，即为空，因此弹出的对话框中没有提示信息。在程序中通过比较输入的数被2整除和被2除的值是否相等来判定它是否为偶数，如果是那么y.b的值就是y.a的值的平方。Fix函数是取整函数，它会删除小数部分，直接取表达式的整数部分，不四舍五入，因此D选项错。40、设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。Form1的代码如下：PublicxAsIntegerPrivateSubForm_Load()x＝1y＝5EndSubPrivateSubCommand1_Click()Form2.ShowEndSubForm2的代码如下：PrivateSubCommand1_Click()PrintForm1.x，yEndSubModule1的代码如下：PublicyAsInteger运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是()。A、15B、05C、00D、程序有错标准答案：A知识点解析：在Form1窗体模块中x被定义为全局变量，这使得它的值可以在其他模块中通过"过程名.变量名"的形式被引用。而变量y在标准模块中被定义为全局变量，则它可以在工程的每个模块，每个过程中使用。因此程序运行时，x赋值为1，y赋值为5，它们的值都可以在Form2中引用。二、基本操作题(本题共1题，每题1.0分，共1分。)41、(1)在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2，标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2，初始内容均为空)和一个命令按钮(名称为Command1，标题为“显示”)。然后编写命令按钮的Click事件过程。程序运行后，在两个文本框中分别输入姓名和年龄，然后单击“显示”按钮，则在窗体上显示两个文本框中的内容，如图所示。要求程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1．vbp，窗体文件名保存为sit1．frm。(2)在名称为Form1的窗体上画一个图片框，其名称为Picture1，一个水平滚动条，名称为HScroll1，一个命令按钮，名称为Command1，标题为“设置属性”，通过属性窗口在图片框中装入一个图形(文件名为pic1．jpg，位丁考生目录下)，图片框的高度与图形的高度相同，图片框的宽度任意(如图1所示)。编写适当的事件过程，程序运行后，如果单击命令按钮，则设置水平滚动条的属性如下：Min100Max1500．LargeChange100SmallChange10之后就可以通过移动滚动条上的滚动块来放大或缩小图片框。程序运行后的窗体如图2所示。要求程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。标准答案：步骤1：新建一个窗体，按照题目要求建立控件并设置相应属性。程序中用到的控件及属性如表3．16所示。步骤2：打开代码编辑窗门，在指定位置编写如下代码。PrivateSubCommandlClick()Form1．PrintText1．Text＆"，现年"＆Text2．Text＆"岁"EndSub步骤3：调试并运行程序，关闭程序后按题目要求存盘。(2)步骤1：新建一个窗体，添加控件并设置相应的属性。程序中用到的控件及其属性见表3．17。步骤2：打开代码编辑窗口，在指定位置编写如下代码。PrivateSubCommandlClick()HScrolii．Max=1500’设置滚动务的最大值、最小值、最大改变值、最小改变值HSCr0111．Min=100HScrolii．LargeChange=100HScrolll．SmallChange=10EndSubPrivateSubHScrolllchange()Picturel．Width=HScrolii．Value’将图片的width与滚动条的Value保持一致EndSub步骤3：调试并运行程序，关闭程序后按题目要求存盘。知识点解析：(1)通过标签的Name和Caption属性设置标签的名称和标题，通过文本框Name和Text属性设置文本框的名称和文本，通过命令按钮的Name和Caption属性设置命令按钮的名称和标题，“＆”和“+”运算符均可将两个表达式作为字符串连接。在窗体上输出文本内容可使用Print方法。(2)在设计阶段通过Picture属性为图片框指定显示的图片，通过Width属性来设定或修改图片框的宽度。通过调整滚动条滑块的位置即可改变其Value属性的值。滚动条的Max和Min属性限定了滚动条所能表示的最大值和最小值，LargeChangc属性用丁设置当单击滑块与两侧箭头间区域时Value属性值的改变量，SmallChange属性用于设置当单击滚动条两侧箭头时Value属性值的改变量。当改变滚动条滑块位置后将触发其Change事件。三、简单应用题(本题共1题，每题1.0分，共1分。)42、(1)在考生文件夹下有一个工程文件sjt3．vbp。程序的功能是：1)程序运行时，文件列表框显示当前文件夹中的所有扩展名为jpg的文件。2)双击文件列表框中某个图片文件名时，能在图像框中显示出该张图片，并将该图片文件的信息(包括路径及文件名)显示到标签中。3)“下一张”命令按钮的功能：选中并显示卜次选中文件的下一个图片文件(如果文件列表框中没有被选中的图片文件或上次选中的是最后一个文件名，则从第1个图片文件开始)。在当前程序所在文件夹中，已经提供了所需要的图片文件，运行时窗体如图所示。在给出的窗体文件中已经有了全部控件，但程序不完整。请将事件过程中的注释符去掉，把?改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。(2)在考生文件夹下有一个工程文件sjt4．vbp。程序的功能是：程序运行时，文本框中显示一篇英文短文，单击“查找”按钮时可输入查找内容，如图1所示。若未找到查找内容，查找结束；若找到查找内容，被找到的内容在文本框中以反相显示(即呈选中状态)，每找到一次都给出提示，并在左下角文本框中显示累计的次数，如图2所示，若单击提示对话框的“是”按钮，则继续向后查找；若单击“否”按钮，则终止查找。在给出的窗体文件中已经有了全部控件，但程序不完整。请将事件过程中的注释符去掉，把?改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。标准答案：步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。PrivateSubCommandlClick()IfFile1．ListIndex＝－1OrFile1．ListIn．dex＝File1．ListCount－1ThenFile1．LiStIndex=0E1SeIfFile1．ListIndex>=0ThenFile1．ListIndex=File1．ListIndex＋1EndIfEndIfShowInforEndSubPrivateSubFilel_DblClick()CallShowInforEndSubPrivateSubShowInfor()Labell．Caption=App．Path+""+File1．FileNameImage1．Picture=LoadPicture(Label1．Caption)EndSubPrivateSubForm_Load()Filel．Path=App．PathFile1．Pattern＝"*．jpg"EndSub步骤3：调试并运行程序，关闭程序后按题目要求存盘。(2)步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。PrivateSubCommand1_Click()DimfstrAsString，ostrAsStringDimtimesAsInteger，posAsIntegerDimansAsIntegerfstr=InputBox("输入待查内容"，"查找")Iffstr=""ThenExitSubEndIftimes=0ostr=Text1．Textpos=InStr(1，ostr，fstr)DoWhilepos<>0Text1．SelStart=pos-1Text1．SelLength=Len(fstr)times=times+1Text2．Text=timesans=MsgBox("找到了，是否继续查找?"，vbYes-No)Ifans=vbYesThenpos=pos+Len(fstr)pos=Irstr(pos,ostr,fstr)E1seExjtDoEndIfLoopEndSub步骤3：调试并运行程序。关闭程序后按题目要求存盘。知识点解析：(1)文件列表框(FileListBox)控件的常用属性使用，包括Pattern属性、FileName属性、ListCount属性、ListIndex属性。其中：Listlndex属性用来设置或返回当前控件上所选择项目的“索引值”(即下标)。在文件列表框中，第一项的索引值为0，第二项为1，以此类推。如果没有选中任何项，则ListIndex属性的值将被设置为一1。(2)本题主要考察文本框控件属性的使用。包括SelLength属性和selstan属性。其中Selstart属性为定义当前选择的文本的起始位置。0表示选择的开始位置在第一个字符之前，1表示从第二个字符之前开始选择，以此类推；SelLength属性为当前选中的字符数，可以在程序中把该属性设置为一个整数值。还有就是字符串匹配函数InStr的用法。四、综合应用题(本题共1题，每题1.0分，共1分。)43、在考生文件夹下有一个工程文件sjt5．vbp，相应的窗体文件为sjt5．frm，此外还有一个名为datain．txt的文本文件，其内容如下：32437658281298573142536475869713243546576879805937程序运行后单击窗体，将把文件datain．txt中的数据输入二维数组Mat中，按5行5列的矩阵形式显示在窗体上，然后交换矩阵第二列和第四列的数据，将交换后的矩阵显示在窗体上，如图所示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的?改为正确的内容(可以是多行)，使其实现上述功能，但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。标准答案：步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。OptionBase1PrivateSubFormC1ick()ConstN=5ConstM=5DimMat(N,M)ASInteger’定义二维数组Dimi，j，tOpenApp．Path＆"、"＆"datain．txt"ForInputAs#1’时文件进行读操作Fori=1ToNForj=1ToMInput#1,Mat(i,j)’将数据读入数组Mat中NextjNextiClose#1PrintPrint"初始矩阵为："PrintFori=1ToNForj=1ToMPrintTab(5*);Mat(i，j);NextjPrintNextiFori=1ToN’完成第二列和第四列的交换t=Mat(i，2)Mat(i，2)=Mat(i，4)Mat(i,4)＝t’的内容赋给Mat(i，4)，完成交换NextiPrintPrint"交换第二列和第四列后的矩阵为："PrintFori=1TONForj=1ToMPrintTab(5*j)；Mat(i，j);’将转换后的结果打印在窗体上NextjPrintNextiEndSub步骤3：调试并运行程序，关闭程序后按胚目要求存盘。知识点解析：本题代码先定义一个数组，然后以输入方式打开文件datain．txt，并在一个嵌套的For循环中用Input#将数据文件中的数据读入并赋值给每个数组元素。然后再通过一个嵌套的For循环将数组Mat中的数据在窗体上按5行、5列的矩阵形式显示出来，接着再用一个For循环将数组Mat中第1维下标分别为2和4的元素按第2维下标一致的对应交换值。最后将交换后的数组Mat中的数据再按5行、5列的矩阵形式在窗体上显示出来。国家二级（VB）机试模拟试卷第2套一、选择题(本题共40题，每题1.0分，共40分。)1、下列叙述中正确的是A、有且只有一个根结点的数据结构一定是线性结构B、每一个结点最多有一个前件也最多有一个后件的数据结构一定是线性结构C、有且只有一个根结点的数据结构一定是非线性结构D、有且只有一个根结点的数据结构可能是线性结构，也可能是非线性结构标准答案：D知识点解析：一个非空的数据结构如果满足以下两个条件：有且只有一个根结点；每一个结点最多有一个前件，也最多有一个后件，称为线性结构，故A、B和C选项都错误；不同时满足以上两个条件的数据结构就称为非线性结构，其中树形结构只有一个根结点，D选项正确。2、下列叙述中错误的是A、在双向链表中，可以从任何一个结点开始直接遍历到所有结点B、在循环链表中，可以从任何一个结点开始直接遍历到所有结点C、在线性单链表中，可以从任何一个结点开始直接遍历到所有结点D、在二叉链表中，可以从根结点开始遍历到所有结点标准答案：C知识点解析：线性单链表就是指线性表的链式存储结构，这种结构只能从一个节点遍历到其后的所有节点，故C选项叙述错误；在单链表的第一个节点前增加一个表头节点，队头指针指向表头节点，所以可以从任何一个节点开始直接遍历到所有节点，最后一个节点的指针域的值由NULL改为指向表头节点，这样的链表称为循环链表；双向链表是指链表节点含有指向前一个节点的指针和指向后一个节点的指针，所以可以从任何一个节点开始直接遍历到所有节点；二叉树链表中节点指针由父节点指向子节点，可以从根节点开始遍历到所有节点，所以选项A、B、D叙述均正确。3、某二叉树共有13个结点，其中有4个度为1的结点，则叶子结点数为A、5B、4C、3D、2标准答案：A知识点解析：在树结构中，一个节点所拥有的后件个数称为该节点的度。对任何一棵二叉树，度为0的节点（即叶子节点）总是比度为2的节点多一个。二叉树中有13个节点，设叶子节点个数为n0，度为1的节点个数为4，设度为2的节点个数为n2。13=n0+4+n2且n0=n2+1，则n0=5，n2=4。A选项正确。4、设栈的顺序存储空间为S(1:50),初始状态为top=0。现经过一系列入栈与退栈运算后，top=20，则当前栈中的元素个数为A、30B、29C、20D、19标准答案：C知识点解析：栈是一种特殊的线性表，它所有的插入与删除都限定在表的同一端进行。入栈运算即在栈顶位置插入一个新元素，退栈运算即是取出栈顶元素赋予指定变量。当栈为空时，栈顶指针top=0，经过入栈和退栈运算，指针始终指向栈顶元素。top=20，则当前栈中有20个元素，C选项正确。5、结构化程序包括的基本控制结构是A、主程序与子程序B、选择结构、循环结构与层次结构C、顺序结构、选择结构与循环结构D、输入、处理、输出标准答案：C知识点解析：结构化程序包括的基本控制结构只有三种，即顺序结构、选择结构与循环结构，C选项正确。6、程序测试的目的是A、执行测试用例B、发现并改正程序中的错误C、发现程序中的错误D、诊断和改正程序中的错误标准答案：C知识点解析：测试的目的是发现软件中的错误，但是，暴露错误并不是软件测试的最终目的，测试的根本目的是尽可能多地发现并排除软件中隐藏的错误，C选项正确。7、下面属于系统软件的是A、财务管理系统B、数据库管理系统C、编辑软件WordD、杀毒软件标准答案：B知识点解析：计算机软件按功能分为应用软件、系统软件、支撑软件（或工具软件）。系统软件是管理计算机的资源，提高计算机的使用效率，为用户提供各种服务的软件，如操作系统、数据库管理系统、编译程序、汇编程序和网络软件等，B选项正确。A、C、D选项为应用软件。8、在关系A(S，SN，D)和B(D，CN，NM)中，A的主关键字是S，B的主关键字是D，则D是A的A、外键(码)B、候选键(码)C、主键(码)D、元组标准答案：A知识点解析：二维表中的一行称为元组。候选键（码）是二维表中能唯一标识元组的最小属性集。若一个二维表有多个候选码，则选定其中一个作为主键（码）供用户使用。表M中的某属性集是表Ｎ的候选键或者主键，则称该属性集为表Ｍ的外键（码）。A中属性集D是B的主关键字，故D是A的外键（码），A选项正确。9、有两个关系R，S如下，由关系R和S通过运算得到关系T，则所使用的操作为A、并B、自然连接C、笛卡尔积D、差标准答案：D知识点解析：常用的扩充运算有交、除、连接及自然连接等。并：RS是将S中的记录追加到R后面。差：R-S结果是属于R但不属于S的记录组成的集合。交：RS结果是既属于R又属于S的记录组成的集合。差运算Ｒ-S：关系R中两条记录其中(b1n1)不属于S，所以R-S=T。D选项正确。10、在数据库管理系统提供的数据语言中，负责数据模式定义的是A、数据定义语言B、数据管理语言C、数据操纵语言D、数据控制语言标准答案：A知识点解析：数据库管理系统提供了相应的数据语言，它们是：数据定义语言，该语言负责数据的模式定义与数据的物理存取构建；数据操纵语言，该语言负责数据的操纵，包括查询与增、删、改等操作；数据控制语言，该语言负责数据完整性、安全性的定义与检查以及并发控制、故障恢复等功能。A选项正确。11、以下可作为VisualBasic合法变量名的是A、A3#1B、BasicC、TabD、D%3标准答案：B知识点解析：在VB中，变量名只能由字母、数字、下划线组成，故A和D错误；保留字不能作为变量名，C选项中Tab为保留字，故C错误；B选项符合变量的命名规则，故选B。12、表达式Sgn(15.6)+Int(-16.8)的值是A、17B、-15C、18D、-16标准答案：D知识点解析：Sgn（x）为符号函数，返回值为变量x的符号，当x为正数，返回1，则Sgn(15.6)=1；Int（x）是取整函数，返回值为不大于自变量x的最大整数，Int(-16.8)=-17，则知表达式Sgn(15.6)+Int(-16.8)值为-16，故选B。Sgn(x)英文全称Signal(x)，即求变量x的符号。注意其与变量x为大小无关，仅与变量正负有关。x为正数，返回1；x为负数，返回-1；x为0，返回0。15.6为正数，故Sgn(15.6)=1。Int(x)英文全称Integer(x),Integer中文意为整数，Int(x)为取整函数，细分为上取整和下取整，Int(-16.8)下取整，结果为-16，如果为Int(16.8)结果则为16。记忆法则：拆上补下（变量x大小0就拆掉小数点之后的数，小于0则给其补一些）。所以表达式Sgn(15.6)+Int(-16.8)值为-16，故选B。13、语句x=x+1的正确含义是A、变量x的值等于表达式x+1的值B、将变量x的值存放到变量x+1中C、将变量x的值加1后赋予变量xD、将变量"x+1"的值存放到变量x中标准答案：C知识点解析：根据变量的定义，表达式的意思是将变量x的值加1后赋予变量x故选C。14、在下列数组定义语句中，数组元素个数与其他三个数组不同的是A、OptionBase1DimA(4,5)B、DimB(4,5)C、StaticC(3,4)D、DimD(-1To2,1To5)标准答案：B知识点解析：选项A的以下标从1开始，共有20个元素；选项A，OptionBase1，指定当前二维数组下标均从1开始，共有4*5=20个元素；默认情况下，数组下标从0开始，故B选项元素个数为5*6=30个，C选项共有4*5=20个元素；D选项第一维下界为-1，第一维上界为2,第二维下界为1，第二维上界为5，共元素个数为20个，故选择B。15、设x=2，并有以下程序段：Ifx*x<1Theny=1Elsey=-1Printy-x<0该程序段的执行结果是A、TrueB、FalseC、出错D、不确定标准答案：A知识点解析：IF语句x*x<1为假，故y=-1，又y-x<0为真，故print的执行结果为True。如果x*x<1为真，则y=1，否则y=-1；2*2显然为不小于1，故y=-1；又y-x=-1-2=-3<0，即y-x<0为真，故print的执行结果为True。16、下列运算符中，优先级最高的是A、NotB、AndC、>=D、Mod标准答案：D知识点解析：A、B选项为逻辑运算符，C选项为比较运算符，D选项为算术运算符。算术运算符优先级高于逻辑运算符和比较运算符，故选D选项。17、以下关于SelectCase语句的叙述中，正确的是A、SelectCase语句中的测试表达式可以是任何形式的表达式B、SelectCase语句中的测试表达式只能是数值表达式或字符串表达式C、子句Case中的表达式可以是逻辑表达式D、不是所有的SelectCase语句都能用If语句代替标准答案：B知识点解析：SelectCase语句中的测试表达式只能是数值表达式或字符串表达式，故B正确，A错误。子句Case中的表达式可以是值的形式，也可以是表达式To的形式，还可以是Is关系运算表达式的形式，但不能是逻辑表达式形式，故C错误；所有的SelectCase语句都能用If语句替代。18、在Open语句中可以用Output和Append两种方式打开顺序文件，其主要区别是A、Output总是从文件的第一个记录开始写，而Append在文件最后一个记录后面添加数据B、Output在文件最后一个记录后面添加数据，而Append总是从文件的第一个记录开始写C、Output和Append都只能从文件的第一个记录开始写数据D、Output和Append都可以在文件的最后一个记录后面添加数据标准答案：A知识点解析：Output英文意输出，输出总是从文件的第一个记录开始写；Append英文意追加，以Append方式打开顺序文件时，与Output方式不同，文件指针定位在文件的末尾，写入的数据会追加在原来文件的尾部，故A项正确。19、在For的二重循环中，内外循环的循环控制变量名A、必须相同B、相同或不相同均可C、不能相同D、没有任何限制标准答案：C知识点解析：For循环控制结构可以嵌套使用，但是每个循环必须有一个唯一的变量名做循环变量，故C项正确。20、设strA="ABCDEFGHIJK"，则语句PrintRight(strA,2)+String(4,strA)的输出结果是A、HIABCDB、JKAAAAC、ABHIJKD、ABEFGH标准答案：B知识点解析：Right(strA,2)是截取字符串strA右边的2个字符，String（n，s）是生成n个同一字符s组成的字符串，其中n为正整数，s为字符。虽然在题目中String(4,strA)中strA是字符串"ABCDEFGHIJK"，但只读入一个字符’A’，即生成四个同一字符’A’组成的字符串。故结合以上，表达式产生的字符为’JKAAAA’，B选项正确。注意，字符与字符串的区别，单个字母为字符，字符串为字符的集合。21、用来设置斜体字的属性是A、FontItalicB、FontBoldC、FontNameD、FontSize标准答案：A知识点解析：FontItalic用来设置斜体字，当其属性值为True时，文本以斜体字输出，否则按正常字体输出。默认值为False。选项B用来设置粗体字、，选项C用来设置字体类型，选项D用来设置字体大小。故A选项正确。22、在窗体上画一个列表框，其名称为List1，通过属性窗口输入若干数据项，如图1所示。请编写一个事件过程，程序运行后，如果单击窗体，则把数据项"Newitem"加到列表框中，如图2所示。以下能实现该操作的事件过程是A、PrivateSubForm_Click()List1.AddItem"Newitem",3EndSubB、PrivateSubForm_Click()List1.AddItem"Newitem",2EndSubC、PrivateSubForm_Click()List1.AddItem3,"Newitem",2EndSubD、PrivateSubForm_Click()List1.AddItem2,"Newitem",2EndSub标准答案：B知识点解析：语法object.AddItemitem,index项目添加到ListBox或ComboBox控件。Index可选的，用来指定新项目或行在该对象中的位置。对于ListBox控件的首项index为0。题目中把数据项"Newitem"加入到列表框的第三行，index则为2，语句为List1.AddItem"Newitem",2，故B项正确。23、下列说法中正确的是A、通过适当的设置，可以在程序运行期间，让计时器控件显示在窗体上B、在列表框中不能进行多项选择C、通过设置适当的属性，可以把列表框中的项目按字母从大到小排序D、框架也有Click和DblClick事件标准答案：D知识点解析：A选项计时器在运行期间，在程序界面是不可见的，故A选项表述错误；B选项列表框不仅能进行单项选择也能进行多项选择，故B选项表述错误；C选项中的列表框可以通过Sorted属性，指定列表中的项目是否自动按字母顺序排列，但是不能按字母从大到小顺序排序，故C选项表述错误；D选项框架常用的有鼠标单击和双击事件，它不接收用户输入。故D选项正确。24、为了把ActiveX控件加到工具箱中，首先应采取的操作是A、执行"工程"菜单中的"部件"命令B、执行"视图"菜单中的"工具箱"命令C、执行"工具"菜单中的"选项"命令D、执行"工程"菜单中的"引用"命令标准答案：A知识点解析：程序中要使用ActiveX控件，需要将它们加到工具箱中，首先采取步骤是在"工程"菜单中，单击"部件"以显示"部件"对话框。故选择A选项。25、下列不能接收焦点的控件是A、列表框B、框架C、图片框D、复选框标准答案：B知识点解析：焦点是指对象接收用户鼠标或键盘输入的能力。当一个对象获得焦点时，它可以接收用户的输入。并不是所有对象都可以接收焦点，某些控件例如框架、标签和计时器等都不能接收焦点。故选择B选项。26、下列关于菜单的说法中，错误的是A、与控件一样，每个菜单项也有自己的属性和事件B、除了Click事件之外，菜单项还能响应其他事件，如DblClick等C、菜单项的快捷键不能任意设置D、程序运行时，若菜单项的Enabled属性为False，则该菜单项变成灰色标准答案：B知识点解析：每个菜单项有自己的属性和事件，故A表述正确；菜单项只能响应Click事件，故B选项表述错误；菜单的快捷键不能任意设置，要在设置为快捷键的字符前面加上一个"&"字符，故C表述正确；所有的菜单项都有Enable属性，当Enabled属性为False时，可使该菜单项无效（变为灰色），不能响应Click事件，故D表述正确。27、在窗体上画一个名称为CommonDialog1的通用对话框，以下语句中正确的是A、CommonDialog1.Filter="AllFiles|*.*|Picture(*.bmp)|*.bmp"B、CommonDialog1.Filter=AllFiles|*.*|Picture(*.bmp)|*.bmpC、CommonDialog1.Filter="AllFiles"|"*.*"|"Picture(*.bmp)"|"*.bmp"D、CommonDialog1.Filter={AllFiles|*.*|Picture(*.bmp)|*.bmp}标准答案：A知识点解析：Filter用来指定在对话框中显示的文件类型。它可以设置多个文件类型，供用户在对话框的"文件类型"下拉列表中选择。Filter的属性值由一对或多对文本字符串组成，每对字符串用管道符"|"隔开，在"|"前面的部分称为描述符，后面的部分一般为通配符和文件扩展名，称为"过滤器"。故选择A。28、在窗体上画一个名称为Text1的文本框，然后编写如下事件过程：PrivateSubText1_KeyPress(KeyAsciiAsInteger)......EndSub假定焦点位于文本框中，则以下能触发KeyPress事件的操作是A、在窗体上单击鼠标B、双击文本框C、用鼠标滑过文本框D、按下键盘上的某个键标准答案：D知识点解析：KeyPress事件，当用户按下和松开一个键时所触发的事件，该事件将返回所按键的ASCII码值，故D选项正确。29、为了返回或设置磁盘驱动器的名称，应使用的驱动器列表框的属性是A、ChDriveB、DriveC、ListD、ListIndex标准答案：B知识点解析：驱动器列表框的特有属性只有一个Drive属性，用来设置或返回所选择的驱动器名，故选项B正确。30、假定有下面的程序：PrivateSubForm_Click()DimNAsIntegerN=InputBox("输入一个2位整数")Print(N-Int(N/10)*10)*10+Int(N/10)EndSub程序运行后，单击窗体，在输入对话框中输入58，然后单击"确定"按钮，输出结果是A、58B、13C、85D、40标准答案：C知识点解析：当输入58后，N=58，则Int（x）返回值为不大于自变量x的最大整数，则Int（N/10）返回的值为5，则结果为（58-5*10）*10+5=85。故C选项正确。31、执行以下程序段后，输出结果不为2的是A、y=2x=1DoWhilex=0x=0y=y*xLoopPrintyB、y=2x=1DoUntilx=0x=0y=y*xLoopPrintyC、y=2x=1Doy=y*xLoopUntilx<>0PrintyD、y=2x=1Doy=y*xLoopWhilex=0Printy标准答案：B知识点解析：四个选项首先都定义y=2，x=1。A选项不执行dowhilex=0…Loop，y为2；B选项执行doUntilx=0…Loop，x=0，y=2*0=0，y为0；C选项执行Do…LoopUntilx<>0，y=y*x=2，跳出循环，y为2；D选项执行Do…LoopWhilex=0，y=y*x=2，y为2。故选择B选项。32、设有如下程序：PrivateSubForm_Click()ClsForn=1To100IfNot(n/3=Int(n/3)OrnMod8=0)ThenPrintn;EndIfNextnEndSub程序运行后，如果单击窗体，则A、输出所有能被3或能被8整除的数B、输出1到100所有既能被3也能被8整除的数C、输出1到100所有既不能被3也不能被8整除的数D、输出1到100所有能被3或能被8整除的数标准答案：C知识点解析：(n/3=Int(n/3)OrnMod8=0)语句的意思是能被3整除或者能被8整除，其中n/3=Int(n/3)表示n除以3等于n除以3的整数部分，即n被3整除，nMod8=0指n除以8的余数为0，即n被8整除。Not(n/3=Int(n/3)OrnMod8=0)语句意思就是不能被3整除且不能被8整除的数，故选择C选项。33、编写如下程序：PrivateSubForm_Click()k=0Forj=1To2Fori=1To3k=i+1NextiFori=1To7k=k+1NextiNextjPrintkEndSub运行程序，单击窗体，输出结果是A、10B、6C、5D、11标准答案：D知识点解析：程序执行过程，刚开始k初始值为0，紧接着是双重循环。外层循环j执行了两次（j=1,2），当j=1时，先执行第一个内层循环，该循环执行了3次（i=1,2,3），k=1+1,k=2+1,k=3+1=4，接着执行第二个内层循环，该循环执行了7次（i=1,2,3,4,5,6,7），k=4+1=5,k=5+1=6,k=6+1=7,k=7+1=8,k=8+1=9,k=9+1=10,k=10+1=11,k的值连续7次加1。当j=2时，结果同j=1，因该内层循环内没有用到最外层循环变量j，故二次循环结果一样，都为11。故选D选项。34、在窗体上画一个名称为Command的命令按钮，然后编写如下程序：PrivateSubCommand1_Click()DimA(10)Fork=1To10A(k)=11-kNextkx=6PrintA(2+A(x))EndSub运行程序，单击命令按钮，输出结果是A、5B、4C、3D、2标准答案：B知识点解析：程序中For循环，k从1到10执行，A(k)=11-k,执行完循环后，数组A（10）被赋值为=[10,9,8,7,6,5,4,3,2,1]。其中A(6)=11-6=5，故A(2+A(x))=A(2+5)=A(7)=11-7=4。故选择B选项。35、设有如下程序：PrivateSubForm_Click()DimxAsInteger,pAsIntegerx=InputBox("请输入一个整数")p=fee(x)PrintpEndSubFunctionfee(aAsInteger)Ifa<20Theny=aElsey=20+aEndIffee=yEndFunction运行程序，单击窗体，在输入对话框中输入20，单击"确定"按钮，输出结果为A、10B、20C、30D、40标准答案：D知识点解析：程序主要是从输入对话框中得到一整数x，并将x作为参数，带入fee（x）函数，返回p值，并输出。其中Inp