国家二级（VB）机试模拟试卷9（共396题）

国家二级（VB）机试模拟试卷9（共9套）（共396题）国家二级（VB）机试模拟试卷第1套一、选择题(本题共40题，每题1.0分，共40分。)1、算法的空间复杂度是指()。A、算法程序的长度B、算法程序中的指令条数C、算法程序所占的存储空间D、算法执行过程中所需要的存储空间标准答案：D知识点解析：算法的空间复杂度是指执行这个算法所需要的内存空间。一个算法所占用的存储空间包括算法程序所占的空间、输入的初始数据所占的存储空间以及算法执行中所需要的额外空间。其中额外空间包括算法程序执行过程中的工作单元以及某种数据结构所需要的附加存储空间。如果额外空间量相对于问题规模来说是常数，则称该算法是原地工作的。在许多实际问题中，为了减少算法所占的存储空间，通常采用压缩存储技术，以便尽量减少不必要的额外空间。2、下列选项中，不属于数据模型所描述的内容的是()。A、数据类型B、数据操作C、数据结构D、数据约束标准答案：A知识点解析：数据模型描述的内容包含数据结构、数据操作和数据约束。3、以下打开VisualBasic菜单编辑器的操作中，错误的是A、执行“编辑”菜单中的“菜单编辑器”命令B、执行“工具”菜单中的“菜单编辑器”命令C、单击工具栏中的“菜单编辑器”按钮D、右击窗体，在弹出的快捷菜单中选择“菜单编辑器”命令标准答案：A知识点解析：在“编辑”菜单中没有“菜单编辑器”命令。故A选项错误。4、为了使名称为Command1的命令按钮右移200，应使用的语句是()。A、Command1.Move－200B、Command1.Move200C、Command1.Left＝Command1．Left＋200D、Command1.Left＝Command1．Left－200标准答案：C知识点解析：本题考查控件的移动。窗体上的控件可以利用Move方法或者Left属性来发生移动。Left属性表示控件的左边缘距容器左边缘的距离。因此命令按钮右移时Left属性值增加。Move方法为移动到的位置，其格式为：[对象.]Move左边距离[,上边距离],宽带[，高度]]]。5、某人编写了如下程序，用来求10个整数(整数从键盘输入)中的最大值：PrivateSubCommandl_Click()Dima(10)AsInteger，maxAsIntegerFork=1To10a(k)=InputBox(“输入一个整数”)Nextkmax=0Fork=1To10Ifa(k)＞maxThenmax=a(k)EndIfNextkPrintmaxEndSub运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的，程序需要修改。下面的修改中可以得到正确运行结果的是()。A、把Ifa(k)＞maxThen改为Ifa(k)＜maxThenB、把max=a(k)改为a(k)=maxC、把第2个循环语句Fork=1To10改为Fork=2To10D、把max=0改为max=a(10)标准答案：D知识点解析：程序中把变量max的初始值设置为0，没有考虑到负数的情况。应该把它的初始值设置为数组中的一个元素的值，然后让数组中的各个元素与这个值比较，如果比它大，就替换变量max的值，这样才能得到数组中的最大值。因此要修改max=0这一行。6、关系模型允许定义3类数据约束，下列不属于数据约束的是()。A、实体完整性约束B、参照完整性约束C、属性完整性约束D、用户自定义的完整性约束标准答案：C知识点解析：关系模型允许3类数据约束，它们是：.实体完整性约束：该约束要求关系的主键中属性值不能为空值，这是数据库完整性的最基本要求；参照完整性约束：该约束是关系之间相关联的基本约束，它不允许关系引用不存在的元组：即在关系中的外键要么是所关联关系中实际存在的元组，要么就为空值；.用户定义的完整性约束：用户定义的完整性就是针对某一具体关系数据库的约束条件，它反映某一具体应用所涉及的数据必须满足的语义要求。7、数据结构主要研究的是数据的逻辑结构、数据的运算和()。A、数据的方法B、数据的存储结构C、数据的对象D、数据的逻辑存储标准答案：B知识点解析：数据结构是研究数据元素及其之间的相互关系和数据运算的一门学科，它包含3个方面的内容，即数据的逻辑结构、存储结构和数据的运算。8、有以下程序段，当在消息框中输入8后，y的值为()。x=InputBox("EnteranInteger")x=CInt(x)SelectCasexCaseIs＜=0y=0CaseIs＜=10y=5+2*xCaseIs＜=15y=x-5CaseIs＞15y=0EndSelectA、18B、19C、20D、21标准答案：D知识点解析：本题考查程序段的分析。SelectCase语句描述了当x取不同值时y值的情况。当在输入框中输入8，并单击“确定”按钮后，x得到的值为8。此时，满足SelectCase语句中的第二个Case语句，因此执行y=5+2*x=5+2*8=21。9、有下列程序，运行后的结果为()。X=2．4：Y=3：Z=5Print"A("，X+Y*Z；")"A、A(17)B、A(17．4)C、A(18)D、A(2．4+3*5)标准答案：B知识点解析：本题考查Print方法的输出。使用Print方法可以在窗体或图片框上输出文本，方法的参数为输出的内容，各个输出项之间可以使用逗号或分号隔开，如果用“，”隔开，则表示输出项分区输出，否则表示连续输出。因此题目中的输出项"A("；X+Y*Z；")"之间用分号分隔是连续输出。10、算法的空间复杂度是指()。A、算法程序的长度B、算法程序中的指令条数C、算法程序所占的存储空间D、算法执行过程中所需要的存储空间标准答案：D知识点解析：算法的空间复杂度是指执行这个算法所需要的内存空间。一个算法所占用的存储空间包括算法程序所占的空间、输入的初始数据所占的存储空间以及算法执行中所需要的额外空间。其中额外空间包括算法程序执行过程中的工作单元以及某种数据结构所需要的附加存储空间。如果额外空间量相对于问题规模来说是常数，则称该算法是原地工作的。在许多实际问题中，为了减少算法所占的存储空间，通常采用压缩存储技术，以便尽量减少不必要的额外空间。11、结构化程序设计的3种结构是()。A、顺序结构，分支结构，跳转结构B、顺序结构，选择结构，循环结构C、分支结构，选择结构，循环结构D、分支结构，跳转结构，循环结构标准答案：B知识点解析：稗序设计语占仅仅使川顺序、选择和重复(循环)三种基本控制结构就是以表达出各种其他形式结构的程序设计方法。遵循程序结构化的设计原则，按结构化程序设计方法设计出的程序易于理解、使用和维护；可以提高编程工作的效率，降低软件的开发成本。12、表达式Sgn(0．25)的值是()。A、一1B、0C、1D、0．5标准答案：C知识点解析：Sgn函数是符号函数，正数返回1，负数返回一1，0返回0。本题中0．25是正数，所以返回1，故C选项正确。13、窗体如图所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击“删除”按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能：PrivateSubCommand1_Click()Dimn％,k％n＝Len(Text1.Text)Fork＝0ToList1.ListCount-1IfLeft(List1.List(k),n)＝Text1.TextThenList1.RemoveltemkEndIfNextkEndSUb在调试时发现，如输入“陈”，可以正确删除所有姓“陈”的项目，但输入“刘”，则只删除了“刘邦”、“刘备”2项，结果如图2所示。这说明程序不能适应所有情况，需要修改。正确的修改方案是把Fork＝0ToList1”ListCount-1改为()。A、Fork＝1ToList1.ListCount-1B、Fork＝1ToList1.ListCountC、Fork＝0ToList1.ListCountD、Fork＝List1.ListCount-1To0Step-1标准答案：D知识点解析：在程序运行时删除列表框中的项目可以使用RemoveItem方法，其语法为：列表框.Removeltem索引号，列表框的属性ListIndex返回当前所选项目的索引号，因此删除列表框选中项目的语句为：List1．RemoveltemList1．List1ndex。列表框的List(Index)属性返回指定索引号的列表项内容，第一个列表项的索引为0而最后一个项目的索引为ListCount－1，其中，ListCount属性返回列表框中当前的列表项总数。本题原代码错误原因：每执行一次Removeltem方法后，列表框中被删除项目的后续项目的位置将前移，即其List1ndex属性值将减1。为此可从列表框的最后一个项目开始进行查找，即：Fork＝List1．ListCount－1To0Step－1。14、下面的程序是利用公式：π＝4－4/3＋4/5－4/7＋4/9－4/11＋…计算机π的近似值PvivateSubCommand1_Click()DimPIAsDouble，xAsDouble，kAsLong，signAsIntegersign＝1k＝1PI＝0Dox＝sign*4/(2*k-1)PI=PI+xk=k+1sign=________________LoopUnti1Abs(x)<0.000001PrintPIEndSub在空的处应填写的是()。A、sign＋1B、－signC、xD、k标准答案：B知识点解析：根据公式π＝4－4/3＋4/5－4/7＋4/9－4/11＋…可知sign是作为符号翻转的，即一次＋下一次就为－，因此空缺处应该填－sign，这样就可使符号循环一次翻转一次。15、有三个关系R、S和T如下：则由关系R和S得到关系T的操作是A、选择B、差C、交D、并标准答案：B知识点解析：关系T是关系R的一部分，并且是关系R去掉R和S相同的元素，符合差操作。16、设在当前目录下有一个名为"file.txt"的文本文件，其中有若干行文本。编写如下程序：PrivateSubCommand1_Click()Dimch$，asciiAsIntegerOpen"file.txt"ForInputAs#1WhileNotEOF(1)LineInput#1，chascii＝toascii(ch)PrintasciiWendClose#1EndSubPrivateFunctiontoascii(mystrAsString)AsIntegern＝0Fork＝1ToLen(mystr)n＝n＋Asc(Mid(mystr，k，1))Nextktoascii＝nEndFunction程序的功能是()。A、按行计算文件中每行字符的ASCII码之和，并显示在窗体上B、计算文件中所有字符的ASCII码之和，并显示在窗体上C、把文件中所有文本行按行显示在窗体上D、在窗体上显示文件中所有字符的ASCII码值标准答案：A知识点解析：过程toascii的功能是依次取出传入字符串中的每个字符，用Asc函数将这个字符转换为相应的ASCII码值，通过For循环将这些值累加。累加值由过程名返回。Click事件中以顺序输入方式打开file.txt文件，即以读取方式打开文件。While循环的结束条件是到达文件尾部，在循环体中，LineInput#语句读取文件中的一行数据存入变量ch中，然后以ch为参数调用过程toascii，即计算这一行字符中所有字符的ASCII码值的和，返回值赋给变量ascii，在窗体上输出ascii的值。所以While循环结束时，将在窗体上显示输出file.txt中每一行数据的ASCII码值的和。因此答案为A。17、窗体上有1个名称为Command1的命令按钮，1个名称为List1、没有列表项的列表框。编写如下程序：PrivateSubCommand1_Click()DimxAsString，sAsString，tempAsStringDimiAsIntegerx=InputBox("输入字符串"，"输入")Ifx＜＞""ThenFori=Lea(x)To1Step-1s=Mid(x，i，1)Ifs＜＞""Thentemp=s+tempElseList1．Addhemtemps=""tem=""EndIfNextList1．AddItemtempElseMsgBox"输入内容为空!"EndIfEndSub程序运行后，单击命令按钮Comd1，并输入“Happynewyear”，则在List1中显示的内容为()。A、yearnewHappyB、HappynewyearC、raeywenyppaHD、yppaHwenraey标准答案：A知识点解析：List1．Addltem可以为列表框添加列表项。For循环中通过Mid函数从字串中倒序取出字符，碰到空格时添加新列表项。选A。18、以下关于数据库系统的叙述中正确的是()。A、数据库系统消除了冗余B、数据库系统减少了数据冗余C、数据库系统中数据的一致性是指数据类型的一致D、数据库系统比文件系统管理数据快标准答案：B知识点解析：数据的共享自身又可极大地减少数据冗余性，不仅减少了不必要的存储李间，更为重要的是可以避免数据的不一致性。所谓数据的一致性是指在系统中同一数据的不同出现应保持相同的值。19、窗体上有名称为Command1的命令按钮，其事件过程如下：OptionBase1PrivateSubCommand1_Click()DimaDimb(10)AsIntegera=Array(2,4,7,3,9,6)Fori=LBound(a)ToUBound(a)b(i)=a(i)+iSum=Sum+b(i)NextiPrintSumEndSub运行程序，单击命令按钮时，窗体上显示的是A、44B、46C、50D、52标准答案：D知识点解析：所有维的数组缺省下界都是0或1，这取决于OptionBase语句的设置。本题中有语句OptionBase1，所以LBound(a)=1，UBound(a)=6；For循环进行求和计算，结果为52，选D。20、下列选项中不属于软件生命周期开发阶段任务的是()。A、软件测试B、概要设计C、软件维护D、详细设计标准答案：C知识点解析：软件生命周期分为软件定义、软件开发及软件运行维护三个阶段，其中开发阶段包括概要设计、详细设计、实现和测试。21、构成计算机软件的是A、源代码B、程序和数据C、程序和文档D、程序、数据及相关文档标准答案：D知识点解析：软件指的是计算机系统中与硬件相互依赖的另一部分，包括程序、数据和有关的文档，选D。22、在窗体上画一个名称为Text1的文本框，然后编写如下事件过程：PrivateSubText1_KeyPress(KeyAsciiAsInteger)......EndSub假定焦点位于文本框中，则以下能触发KeyPress事件的操作是A、在窗体上单击鼠标B、双击文本框C、用鼠标滑过文本框D、按下键盘上的某个键标准答案：D知识点解析：KeyPress事件，当用户按下和松开一个键时所触发的事件，该事件将返回所按键的ASCII码值，故D选项正确。23、窗体上有名称为Command1的命令按钮，程序代码如下：DimxAsInteger,yAsInteger,zAsIntegerSubp(aAsInteger,ByValbAsInteger)DimcAsIntegera=a*2b=b+2z=a+bEndSubPrivateSubForm_Click()x=4:y=5:z=6Callp(x,y)Printx,y,zEndSub运行程序，单击命令按钮后，窗体上显示的是A、8515B、456C、4515D、81015标准答案：A知识点解析：a参数是传地址的，即变量将地址传递给实参a，a的变化能改变了变量的值；ByVal在参数b前，表明参数b是传值参数，将变量值传给实参b，b的变化不影响变量变化。调用p（x，y），变量x将地址传递给实参a，变量y将值传递给实参b，a=4*2=8，b=5+2=7，z=15。a的变化，改变了x的值，x=a=8，b的变化并不改变y的值，y仍为5，z为15，故选择A项。24、使用Line控件在窗体上画一条从(0,0)到(600,700)的直线，则其相应属性的值应是()。A、X1＝0，X2＝600，Y1＝0，Y2＝700B、Y1＝0，Y2＝600，X1＝0，X2＝700C、X1＝0，X2＝0，Y1＝600，Y2＝700D、Y1＝0，Y2＝0，X1＝600，X2＝700标准答案：A知识点解析：X1、Y1、X2、Y2属性是直线的起点、终点坐标。故选A。25、某二叉树共有7个结点，其中叶子结点只有1个，则该二叉树的深度为(假设根结点在第1层)()。A、3B、4C、6D、7标准答案：D知识点解析：根据二叉树的基本性质3：在任意一棵二叉树中，度为0的叶子节点总比度为2的节点多一个，所以本题中度为2的节点为1－1＝0个，所以可以知道本题目中的二叉树的每一个节点都有一个分支，所以共7个节点共7层，即深度为7。26、某二叉树的前序序列为ABCDEFG，中序序列为DCBAEFG，则该二叉树的后序序列为A、EFGDCBAB、DCBEFGAC、BCDGFEAD、DCBGFEA标准答案：D知识点解析：二叉树遍历可以分为3种：前序遍历（访问根节点在访问左子树和访问右子树之前）、中序遍历（访问根节点在访问左子树和访问右子树两者之间）、后序遍历（访问根节点在访问左子树和访问右子树之后）。二叉树的前序序列为ABCDEFG，A为根节点。中序序列为DCBAEFG，可知DCB为左子树节点，EFG为右子树节点。同理B为C父节点,C为D父节点，且CD均为B的同侧子树节点。同理E为F根节点，F为G根节点，且FG为E同侧子树节点。二叉树的后序序列为DCBGFEA，D选项正确。27、下列关于栈的叙述中，正确的是A、栈底元素一定是最后入栈的元素B、栈顶元素一定是最先入栈的元素C、栈操作遵循先进后出的原则D、以上说法均错误标准答案：C知识点解析：栈顶元素总是后被插入的元素，从而也是最先被删除的元素；栈底元素总是最先被插入的元素，从而也是最后才能被删除的元素。栈的修改是按后进先出的原则进行的。因此，栈称为先进后出表，或"后进先出"表，所以选择C。28、要在程序运行过程中把Command1按钮的标题修改为"按钮"，正确的做法是A、在属性窗口中把Command1按钮的Caption属性改为"按钮"B、在程序中执行语句：Command1.Caption="按钮"C、在属性窗口中把Command1按钮的Text属性改为"按钮"D、在程序中执行语句：Command1.Text="按钮"标准答案：B知识点解析：Caption：用来设置显示在按钮上的标题，在程序运行过程中修改按钮的标题应该使用，Command1.Caption="按钮"。故本题正确答案为B。29、在设计阶段，为了设置某控件的Left属性，可使用的方法是A、在属性窗口中设置该属性的值B、在某个事件过程中，编写代码为该属性赋值C、双击该控件，在打开的窗口中设置该属性的值D、以上方法都可以标准答案：A知识点解析：设置控件的Left属性只能在属性窗口中设置该属性的值，故正确答案为选项A。30、设窗体上有一个Text1文本框和一个HScroll1水平滚动条，并有下面的事件过程：PrivateSubHScroll1_Change()Text1=HScroll1EndSub在程序运行时，当把滚动框移动到最左边时，文本框中显示的是100；当把滚动框移动到最右边时，文本框中显示的是1。根据这些信息，下面的判断中错误的是A、滚动条的Max和Min属性的值分别是1和100B、滚动条的Max和Min属性的值分别是100和1C、文本框中显示的是滚动条Value属性的值D、如果把滚动框移动到中间位置，文本框中将显示50标准答案：B知识点解析：在一般情况下，垂直滚动条的值由上往下递增，最上端代表最小值(Min)，最下端代表最大值(Max)；水平滚动条的值从左到右递增，最左端代表最小值(Min)，最右端代表最大值(Max)，其取值范围为－32768～32768。31、编写如下程序：PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=1y=1Doy=x*yIfy>10ThenExitDoElsex=x+3EndIfLoopUntilx<=10Printx;yEndSub程序运行后，单击命令按钮Command1，输出结果为A、11B、41C、42D、728标准答案：B知识点解析：Do…LoopUntil循环当条件为真时循环执行循环体。代入初值进行计算可得结果。选B）。32、设a、b都是自然数，为求a除以b的余数，某人编写了以下函数：Functionfun(aAsInteger，bAsInteger)Whilea>ba＝a－bWendfun＝aEndFunction在调试时发现函数是错误的。为使函数能产生正确的返回值，应做的修改是()。A、把a＝a－b改为a＝b－aB、把a＝a－b改为a＝a\bC、把Whilea>b改为WhileaD、把Whilea>b改为Whilea>＝b标准答案：D知识点解析：程序中没有考虑余数为0的情况，即，条件中应该有a＝b，则a＝a－b，这样才能正确得到余数0。因此程序中应该修改While的条件a>b为a>＝b。33、如果在VisualBasic集成环境中没有打开属性窗口，下列可以打开属性窗口的操作是()。A、用鼠标双击窗体的任何部位B、执行"工程"菜单中的"属性窗口"命令C、按Ctrl＋F4键D、按F4键标准答案：D知识点解析：用鼠标双击窗体的任何部位会打开"代码窗口"，故A选项错误。在"视图"菜单中才有"属性窗口"命令，故B选项错误。按Ctrl＋F4键关闭当前活动窗体窗口。故C选项错误。按F4会打开"属性窗口"。故D选项正确。34、为了使一个复选框被禁用(灰色显示)，应把它的Value属性设置为()。A、0B、1C、2D、False标准答案：C知识点解析：复选框的Value属性可以设置为0、1或2。0表示没有选择该复选框，1表示选中该复选框，2表示该复选框被禁用(灰色显示)。35、下面属于黑盒测试方法的是A、语句覆盖B、逻辑覆盖C、边界值分析D、路径覆盖标准答案：C知识点解析：黑盒测试不关心程序内部的逻辑，只是根据程序的功能说明来设计测试用例。在使用黑盒测试法时，手头只需要有程序功能说明就可以了。黑盒测试法分等价类划分法、边界值分析法和错误推测法，答案为C。而A、B、D均为白盒测试方法。36、下列说法中，错误的是A、变量名长度不能超过127个字符B、变量名的第一个字符必须是字母C、变量名不能使用保留字D、变量名只能由字母、数字和下划线组成标准答案：A知识点解析：变量的命名规则是：①必须以字母开头，由字母、汉字、数字或下划线组成；②不能在变量名中出现句点"."、空格或者嵌入字符，例如！、@、#、$、%、&等；③长度不得超过255个字符；④不能使用VB的关键字，关键字是语言的组成部分，包括预定义语句(例如If、For等)、函数(Abs、Sqr等)和操作符(Or、Mod等)。37、用来设置文字字体是否斜体的属性是()。A、FontUnderlineB、FontBoldC、FontSlopeD、FontItalic标准答案：D知识点解析：FontUnderline属性设置文字是否有下划线；FontBold属性是设置文字是否加粗；FontItalic属性是设置文字是否斜体；没有FontSlope属性。故选D。38、假定有以下通用过程：FunctionFun(nAsInteger)AsIntegerx＝n*nFun＝x－11EndFunction在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSubCommand1_Click()DimiAsIntegerFori＝1To2y＝Fun(i)Printy；NextiEndSub程序运行后，单击命令按钮，在窗体上显示的内容是()。A、13B、108C、－10－7D、05标准答案：C知识点解析：39、窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。编写如下程序：PrivateSubCommand1_Click()DimxAsIntegerx＝Val(InputBox("输入数据"))Text1＝Str(x＋fun(x)＋fun(x))EndSubPrivateFunctionfun(ByRefnAsInteger)IfnMod3＝0Thenn＝n＋nElsen＝n*nEndIffun＝nEndFunction对于上述程序，以下叙述中错误的是()。A、语句fun＝n有错，因为n是整型，fun没有定义类型B、运行程序，输入值为5时，文本框中显示655C、运行程序，输入值为6时，文本框中显示42D、ByRef表示参数按址传递标准答案：A知识点解析：过程fun的功能是将传入的值运算后返回，当传入数值为3的整数倍时返回该值的2倍，否则返回该值的平方。过程Fun的参数指定为ByRef方式，即按址传递，因此会影响实参的值。Str函数是将数值转换为字符串。过程fun定义时没有指明返回类型因此默认为Variant类型，它可以表示任何值，因此A)选项的说法不正确。40、下面关于计时器控件的叙述中正确的是()。A、一个窗体中只能使用一个定时器控件B、Interval属性的值表示的是两次产生Timer事件所间隔的秒数C、计时器在程序运行时足不显示的，但也有Left属性D、如果Enabled属性被设置为True，则计时器一定被启动，并定时产生Timer事件标准答案：C知识点解析：一个窗体中可以添加多个计时器控件，A选项叙述错误；计时器的Interval属性是用来设置两次执行计时器事件之间的时间间隔，以毫秒为单位，B选项叙述错误；如果计时器控件的Enabled属性被设置为True，但是Interval属性设置为0，计时器事件也不会被启动，所以D选项叙述错误；计时器控件在设计阶段会出现在窗体上，程序运行时就会自动消失，但是仍然有Left属性，C选项叙述正确。本题选择C选项。二、基本操作题(本题共2题，每题1.0分，共2分。)请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。41、在名称为Form1的窗体上画一个名称为CD1的通用对话框，通过属性窗口设置CD1的初始路径为C：＼，默认的文件名为None，标题为“保存等级考试”，如图2所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。标准答案：[操作步骤]步骤1：新建一个“标准。EXE”工程，选择[工程]→[部件]命令，在弹出的“部件”对话框的列表中选中“MicroSoftCommonDiMogControl6．0”项目，单击“确定”按钮。步骤2：在窗体Form1上画一个通用对话框，其相关属性设置如表12—7所示。步骤3：编写Form1的Iroad事件，加入下面的代码：CD1．ShowSave步骤4：按要求将文件保存至考生文件夹中。知识点解析：通用对话框的InitDir属性用于为打开或另存为对话指定初始的目录，如果此属性没有指定，则使用当前目录。通用对话框的初始路径由InitDir属性设置，默认文件名由FileName属性设置，标题由DialogTitle属性设置。42、在名称为Form1的窗体上设计一个菜单。要求在窗体上添加名为menu0，标题为“菜单命令”的主菜单，再添加两个名称分别为“menu1”、“menu2”，标题分别为“不可用菜单项”、“上一菜单项可用”的子菜单，并且使程序运行时，menu1子菜单不可用，menu2子菜单已经选中(运行时的效果如图3所示)。再编写适当的事件过程，使得程序运行时，单击“上一菜单项可用”，则“不可用菜单项”变为黑色(可用)。要求程序中不得使用变量，且只有一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为sit2．vbp，窗体文件名为sit2．Frm。标准答案：[操作步骤]步骤1：新建一个“标准EXE”工程，打开VB菜单设计器设计菜单，各菜单项及属性设置如表12—8所示。步骤2：打开代码编辑窗口，编写“上一菜单项可用”命令的Click事件过程。参考代码：PrivateSubmenu2_Click()menu1．Enabled=TrueEndSub步骤3：按要求将文件保存至考生文件夹中。知识点解析：①VB中的菜单是通过菜单编辑器来设计的。菜单编辑器中的基本设置项有：“标题”项，对应出现在菜单中的显示内容；“名称”项，系统识别菜单项的唯一关键字(不能重复)；“索引”项，用于设置菜单数组中各元素的索引号；“快捷键”项，是一个下拉列表框，用于设置菜单项的快捷键；“帮助上下文”项，设置当鼠标移动到某菜单项上按＜Fl＞键时显示的帮助信息在帮助文件中的对应位置；Visible(可见)项，用于设置控件或菜单项在程序运行时是否可见，值为True表示可见，值为False表示不可见；Enabled(有效)项，用于设置控件或菜单项在程序运行时是否有效，值为True时表示有效，值为False时表示无效(显示为灰色)。通过编辑按钮区的七个按钮可对菜单进行添加、插入、删除、提升(设置为上一级菜单)、缩进(设置为下一级菜单)、上移、下移等操作。②文本框的Text属性用于设置或返回其显示的文本内容。本题原程序设计思路：在“上一菜单项可用”命令的单击事件过程中，通过语句设置“不可用菜单项”命令的Enabled属性值为True。三、简单应用题(本题共1题，每题1.0分，共1分。)43、在考生文件夹下有一个工程文件sjt3．vbp，相应的窗体文件为sjt3．frm。其功能是随机产生20个0～1000的整数，将其放入一个数组中，然后输出这20个整数的平均值。程序运行后，单击命令按钮(名称为Command1，标题为“输出平均值”)，即可求出其平均值，并显示在窗体上(如图所示)。这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。标准答案：步骤1：打开本题工程文件。步骤2：分析并编写程序代码。程序提供代码OptionBase1PrivateSubCommandl_Click()DimarrN(20)AsIntegerDimAverAsSingleDimSumAsInteger．iRandomizeFori=1To20’arrN(i)=Int(Rnd*?)Nexti’Sum=?Fori=1To20’Sum=?Nexti’Aver=?PrintAverEndSub程序结束第1个?处填入：1000第2个?处填入：0第3个?处填入：Sum+arrN(i)第4个?处填入：Sum／20步骤3：调试并运行程序，关闭程序后按题目要求存盘。知识点解析：表达式Int(Rnd*1000)可生成0～1000范围内随机整数。根据题意求出20个随机整数的平均值，须用For循环语句逐一将数组中的各元素累加到变量Sum，然后求出平均值。四、综合应用题(本题共1题，每题1.0分，共1分。)44、以下数列：1，1，2，3，5，8，13，21…的规律是从第3个数外始，每个数都是其前面两个数之和。在考生文件夹下有一个工程文件sjt5．vbp。窗体中已经给出了所有控件，如图所示。请编写适当的事件过程完成如下功能：选中一个单选按钮后，单击“计算”按钮，则计算出上述数列第n项的值，并在文本框中显示，n是选中的单选按钮后面的数值(提示：因计算结果较大，应使用长整型变量)。注意：不能修改已经给出的程序和已有的控件的属性；在结束程序运行之前，必须选中一个单选按钮，并单击“计算”按钮以获得一个结果；必须使用窗体右一卜角的关闭按钮结束程序，否则无成绩。最后把修改后的文什按原文件名存盘。标准答案：步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，在指定位置编写如下代码。PriVateSubCommand1_Click()Dima()AsLongDimiAsIntegerDimnAsInteger’Opl．Count是单选按钮数目，这里用的是控件数组Fori=0ToOp1．Count－1’判断哪一项被选择，把它后面的数值赋给n，确定n值IfOp1(i)．Value＝TrueThenn＝Val(Opl(i)．Caption)Exi．tForEndIfNextReDima(n)’重新申请空间，这里是动态申请a(1)=1a(2)=1’数列第一项、第二项值确定Fori＝3Tona(i)＝a(i－1)＋a(i－2)’后一项值是前两项值之和NextText1．Text＝a(n)EndSub步骤3：调试并运行程序，关闭程序后按题目要求存盘。知识点解析：单选按钮数组常用于提供唯一选择，VHue属性值决定每个单选按钮的选中状态：FHse为未选中，True为选中，Caption属性用于设置单选按钮的标题。本题在For循环语句(循环变量k的初值为0，终值应为3)中逐一检查每个单选按钮是否被选中，用变量n记录选中单选按钮的索引号。然后取消对当前选中单选按钮的选择，使单选按钮数组中的卜一个按钮被选中。如果当前已经选中最后一个单选按钮，则将n赋值为0，最新从单选按钮数组的第一个元素开始。国家二级（VB）机试模拟试卷第2套一、选择题(本题共40题，每题1.0分，共40分。)1、检查软件产品是否符合需求定义的过程称为()。A、确认测试B、需求测试C、验证测试D、路径测试标准答案：A知识点解析：确认测试的任务是验证软件的功能和性能，以及其他特性是否满足需求规格说明中确定的各种需求。2、下列不能打开菜单编辑器的操作是()。A、按Ctrl+E键B、单击工具栏中的“菜单编辑器”按钮C、执行“工具”菜单中的“菜单编辑器”命令D、按Shifi+Alt+M键标准答案：D知识点解析：在VB中打开菜单编辑器有4种方式：①执行“工具”菜单中的“菜单编辑器”命令；②使用热键Ctrl+E；③单击工具栏中的“菜单编辑器”按钮；④在要建立菜单的窗体上单击鼠标右键，将弹出一个菜单，然后单击“菜单编辑器”命令。3、为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为()。A、1B、2C、3D、4标准答案：B知识点解析：窗体的BorderStyle属性是用来设置窗体的边框样式的。属性值1为FixedSingle，3为FixedDialog，4为FixedToolWindow，设置为这3个属性值都不能改变窗口大小。2是Sizable，表示窗体大小可以改变。故选B。4、检查软件产品是否符合需求定义的过程称为()。A、确认测试B、需求测试C、验证测试D、路径测试标准答案：A知识点解析：确认测试的任务是验证软件的功能和性能，以及其他特性是否满足需求规格说明中确定的各种需求。5、算法的空间复杂度是指()。A、算法程序的长度B、算法程序中的指令条数C、算法程序所占的存储空间D、算法执行过程中所需要的存储空间标准答案：D知识点解析：算法的空间复杂度是指执行这个算法所需要的内存空间。一个算法所占用的存储空间包括算法程序所占的空间、输入的初始数据所占的存储空间以及算法执行中所需要的额外空间。其中额外空间包括算法程序执行过程中的工作单元以及某种数据结构所需要的附加存储空间。如果额外空间量相对于问题规模来说是常数，则称该算法是原地工作的。在许多实际问题中，为了减少算法所占的存储空间，通常采用压缩存储技术，以便尽量减少不必要的额外空间。6、以下关于通用对话框的叙述中，错误的是()。A、在程序运行状态下，通用对话框控件是不显示的B、通用对话框控件是VisualBasic的标准控件C、设计时，通用对话框控件的大小是固定的，不能改变D、在同一个程序中，一个通用对话框控件可以作为打开、保存等多种对话框标准答案：B知识点解析：通用对话框是一个ActiveX控件，不是标准控件，故B选项错误。7、窗体的左右两端各有1条直线，名称分别为Line1、Line2；名称为Shape1的圆靠在左边的Line1直线上(见图)；另有1个名称为Timer1的计时器控件，其Enabled属性值是True。要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：PrivateSubTimer1_Timer()Fork＝Line1.X1ToLine2.X1Step100IfShape1.Left＋Shape1.WidthA、把计时器的Interval属性设置为1B、把Fork＝Line1.X1ToLine2.X1Step100和Nextk两行删除C、把Fork＝Line1.X1ToLine2.X1Step100改为Fork＝Line2.X1ToLine1.X1Step100D、把IfShape1.Left＋Shape1.Width标准答案：B知识点解析：在计时器事件中不应再设置步长为100的For循环，应该把For循环去掉，只留下循环体的语句，计时器每秒激发一次，每次判断小球是否移到Line2处，不到就改变自己的Left值即继续移动。因此B正确。8、设有如下数组定义语句：Dima(－1To4，3)AsInteger以下叙述中正确的是()。A、a数组有18个数组元素B、a数组有20个数组元素C、a数组有24个数组元素D、语法有错标准答案：C知识点解析：：本题定义了二维数组地第一维的下标-1to4，即为-1，0，1，2，3，4(共6行)，第二维下标3，即0to3(0，1，2，3共4列)，6*4=24二维数组有24个数组元素。故选C。9、窗体上有一个名称为Vscmul的滚动条，当用鼠标拖动滚动条中的滚动块时，触发的事件是()。A、ClickB、KeyDownC、DragDropD、Scroll标准答案：D知识点解析：用鼠标拖动滚动条中的滚动块，说明在滚动条上有拖动、滚动的动作，所以触发滚动条的Scroll事件，故选D。10、下列操作中不能向工程添加窗体的是()。A、执行"工程"菜单中的"添加窗体"命令B、单击工具栏上的"添加窗体"按钮C、右击窗体，在弹出的菜单中选择"添加窗体"命令D、右击工程资源管理器，在弹出的菜单中选择"添加"命令，然后在下一级菜单中选择"添加窗体"命令标准答案：C知识点解析：右击窗体，弹出的菜单中没有"添加窗体"命令，故C选项错误。11、下列链表中，其逻辑结构属于非线性结构的是A、二叉链表B、循环链表C、双向链表D、带链的栈标准答案：A知识点解析：在定义的链表中，若只含有一个指针域来存放下一个元素地址，称这样的链表为单链表或线性链表。带链的栈可以用来收集计算机存储空间中所有空闲的存储结点，是线性表。在单链表中的结点中增加一个指针域指向它的直接前件，这样的链表，就称为双向链表（一个结点中含有两个指针），也是线性链表。循环链表具有单链表的特征，但又不需要增加额外的存贮空间，仅对表的链接方式稍做改变，使得对表的处理更加方便灵活，属于线性链表。二叉链表是二叉树的物理实现，是一种存储结构，不属于线性结构。答案为A选项。12、以下关于VB文件的叙述中，正确的是()。A、标准模块文件的扩展名是.frmB、VB应用程序可以被编译为.exe文件C、一个工程文件只能含有一个标准模块文件D、类模块文件的扩展名为.bas标准答案：B知识点解析：标准模块文件的扩展名是.bas，不是.frm，故A选项错误。一个工程中可以包含一个或多个标准模块文件，故C选项错误。类模块文件的扩展名为.cls，不是.bas。故D选项错误。B选项正确。13、下列有语法错误的赋值语句是()。A、y＝7＝9B、s＝m＋nC、Text1.Text＝10D、m＋n＝12标准答案：D知识点解析：赋值语句的格式是：变量名＝表达式。赋值号左边必须是变量名，不能是表达式或常量。D选项中赋值号左边m＋n是表达式，不是变量名，故D选项错误。14、A、自然连接B、交C、投影D、并标准答案：A知识点解析：关系R和关系S有公共域，关系T是通过公共域的等值进行连接的结果，符合自然连接，选A。15、设有如图所示窗体和以下程序：PrivateSubCommandlClick()Textl．Text=“VisualBasic”EndSubPrivateSubText1LostFoeus()IfText1．Text<>“BASIC”ThenText1．Text=“”Text1．SetFocusEndIfEndSub程序运行时，在Text1文本框中输入“Basic”(如图所示)，然后单击Commandl按钮，则产生的结果是()。A、文本框中无内容，焦点在文本框中B、文本框中为“Basic”，焦点在文本框中C、文本框中为“Basic”，焦点在按钮上D、文本框中为“VisualBasic”，焦点在按钮上标准答案：A知识点解析：题目程序的功能为，当单击命令按钮时，Textl失去焦点，激发Textl的LostFocus事件，在此事件中，程序判断文本框中字符串是否为“BASIC”，如果是则退出事件过程，继续执行命令按钮的单击事件过程，文本框中显示“VisualBasic”，如果不是则文本框内容置空，焦点返回到文本框中等待输入，不会执行命令按钮的单击事件过程。题目中输入了“Basic”，与“BASIC”不符，因此文本框置空，焦点回到文本框中。16、有两个关系R、S如下：由关系R通过运算得到关系S，则所使用的运算为()。A、选择B、投影C、插入D、连接标准答案：B知识点解析：投影运算是指对于关系内的域指定可引入新的运算。本题中s是在原有关系R的内部进行的，是由R中原有的那些域的列所组成的关系。所以选择B。17、某二叉树共有12个结点，其中叶子结点只有1个。则该二叉树的深度为（根结点在第1层）A、3B、6C、8D、12标准答案：D知识点解析：二叉树中，度为0的节点数等于度为2的节点数加1，即n2=n0-1，叶子节点即度为0，n0=1，则n2=0，总节点数为12=n0+n1+n2=1+n1+0，则度为1的节点数n1=11，故深度为12，选D。18、关于文件操作，以下叙述中正确的是A、Kill命令的作用是删除用户编写的VB程序文件B、使用Name命令能够对文件或文件夹重新命名C、用FileCopy进行文件拷贝时，可以使用通配符D、用FileCopy可以将打开的文件复制到指定的文件夹标准答案：B知识点解析：Kill命令用以删除文件，不能删除文件夹。FileCopy可以把源文件拷贝到目标文件，拷贝后两个文件的内容完全一样。打开的文件不能拷贝。拷贝文件不能含有通配符（*或？）。19、A、各子菜单项组成一个名称为mnu1的控件数组B、不论选中菜单项1、2或3，均执行mnu1_Click事件过程C、Case2分支的语句没有必要，因为该菜单项的"复选"属性已被设置D、程序中的Index是系统自动产生的标准答案：C知识点解析：菜单项1至菜单项3是名称为mnu1的控件数组，系统自动产生索引分别为1,2,3。由于是控件数组的原因，在选中菜单项1至3中任何一项，都会执行mnu1_Click事件过程。选C）。20、下面程序的运行结果是()。PrivateSubFormClick()i=0DoUntil0i=i+1Ifi＞10ThenExitDoLoopPrintiEndSubA、0B、10C、11D、出错标准答案：C知识点解析：本题考查DoUntil…Loop循环的。对于这种循环结构，条件判断在循环体前，因此有可能一次循环体条件也不执行。由Until引出的循环为，当条件为False时执行循环体；为True时退出循环。初始时，题中Until后面的条件为0，因此会一直运行循环体，直到i大于10成立，退出循环。i第一次大于10的值为11，因此最后输出11。21、判断复选框是否被选中的属性为A、SelectedB、CheckedC、ValueD、Index标准答案：C知识点解析：复选框组常用于提供多重选择，Value属性值决定每个复选框的选中状态：0为未选、1为选中、2为不可用(以灰色呈现)。选C）。22、编写如下程序：PrivateSubCommand1_Click()DimnAsInteger,tAsLongStaticsAsIntegert=1Forn=1To3t=t*ns=s+tNextPrintsEndSub程序运行后，第二次单击命令按钮Command1时，输出结果为A、6B、9C、12D、18标准答案：B知识点解析：Staic关键字定义的变量退出事件后变量值保持不变。For循环根据变量的初值进行计算。当第二次点击时，s的初值是第一次事件执行后的结果。选B）。23、下列选项中，不属于数据模型所描述的内容的是()。A、数据类型B、数据操作C、数据结构D、数据约束标准答案：A知识点解析：数据模型描述韵舟容包含数据结构、数据操作和数据约束。24、对于循环队列，下列叙述中正确的是()。A、队头指针是固定不变的B、队头指针一定大于队尾指针C、队头指针一定小于队尾指针D、队头指针可以大于队尾指针，也可以小于队尾指针标准答案：D知识点解析：循环队列的队头指针与队尾指针都不是固定的，随着入队与出队操作要进行变化。因为是循环利用的队列结构所以对头指针有时可能大于队尾指针有时也可能小于队尾指针。25、在数据库系统中，给出数据模型在计算机上物理结构表示的是A、概念数据模型B、逻辑数据模型C、物理数据模型D、关系数据模型标准答案：C知识点解析：数据模型按照不同的应用层次分为以下3种类型：概念数据模型，重于对客观世界复杂事物的描述及对它们内在联系的刻画；逻辑数据模型，是面向数据库系统的模型，着重于在数据库系统一级的实现；物理数据模型，是面向计算机物理实现的模型，此模型给出了数据模型在计算机上物理结构的表示。C选项正确。26、编写如下程序：DimxAsInteger,yAsInteger,zAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=1:y=2:z=3z=fun_s(x)Printx;y;zEndSubPublicFunctionfun_s(ByValyAsInteger)AsIntegerx=5y=z+1fun_s=x+yEndFunction程序运行后，单击命令按钮Command1，输出结果为A、429B、129C、529D、549标准答案：B知识点解析：函数fun_s(ByValyAsInteger)是按值传递，返回一个整数。程序初始，定义xyz三个全局变量，x=y=z=0；Command1_Click程序中，定义了局部变量x，并对局部变量x赋值为1，对全局变量y赋值为2，z赋值为3，调用fun_s函数，增加了一个局部变量y，全局变量x赋值为5，局部变量y=z+1=3+1=4，函数返回值为9，并将其返回值赋值给全局变量z。此时局部变量x为1，y为4。全局变量x，y，z分别为5,4,9。Printx;y;z结合其所在位置可知，要求输出局部变量x，全局变量y和z，结果为1，2,9，故选B项。27、以下关于文件的叙述中，正确的是A、随机文件的记录是定长的B、用Append方式打开的文件，既可以进行读操作，也可以进行写操作C、随机文件记录中的各个字段具有相同的长度D、随机文件通常比顺序文件占用的空间小标准答案：A知识点解析：随机文件记录中的每一条记录的长度是固定的，记录中的字段的长度也是固定，但各个字段长度并不一定是相同的，故A项表述正确，C表述错误。用Append方式打开的文件，指定文件顺序输出方式，并向文件的尾部追加写入数据，故只进行写操作，不进行读操作，故B选项表述错误。随机文件占用的空间较大，而顺序文件占用空间少，容易使用，故D表述错误。28、以下说法中正确的是A、能获取列表框List1中最后一个列表项内容的表达式是List1.List(ListCount-1)B、Shape控件可以将同一个窗体上的多个单选按钮分成多个组C、当在名称为Drive1的驱动器列表框中选取不同的驱动器时，系统将执行事件过程Drive1_ClickD、当一个复选框被选中时，它的Value属性的值是1标准答案：D知识点解析：ListCount返回列表框中项目数量的数值。List属性用来列出或设置列表项的内容，可以通过下标访问列表框中的内容（下标值从0到ListCount-1）。故获取列表框List1中最后一个列表项内容的表达式是:List1.List(List1.ListCount-1),选项A错误；Shape设置形状控件中所显示的图形形状，Shape控件不可以将同一个窗体上的多个单选按钮分成多个组，故选项B错误；驱动器列表框的特有属性只有一个Drive属性，用来设置或返回所选择的驱动器名，在每次重新设置驱动器列表框的Drive属性时，都将触发Change事件，故选项C错误；本题正确答案为D选项。29、下面不属于软件测试实施步骤的是A、集成测试B、回归测试C、确认测试D、单元测试标准答案：B知识点解析：软件测试主要包括单元测试、集成测试、确认测试和系统测试。30、在窗体上画1个命令按钮，并编写如下事件过程：PrivateSubCommand1_Click()Dima(3,3)Form＝1To3Forn＝1To3Ifn＝mOrn＝4－mThena(m，n)＝m＋nElsea(m，n)＝0EndIfPrinta(m，n)；NextnPrintNextmEndSub运行程序，单击命令按钮，窗体上显示的内容为()。A、200040006B、204040406C、230340006D、200045056标准答案：B知识点解析：根据For循环中的If语句的条件n＝morn＝4－m中的n＝m首先可以得出a(1,1)＝2，a(2,2)＝4，a(3,3)＝6，其次根据n＝4－m的条件可以得出a(1,3)＝4，a(2,2)＝4，a(3,1)＝4。而其他的元素值都为0。因此窗体上输出的三行分别是：204,040,406。31、某二叉树共有7个结点，其中叶子结点只有1个，则该二叉树的深度为(假设根结点在第1层)()。A、3B、4C、6D、7标准答案：D知识点解析：根据二叉树的基本性质3：在任意一棵二叉树中，度为0的叶子节点总比度为2的节点多一个，所以本题中度为2的节点为1－1＝0个，所以可以知道本题目中的二叉树的每一个节点都有一个分支，所以共7个节点共7层，即深度为7。32、表达式Sgn(0.25)的值是()。A、－1B、0C、1D、0.5标准答案：C知识点解析：Sgn函数是符号函数，正数返回1，负数返回－1,0返回0。本题中0.25是正数，所以返回1，故C选项正确。33、以下关于VB的叙述中，错误的是A、VB采用事件驱动的编程机制B、如果程序中有Sub_Main过程时，则一定从该过程开始执行C、工程文件中包含多个窗体时，可以指定启动窗体D、VB程序既可以编译执行，也可以解释执行标准答案：B知识点解析：在一般情况下，整个应用程序从设计时的第一个窗体开始执行，需要首先执行的程序代码放在Form_Load事件过程中。如果需要从其他窗体开始执行应用程序，则可通过"工程"菜单中的"工程属性"命令("通用"选项卡)指定启动窗体。但是，如果有SubMain过程，则可以(注意，是"可以"，而不是"必须")首先执行SubMain过程。34、下面能够将某个变量声明为局部变量的是A、在窗体模块的声明部分，用关键字Static声明这个变量B、在窗体模块的声明部分，用关键字Dim声明这个变量C、在需要使用这个变量的过程中，用关键字Private声明这个变量D、在需要使用这个变量的过程中，用关键字Public声明这个变量标准答案：C知识点解析：VB中变量的作用域分为：局部变量：在过程内用Dim语句或用Static语句声明的变量，只能在本过程中使用。窗体/模块级变量：在"通用声明"段中用Dim语句或用Private语句声明的变量,可被本窗体/模块的任何过程访问。全局变量：在"通用声明"段中用Public语句声明的变量，可被本应用程序的任何过程或函数访问。35、结构化程序设计中，下面对goto语句使用描述正确的是A、禁止使用goto语句B、使用goto语句程序效率高C、应避免滥用goto语句D、以上说法均错误标准答案：C知识点解析：结构化程序设计中，要注意尽量避免goto语句的使用，故选C。36、在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：PrivateSubCommand1_Click()Dimn()AsIntegerDima,bAsIntegera=InputBox("Enterthefirstnumber")b=InputBox("Enterthesecondnumber")ReDimn(aTob)Fork=LBound(n)ToUBound(n)n(k)=kPrintn(k);NextkEndSub程序运行后，单击命令按钮，在输入对话框中分别输入2和3，输出结果为A、12B、23C、34D、45标准答案：B知识点解析：输入2和3后，n被重新定义，下标为2，上标为3。For循环执行2次，k=2和k=3。因此选B）。37、有下面程序代码：PrivateSubCommand1_Click()a=3s=0Fork=1To5s=s+aModka=a+kNextkPrintsEndSub程序运行后，单击命令按钮Command1，输出结果是A、15B、13C、4D、1标准答案：C知识点解析：Mod为求余函数。For循环执行5次。第一次执行时aModk的值为0，则s=0，a=4；循环继续直到k=5退出。分步计算可得最后s=4，选C）。38、列表框中被选中的数据项的位置可以通过一个属性获得，这个属性是()。A、ListB、ListIndexC、TextD、ListCount标准答案：B知识点解析：列表框控件的ListIndex属性值是已选中的表项的位置。表项位置由索引值指定，第一项的索引值为0，第二项为1，以此类推。如果没有任何项被选中，ListIndex的值将设置为－1。39、窗体上有名称为List1的列表框。以下能够将列表框当前选定的列表项替换为字符串"Basic"的语句是A、List1.AddItem"Basic"B、List1.List(List1.ListIndex)="Basic"C、List1.Text="Basic"D、以上都可以标准答案：B知识点解析：AddItem用于将列表项添加到列表框。Text属性是被选定的选项的文本内容。列表框的List属性用来列出表项的内容，也可以改变数组中的已有值，属性ListIndex用于返回当前选择的列表项的索引号。选项B正确。40、设窗体上有1个名称为CommandI的命令按钮，并编写了下面的事件过程：PrivateSubCommand1_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)PrintX，YEndSub运行程序后，当用鼠标单击命令按钮时，则输出的是()。A、单击鼠标时鼠标光标相对于命令按钮左上角的坐标B、单击鼠标时鼠标光标相对于窗体左上角的坐标C、单击鼠标时鼠标光标相对于屏幕左上角的坐标D、命令按钮左上角的坐标标准答案：A知识点解析：本题考查按钮控件的鼠标按下事件过程，在command1_MouseDown事件过程中鼠标位置由参数X、Y确定，当鼠标移动到按钮上，单击鼠标，则触发MouseDown事件过程，并输出鼠标光标相对于按钮控件左上角的位置，故A选项叙述正确。本题选择A选项。二、基本操作题(本题共2题，每题1.0分，共2分。)请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。41、在名称为Form1的窗体上画一个名称为CD1的通用对话框，通过属性窗口设置CD1的初始路径为C：＼，默认的文件名为None，标题为“保存等级考试”，如图2所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。标准答案：[操作步骤]步骤1：新建一个“标准。EXE”工程，选择[工程]→[部件]命令，在弹出的“部件”对话框的列表中选中“MicroSoftCommonDiMogControl6．0”项目，单击“确定”按钮。步骤2：在窗体Form1上画一个通用对话框，其相关属性设置如表12—7所示。步骤3：编写Form1的Iroad事件，加入下面的代码：CD1．ShowSave步骤4：按要求将文件保存至考生文件夹中。知识点解析：通用对话框的InitDir属性用于为打开或另存为对话指定初始的目录，如果此属性没有指定，则使用当前目录。通用对话框的初始路径由InitDir属性设置，默认文件名由FileName属性设置，标题由DialogTitle属性设置。42、在名称为Form1的窗体上设计一个菜单。要求在窗体上添加名为menu0，标题为“菜单命令”的主菜单，再添加两个名称分别为“menu1”、“menu2”，标题分别为“不可用菜单项”、“上一菜单项可用”的子菜单，并且使程序运行时，menu1子菜单不可用，menu2子菜单已经选中(运行时的效果如图3所示)。再编写适当的事件过程，使得程序运行时，单击“上一菜单项可用”，则“不可用菜单项”变为黑色(可用)。要求程序中不得使用变量，且只有一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为sit2．vbp，窗体文件名为sit2．Frm。标准答案：[操作步骤]步骤1：新建一个“标准EXE”工程，打开VB菜单设计器设计菜单，各菜单项及属性设置如表12—8所示。步骤2：打开代码编辑窗口，编写“上一菜单项可用”命令的Click事件过程。参考代码：PrivateSubmenu2_Click()menu1．Enabled=TrueEndSub步骤3：按要求将文件保存至考生文件夹中。知识点解析：①VB中的菜单是通过菜单编辑器来设计的。菜单编辑器中的基本设置项有：“标题”项，对应出现在菜单中的显示内容；“名称”项，系统识别菜单项的唯一关键字(不能重复)；“索引”项，用于设置菜单数组中各元素的索引号；“快捷键”项，是一个下拉列表框，用于设置菜单项的快捷键；“帮助上下文”项，设置当鼠标移动到某菜单项上按＜Fl＞键时显示的帮助信息在帮助文件中的对应位置；Visible(可见)项，用于设置控件或菜单项在程序运行时是否可见，值为True表示可见，值为False表示不可见；Enabled(有效)项，用于设置控件或菜单项在程序运行时是否有效，值为True时表示有效，值为False时表示无效(显示为灰色)。通过编辑按钮区的七个按钮可对菜单进行添加、插入、删除、提升(设置为上一级菜单)、缩进(设置为下一级菜单)、上移、下移等操作。②文本框的Text属性用于设置或返回其显示的文本内容。本题原程序设计思路：在“上一菜单项可用”命令的单击事件过程中，通过语句设置“不可用菜单项”命令的Enabled属性值为True。三、简单应用题(本题共1题，每题1.0分，共1分。)43、(1)考生文件夹中有工程文件sjt3．vbp。在窗体卜有名称为Combo1的组合框，请设置该组合框的属性，使该组合框只能用于选择操作，不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项，如图5(A)所示，单击“输入正整数”按钮，通过输入对话框输入一个正整数，再单击“判断”按钮，则按照选定的选项内容，将判断结果显示在信息框中。如图5(b)所示的是输入56且选中的组合框选项为“判奇偶数”时显示的信息框。在给出的窗体文件中已经有了全部控件，但程序不完整，要求：按照题目要求设置组合框的有关属性，去掉程序中的注释符，把程序中的?改为正确的内容。注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。(2)在考生目录下有一个工程文件sjt4．vbp。窗体上有一大一小两个名称分别为Shape2、Shape1的Shape控件。请在属性窗口中将Shapel控件设置为圆形，并将其颜色设置为红色(，颜色值为&H000000FF&)，如图6所示。要求：当单击窗体时，Shape1移动到矩形(即Shape2)左上角，再次单击窗体，则Shape1移动到矩形的右下角。在给出的窗体文件中已经有了全部控件，但程序不完整。要求：在属性窗口中设置有关的属性值，去掉程序中的注释符，把程序中的?改为正确的内容。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。标准答案：第1小题【操作步骤】步骤1：打开考生文件中的本题工程文件sjt3．vbp，将组合框的Style属性设置为2。步骤2：在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码：SelectCaseCombol．ListInDexMsgBoxStr(x)&f1(x)MsgBoxStr(x)&f2(x)PrivateFunctionf2(ByValxAsInteger)AsStringIfxMoD7=0Then步骤3：按要求将文件保存至考生文件夹中。第2小题【操作步骤】步骤1：打开考生文件中的本题工程文件sjt4．vbp，将Shape1控件的Shape属性设置为3，BackColor属性设置为