国家二级（VB）机试模拟试卷6（共397题）

国家二级（VB）机试模拟试卷6（共9套）（共397题）国家二级（VB）机试模拟试卷第1套一、选择题(本题共40题，每题1.0分，共40分。)1、以下选项中，不合法的VisualBasic的变量名是()。A、a5bB、_xyzC、a_bD、andif标准答案：B知识点解析：2、下列有关文件的叙述中，正确的是()。A、以Output方式打开一个不存在的文件时，系统将显示出错信息B、以Append方式打开的文件，既可以进行读操作，也可以进行写操作C、在随机文件中，每个记录的长度是固定的D、无论是顺序文件还是随机文件，其打开的语句和打开方式都是完全相同的标准答案：C知识点解析：A选项错误原因：当以Output方式打开一个不存在的顺序文件时，Open语句会首先创建该文件，然后再打开它，系统不会出错。B选项错误原因：以Append方式打开文件后，可将内存中的数据追加到顺序文件的尾部，可进行写操作，不能进行读操作。D选项错误原因：VB中三种可访问的文件有：顺序文件、随机文件和二进制文件，不同文件打开的方式是不同的。C选项中随机文件中的每一行称为一条记录，每条记录的长度相同，通过记录号来定位和查找指定记录。故C选项正确。3、在E-R图中，用来表示实体联系的图形是()。A、椭圆形B、矩形C、菱形D、三角形标准答案：C知识点解析：在E—R图中实体集用矩形，属性用椭圆，联系用菱形。4、在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程：PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimstrAsString，nAsIntegerstr=UCase(Chr(KeyAscii))n=Len(str)Text1．Text=String(n，str)EndSub程序运行后，如果在文本框中输入字母“P”，则在文本框中显示的内容为()。A、ppB、pPC、PPD、Pp标准答案：B知识点解析：本题考查字符串函数的应用。在Text1中按下字母“p”，则首先显示字符“p”，接下来触发KeyPress事件，其中，UCase把字符“p”转化为大写字母，显示大写字母“P”。5、下列方法中，属于白盒法设计测试用例的方法的是()。A、错误推测B、因果图C、基本路径测试D、边界值分析标准答案：C知识点解析：白盒测试方法也称为结构测试或逻辑测试，主要方法有逻辑覆盖测试、基本路径测试等。6、以下数据结构中，属于非线性数据结构的是()。A、栈B、线性表C、队列D、二叉树标准答案：D知识点解析：二叉树属丁非线性结构。栈是一种特殊的线性表，这种线性表只能在固定的一端进行插入和删除操作；队列可看作是捅入在一端进行，删除在另一端进行的线性表。7、使用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。8、以下叙述中错误的是()。A、VisualBasic是事件驱动型可视化编程工具B、VisualBasic应用程序不具有明显的开始和结束语句C、VisualBasic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性D、VisualBasic中控件的某些属性只能在运行时设置标准答案：C知识点解析：VB工具箱中不是所有的控件都具有宽度和高度属性，比如定时器控件Timer、直线控件Line就没有。故C选项错误。9、在菜单编辑器中建立如下图所示的菜单，并为了每个菜单项编写了鼠标单击事件过程。关于此菜单，以下叙述中错误的是()。A、针对此菜单进行操作，单击"斜体"菜单项时，将执行它的鼠标单击事件过程B、针对此菜单进行操作，单击"下划线"菜单项时，"√"被去掉C、针对此菜单进行操作，单击"退出"菜单项时，不能执行对应的单击事件过程D、针对此菜单进行操作，单击"编辑"菜单项时，打开下拉菜单，但不执行相应的单击事件过程标准答案：D知识点解析：菜单项中不管是主菜单还是子菜单，单击某个菜单项，都会执行它们相应的单击事件过程。故D选项叙述错误。10、下面有关标准模块的叙述中，错误的是()。A、标准模块的文件扩展名为.basB、标准模块中的Private过程不能被工程中的其他模块调用C、标准模块不完全由代码组成，还可以有窗体D、标准模块中的全局变量可以被工程中的任何模块引用标准答案：C知识点解析：标准模块是只含有程序代码的应用程序文件，其扩展名为.bas。标准模块是应用程序内其它模块可访问的过程和声明的容器，它们可以包含变量、常数、类型、外部过程和全局过程的全局(在整个应用程序范围内有效的)声明或模块级声明，它由3部分组成：①全局变量声明；②模块层声明；③通用过程。其中，全局声明放在标准模块的顶部，因为每个模块都可能要求有它自己的惟一名字的全局变量。全局变量的作用域最大，可以在工程的每个模块、每个过程中使用。在默认情况下，模块级变量对该模块中的所有过程都是可见的，但对其他模块中的代码不可见。11、公司中有多个部门和多名职员，每个职员只能属于一个部门，一个部门可以有多名职员。则实体部门和职员间的联系是A、1：1联系B、m：1联系C、1：m联系D、m：n联系标准答案：C知识点解析：两个实体集间的联系实际上是实体集间的函数关系，主要有一对一联系（1:1）、一对多联系（1:m）、多对一联系（m:1）、多对多联系（m:n）。对于每一个实体部门，都有多名职员，则其对应的联系为一对多联系（1:m），答案选C。12、算法的时间复杂度是指()。A、设计该算法所需的工作量B、执行该算法所需要的时间C、执行该算法时所需要的基本运算次数D、算法中指令的条数标准答案：C知识点解析：算法的时间复杂度是指执行算法所需要的计算工作量。它与算法程序执行的具体时间并不一致，因为算法执行的具体时间受到所使用的计算机、程序设计语言以及算法实现过程中许多细节的影响。算法的计算工作量是用算法所执行的基本运算次数来度量的。故选C选项。13、下列声明中正确的是()。A、Dima()AsBooleanReDima(8，5)B、Dima()ReDima(5)AsInteuerC、Dima．(3)AsIntegerReDima(5)D、Dima()ReDima()标准答案：A知识点解析：动态数组以变量作为下标值，在程序运行过程中完成定义，通常分为两步：首先在窗体层、标准模块或过程中用Dim或Public声明一个没有下标的数组(括号不能省略)，当使用Dim定义数组时，如省略“As类型名称”，则数组默认为Variant型。然后在过程中用ReDim语句定义带下标的数组，可以使用ReDim语句反复地改变数组的元素以及维数的数目，但是不能将一个数组定义为某种数据类型之后，再使用ReDim将该数组改为其他数据类型，除非是Variant所包含的数组。故A选项符合条件。14、某棵树的度为4，且度为4、3、2、1的结点数分别为1、2、3、4，则该树中的叶子结点数为()。A、11B、9C、10D、8标准答案：A知识点解析：由题目可以知道，若四种度的结点分开成子树，共包含结点(4+1)+2×(3+1)+3×(2+1)+4×(1+1)=30个，当组合成一棵树时，任选一个度不为0的结点作为根结点，则新的树结点个数为30一2—3—4=21个，则该树中叶子结点个数为21—1—2—3—4=11。故选择A选项。15、在窗体上画一个通用对话框，其名称为CommonDialogl，则下列与CommonDialogl．ShowOpen方法等效的语句是()。A、CommonDialogl．Action=lB、CommonDialogl．Action=2C、CommonDialogl．Action=3D、CommonDialogl．Action=4标准答案：A知识点解析：通用对话框的属性Action=1与ShowOpen方法等效，而Action=2则与ShowSave等效。16、如果一个菜单项的Enabled属性被设置为False，则程序运行时，该菜单项()。A、不显示B、显示但无效C、有效可用D、不显示但有效可用标准答案：B知识点解析：菜单项默认情况下显示，Enabled属性值为False表示菜单项无效。所以菜单项显示但无效。故选B。17、以下叙述中错误的是()。A、程序运行过程中装入窗体时，系统自动触发该窗体的Load事件B、VisualBasic应用程序只能以解释方式执行C、打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件D、事件过程是一段程序，当相应事件发生时被调用标准答案：B知识点解析：在Visual：Basic环境中，程序可以以解释的方式执行，也可以生成可执行文件(．EXE)，故B选项叙述错误，其他三项叙述均正确。本题选择B选项。18、利用通用对话框控件打开字体对话框的操作是A、把通用对话框控件的Action属性设置为4B、把通用对话框控件的Action属性设置为5C、调用通用对话框控件的OpenFont方法D、调用通用对话框控件的ShowText方法标准答案：A知识点解析：通用对话框(CommonDialog)提供诸如打开文件、保存文件、设置打印选项、选择颜色和字体、显示帮助等操作的一组标准对话框，该控件运行时不可见。通用对话框的Action属性用于设置被打开对话的类型。19、数据库设计过程不包括A、概念设计B、逻辑设计C、物理设计D、算法设计标准答案：D知识点解析：数据库设计过程主要包括需求分析、、概念结构设计、逻辑结构分析、数据库物理设计、数据库实施、数据库运行和维护阶段。答案为D选项。20、在软件开发中，需求分析阶段产生的主要文档是()。A、可行性分析报告B、软件需求规格说明书C、概要设计说明书D、集成测试计划标准答案：B知识点解析：A)错误，可行性分析阶段产生可行性分析报告。C)错误，概要设计说明书是总体设计阶段产生的文档。D)错误，集成测试计划是在概要设计阶段编写的文档。B)正确，需求规格说明书是后续工作如设计、编码等需要的重要参考文档。21、以下关于SelectCase语句的叙述中，正确的是A、SelectCase语句中的测试表达式可以是任何形式的表达式B、SelectCase语句中的测试表达式只能是数值表达式或字符串表达式C、子句Case中的表达式可以是逻辑表达式D、不是所有的SelectCase语句都能用If语句代替标准答案：B知识点解析：SelectCase语句中的测试表达式只能是数值表达式或字符串表达式，故B正确，A错误。子句Case中的表达式可以是值的形式，也可以是表达式To的形式，还可以是Is关系运算表达式的形式，但不能是逻辑表达式形式，故C错误；所有的SelectCase语句都能用If语句替代。22、在窗体上画两个名称分别为Hscroll1、Hscroll2的滚动条控件；6个名称分别为Label1、Label2、Label3、Label4、Label5、Label6的标签，其中，Label4～Label6分别显示“A”、“B”、“A*B”等文字信息，标签Label1、Label2分别显示其右侧的滚动条Value属性值，Label3显示A*B的计算结果，如图1所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中。以下不能实现求积功能的事件过程是()。A、PrivateSubCommandl_Click()Label3．Caption=Str(Val(Label1．Caption)*Val(Label2．Caption))EndSubB、PrivateSubCommandl_Click()Label3．Caption=HScroll1．Value*HScroll2．ValueEndSubC、PrivateSubCommandl_Click()Label3．Caption=HScrolll*HScroll2EndSubD、PrivateSUbCommandl_Click()Label3．Caption=HScroll1．Text*HScroll2．TextEndSub标准答案：D知识点解析：本题考查滚动条的属性。滚动条Value属性表示滑块的位置值，为数值型；而标签的Caption为字符串型。因此，要将滚动条的Value属性值显示在标签上，需要进行类型转换(将数值型数据转换成字符串型数据)。23、某人编写了向随机文件中写一条记录的程序，代码如下：TypeRTypeNameAsString*10TelAsString*20EndTypePrivateSubCommand1_Click()DimpAsRTypep.Name＝InputBox("姓名")p.Tel＝InputBox("电话号")Open"Books.dat"ForRandomAs#1Put#1，，pClose#1EndSub该程序运行时有错误，修改的方法是()。A、在类型定义"TypeRType"之前加上"Private"B、DimpAsRType必须置于窗体模块的声明部分C、应把Open语句中的ForRandom改为ForOutputD、Put语句应该写为Put#1，p.Name，p.Tel标准答案：A知识点解析：记录类型的定义必须放在模块的声明部分，当在标准模块中定义时，关键字Type前可以有Public(默认)或Private，而如果在窗体模块中定义，则必须在前面加上关键字Private。Open语句中使用ForRandom表示文件以随机方式存取。Put语句的语法为：Put#文件号，[记录号]，变量。其中"变量"是除对象变量和数组变量外的任何变量。24、在名称为Frame1的框架中，有两个名称分别为op1、op2的单选按钮，标题分别为"单程"、"往返"，如图所示。以下叙述中，正确的是()。A、若仅把Frame1的Enabled属性设为False，则op1、op2仍可用B、对于上图，op1.Value的值为TrueC、对于上图，执行Op1.Value＝False命令，则"往返"单选按钮被选中D、对于上图，执行Op1.Value＝0命令，程序出错标准答案：B知识点解析：当Frame1的Enabled属性设为False后，框架Frame1变为不可用，它里面放的两个单项按钮也就变为不可用，故A选项错误；当Op1.Value为False时，"单程"和"往返"单项按钮都处于未选中状态，故C选项错误；Op1.Value的值为0，即为False，语句正确，没有程序错误，故D选项说法错误；根据图可只，"单程"单选按钮处于选中状态，Op1.Value的值为True，故B选项正确。25、执行以下程序时，在窗体上单击鼠标后，将出现输入对话框，此时，直接按下回车键，窗体上的输出结果是PrivateSubForm_Click()DimSAsStringS=InputBox("inputdata","important","学习VisualBasic")PrintUCase(Mid(S,InStr(S,"i"),2))EndSubA、INB、IMC、ISD、IC标准答案：C知识点解析：InputBox函数的格式为InputBox(prompt[，title][，default[，xpos，ypos][，helpfile,context]），题中prompt："inputdata"用来提示用户输入；"important"是对话框的标题。default："学习VisualBasic"即输入对话框的默认显示信息，并在用户没有输入的情况下，作为默认输入。因此在出现对话框时，直接按回车键，故S的值为默认值即S="学习VisualBasic"。字符串匹配函数Instr(s1,s2):在字符串s1中查找s2的位置，返回值为s2的第一个字符在s1中的位置，若找不到，则返回值为0。InStr(S,"i")在字符串"学习VisualBasic"中查找"i"的位置，返回值为4。Mid(s,n1，n2)是字符串截取函数，从s的第n1个字符开始，向后截取n2个字符，故Mid(S,4,2)=is；UCase函数将字符串中的小写字母转换为大写字母。故正确答案为C选项。26、设有如下程序段，则正确的说法是Fori=1To100Step0x=x+1NextA、该循环为无限循环B、该循环只循环1次C、该程序段有语法错误，不能执行，系统报错D、该循环循环100次标准答案：A知识点解析：题目中的"Step0"表示在For循环中步长为0，即i的取值均为1，循环结束条件为i>=100，该循环为无限循环。故正确答案为A选项。27、有下面程序代码：PrivateSubCommand1_Click()Dima,sAsIntegera=7:b=4Doc=aDoc=c-bLoopUntilc<bOrc=0Printc;a=a-1LoopUntilc=0EndSub程序运行产生的输出是A、0123B、3210C、1230D、2301标准答案：B知识点解析：先执行内层Do循环，结束后执行外层Do循环。由题意可知，c=a=7，当执行内层Do循环时，c=c-b=3，此时判断条件c<b成立，内层循环结束，执行Printc，输出的第1个值为3，执行a=a-1后，a=6，重复执行Do循环，依次输出2、1、0，直至判断条件c=0成立，结束整个循环。故正确答案为选项B。28、下面关于菜单的叙述中正确的是A、为了使得选中一个菜单项就可以执行某种操作，要为它的Click事件过程编写执行该操作的代码B、同一级菜单中的菜单项不能同名，但不同级菜单中的菜单项可以同名C、只能使用鼠标右键把弹出式菜单弹出来D、弹出式菜单中的菜单项不能再有自己的子菜单标准答案：A知识点解析：Click事件在鼠标单击时触发，要使得选中菜单项就执行某种操作，可以在Click事件过程中编写需要执行的操作代码。A）正确。VB中的菜单项不管是同级还是不同级都不允许同名，B）错误。一般情况下，不显示弹出式菜单。需要时用PopupMenu方法显示弹出式菜单。C）错误。VB中允许有多级弹出式菜单，D）错误。29、对长度为n的线性表作快速排序，在最坏情况下，比较次数为A、nB、n-1C、n(n-1)D、n(n-1)/2标准答案：D知识点解析：快速排序最坏情况就是每次选的基准数都和其他数做过比较，共需比较(n-1)+(n-2)+…+1=n(n-1)/2，选D。30、窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下：PrivateSubCommand1_Click(IndexAsInteger)IfIndex＝1ThenPrint"计算机等级考试"EndIfIfIndex＝2ThenPrintCommand1(2).CaptionEndIfEndSub运行程序，单击"命令按钮2"，则如下叙述中正确的是()。A、PrintCommand1(2).Caption语句有错B、在窗体上显示"命令按钮2"C、在窗体上显示"命令按钮3"D、在窗体上显示"计算机等级考试"标准答案：D知识点解析：控件数组与数据数组一样下标默认从0开始，即本题中按钮控件数组的Index值为0,1,2，分别对应命令按钮1、命令按钮2、命令按钮3。当单击命令按钮2时，Index值为1，因此程序会输出"计算机等级考试"。31、对于列表框控件List1，能够表示当前被选中列表项内容的是()。A、List1.TextB、List1.IndexC、List1.ListIndexD、List1.List标准答案：A知识点解析：Text属性可返回当前被选中列表项的内容，故选A。Index属性是当有列表框控件数组时，区分各列表框用的；ListIndex属性返回的是被选中的列表项的索引值；List属性设置或返回各列表项的内容。32、以下关于函数过程的叙述中，正确的是()。A、函数过程形参的类型与函数返回值的类型没有关系B、在函数过程中，过程的返回值可以有多个C、当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递D、如果不指明函数过程参数的类型，则该参数没有数据类型标准答案：A知识点解析：定义函数过程的格式：Function函数过程名([形参表])As函数返回值的数据类型函数过程名＝表达式EndFunction说明：①形参的类型可以是任何数据类型，函数返回值的类型是调用函数后返回的数据类型，，他们没有关系，互不影响。故选项A正确。②选项B错误的原因是：函数过程中可以有多个"函数过程名＝表达式"这样的语句，但是最终函数只能有一个返回值。如果省略这条语句，函数过程则返回一个默认值，数值函数过程返回0，字符串函数过程返回空字符串。③选项C错误的原因是：数组作为函数过程的参数时，这时数组名看作是一个符号地址，实参和形参之间传递的是地址，所以以传址方式传递。④选项D错误的原因是：形参如果没指明数据类型，默认为Variant类型。33、窗体如图1所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击"删除"按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能：PrivateSubCommand1_Click()Dimn%，k%n＝Len(Text1.Text)Fork＝0ToListl.ListCount－1IfLeft(List1.List(k)，n)＝Text1.TextThenList1.RemoveItemkEndIfNextkEndSub在调试时发现，如输入"陈"，可以正确删除所有姓"陈"的项目，但输入"刘"，则只删除了"刘邦"、"刘备"2项，结果如图2所示。这说明程序不能适应所有情况，需要修改。正确的修改方案是把Fork＝0ToList1.ListCount－1改为()。A、Fork＝List1.ListCount－1To0Step－1B、Fork＝0ToList1.ListCountC、Fork＝1ToList1.ListCount－1D、Fork＝1ToList1.ListCount标准答案：A知识点解析：错误原因：每一次删除列表框满足项，列表框的项目数目就会相应地减少，所以就出现了漏删内容，如果把循环变量k改成从List1.ListCout－1到0，从最后一个项目往第一个项目查找，满足条件就删除该项目，从而不会出现遗漏现象，所以正确答案为A。34、以下关于通用对话框的叙述中，错误的是()。A、在程序运行状态下，通用对话框控件是不显示的B、通用对话框控件是VisualBasic的标准控件C、设计时，通用对话框控件的大小是固定的，不能改变D、在同一个程序中，一个通用对话框控件可以作为打开、保存等多种对话框标准答案：B知识点解析：通用对话框是一个ActiveX控件，不是标准控件，故B选项错误。35、设循环队列的存储空间为Q(1:35)，初始状态为front=rear=35。现经过一系列入队与退队运算后，front=15，rear=15，则循环队列中的元素个数为A、15B、16C、20D、0或35标准答案：D知识点解析：在循环队列中，用队尾指针rear指向队列中的队尾元素，用排头指针front指向排头元素的前一个位置。在循环队列中进行出队、入队操作时，头尾指针仍要加１，朝前移动。只不过当头尾指针指向向量上界时，其加１操作的结果是指向向量的下界０。由于入队时尾指针向前追赶头指针，出队时头指针向前追赶尾指针，故队空和队满时，头尾指针均相等。答案为D选项。36、在窗体上画一个文本框，其名称为Text1，然后编写以下程序：PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSubPrivateSubText1_KeyPress(KeyAsciiAsInteger)Char=Chr(KeyAscii)KeyAscii=Asc(UCase(Char))EndSub以上程序的功能是A、把输入到文本框中的字母转换为小写显示B、把从键盘上输入的字符在文本框中原样显示C、把输入到文本框中的字母转换为大写显示D、把输入到文本框中的字符转换为其ASCII码显示标准答案：C知识点解析：Chr()是把ASCII码转换为对应的字符。UCase转换成大写。Asc求字符串表达式的第一个字符的ASCII编码。答案选C）。37、语句：PrintAsc(Chr$(Mid$("98765432",4,2)))的输出是A、65B、AC、8765D、W标准答案：A知识点解析：Mid$(字符串,p,n)从第P个字符开始,向后截取n个字符。Chr$()是求ASCII字符的函数,格式是Chr$(表达式),其中"表达式"应该是合法的ASCII码值，Chr$()函数把"表达式"的值转换为相应的ASCII字符。Asc(<字符串表达式>)，求字符串表达式的第一个字符的ASCII编码，函数返回值类型为Integer。38、工程中有Form1、Form2两个窗体（Form1中有文本框Text1；Form2中有Text1文本框和Command1命令按钮）。Form1是启动窗体。在这些模块中编写下面的程序代码：Form1中的代码如下：PrivateSubText1_DblClick()Text1="VisualBasic"Form2.ShowEndSubForm2中的代码如下：PrivateSubCommand1_Click()Text1=Form1.Text1Form1.ShowEndSub下面关于程序的叙述中错误的是A、双击Form1的Text1后,Text1中显示"VisualBasic"，弹出Form2B、双击Form1的Text1后，Form2成为当前窗体C、单击Form2的命令按钮，Form1成为当前窗体D、Form2的Text1=Form1.Text1语句不能正确执行标准答案：D知识点解析：本题考察窗体切换的知识。双击Form1的Text1时触发Text1_DblClick事件，Text1中显示"VisualBasic"，弹出Form2，此时，Form2成为当前窗体；单击Form2的命令按钮时触发Command1_Click事件，Form1成为当前窗体。选D）。39、A、选择B、投影C、交D、并标准答案：D知识点解析：关系T中的元素与关系R和关系S中不同元素的总和，因此为并操作。40、设有如下的程序段：n＝0Fori＝1To3Forj＝1ToiFork＝jTo3n＝n＋1NextkNextjNexti执行上面的程序段后，n的值为()。A、3B、21C、9D、14标准答案：D知识点解析：程序是三层的For循环，内层的循环次数由外一层的循环变量的值决定。因此程序执行过程如下：i＝1时，第二层循环执行1次，第三层循环执行3次，n＝3i＝2时，第二层循环执行2次，第三层循环执行3次＋2次，n＝3＋3＋2＝8i＝3时，第二层循环执行3次，第三层循环执行3次＋2次＋1次，n＝8＋3＋2＋1＝14因此答案为D。二、基本操作题(本题共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、在考生文件夹下有一个工程文件sjt4．vbp，相应的窗体文件为sjt4．frm，在窗体上有一个文本框和一个命令按钮。当程序运行后，单击命令按钮，即可计算出0～100范围内所有偶数的平方和，并显示在文本框中。在窗体的代码窗口中，已给出了部分程序，其中计算偶数平方和的操作在通用过程Fun中实现，请编写该过程的代码。要求：请勿改动程序中的任何内容，只在FunctionFun()和EndFunction之间填入你编写的若干语句。最后将修改后的文件按原文件名存盘。标准答案：步骤1：打开本题工程文件。步骤2：分析并编写程序代码。程序提供代码SubSaveData()OpenApp．Path&”＼”＆”outtxt．txt”ForOutputAs#1Print#1,Text1．TextClose#1EndSubFunctionFun()EndFunctionPrivateSubCommandl_Click()d=Fun()Text1．Text=dSaveDataEndSub程序结束FunctionFun()DimsAsLong，iAsIntegers=0Fori=0To100IfiMod2=0Thens=s+i^2EndIfNextiFun=sEndFunction步骤3：调试并运行程序，关闭程序后按题目要求存盘。知识点解析：根据题意，通过For循环语句的循环变量i(初值为0，终值为100，步长为2)来获得0～100范围内的所有偶数，并逐一将i^2的值累加到变量s，最后将s的值显示在文本框中，并将其作为函数返回值。四、综合应用题(本题共1题，每题1.0分，共1分。)44、在考生文件夹中有一个工程文件sit5．vbp。窗体外观如图3．134所示。运行程序，单击“读数据”按钮，文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时，对读入的数据从小到大排序，并将排序结果显示在窗体的Label4控件中。要求：工程文件中已给出部分程序，“读数据”命令按钮的事件过程不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。请编写“排序”命令按钮的事件过程中的部分程序代码。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后，两个命令按钮的事件过程必须至少各执行一次。标准答案：【操作步骤】步骤1：打开考生文件夹中的本题工程文件sjt5．vbp，在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码：DoWhileNotEOF’(1)s=s＆Str(a(i))步骤2：在代码编辑窗口指定位置编写以下代码：参考代码：num=UBound(a)Fori=1Tonum一1Forj=iTonumIfa(i)>a(j)Thent=a(i)a(i)=a(j)a(j)=tEndIfNextNext步骤3：按键运行程序，先单击“读数据”按钮，再单击“排序”按钮，最后单击窗体右上角的关闭按钮结束程序。步骤4：按要求将文件保存至考生文件夹中。知识点解析：暂无解析国家二级（VB）机试模拟试卷第2套一、选择题(本题共40题，每题1.0分，共40分。)1、在设计窗体时双击窗体的任何地方，可以打开的窗口是()。A、代码窗口B、属性窗口C、工程资源管理器窗口D、工具箱窗口标准答案：A知识点解析：设计窗体时双击窗体的任何地方，默认打开的是代码窗口。故选A。2、关于MDI窗体下列说法正确的是()。A、一个应用程序可以有多个MDI窗体B、子窗体可以移到MDI窗体以外C、不可以在MDI窗体上放置按钮控件D、MDI窗体的子窗体不可拥有菜单标准答案：C知识点解析：本题考查MDI窗体。一个应用程序仅可以拥有一个MDI窗体，可以有多个子窗体，所有的子窗体必须在父窗体之内显示，在父窗体界面上可以放置菜单、工具栏或图片框，但是不允许放置命令按钮。3、一间宿舍可住多个学生，则实体宿舍和学生之间的联系是()。A、一对一B、一对多C、多对一D、多对多标准答案：B知识点解析：因为一间宿舍可以住多个学生即多个学生住在一个宿舍中，但一个学生只能住一间宿舍，所以实体宿舍和学生之间是一对多的关系。4、下列哪一条不属于数据库设计的任务?()A、设计数据库应用结构B、设计数据库概论结构C、设计数据库逻辑结构D、设计数据库物理结构标准答案：A知识点解析：数据库设计工作量大而且过程复杂，既是一项数据库工程也是一项庞大的软件工程。考虑数据库及其应用系统开发全过程，将数据库设计分为以下6个阶段：需求分析、概念结构设计、逻辑结构设计、物理结构设计、数据库实施和数据库的运行和维护。5、可以产生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选项正确。6、要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目，则应把该列表框的MultiSelect属性设置为()。A、0B、1C、2D、其他标准答案：B知识点解析：本题考查列表框的MultiSelect属性。默认状况下列表框仅可以选择一项，通过设置MultiSelect属性值可改变多选设置，该属性有3种值：0表示禁止多选；1表示简单多选，在选项上单击可以选定多项；2为借助Ctrl和Shift键进行的多项选择。7、下列程序执行后，变量X的值为()。Dima，b，c，dAsSingleDimxAsSinglea＝10：b＝30：c＝400Ifb＞aThend＝a：a＝b：b＝dEndIfIfb＞CThenx＝bElselfa＞CThenx＝CElsex＝aEndIfA、10B、30C、400D、430标准答案：B知识点解析：本题考查选择语句的程序分析。If语句的执行是If条件表达式值为True时执行If分支，否则执行ElseIf分支或者结束。本题中首先判断b＞a成立，因此a、b的值交换；接下来由于b＞c不成立，a＞c也不成立，因此x的值为a。8、要清除已经在图片框Picturel中打印的字符串而不清除图片框中的图像，应使用语句()。A、Picture1．ClsB、Picture1．Picture=LoadPicture("")C、Picturel．Pint""D、Picturel．Picture""标准答案：A知识点解析：本题考查常用的方法。Cls方法的使用形式为：[对象]．Cls，作用是清除运行时在窗体或图形框中显示的文本或图形，而不能清除图像。要不清除在设计时的文本，同时也不能清除图形，应用LoadPicture可以清除或者装入图片。9、以下能够正确退出循环的县()。A、i=1Doi=i+lLoopUntili=10B、i=1Doi=i+lLoopUntili=10C、i=10Doi=i+1LoopUntili<0D、i=1Doi=i-3LoopUntili=0标准答案：B知识点解析：本题考查Do型循环。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件是否成立，至少执行一次循环体。由Until引出的循环条件为False时执行循环体，条件为True时退出循环；选项A中循环变量在10的基础上逐渐增加，不可能小于10；选项B中循环变量的步长为1，初值为1，可能到达10，然后退出循环。而选项C和A相似。选项D中循环变量的步长为．3，不可能等于0。10、程序流程图中带有箭头的线段表示的是()。A、图元关系B、数据流C、控制流D、调用关系标准答案：C知识点解析：在数据流图中，用标有名字的箭头表示数据流。在程序流程图中，用标有名字的箭头表示控制流。所以选择C。11、VB的数值型数据分为()两种。A、整数和长整数B、整数和浮点数C、单精度浮点数和双精度浮点数D、整数和货币数据类型标准答案：B知识点解析：本题考查数值型数据。VB中提供的数值类型包括整数、浮点数、货币类型和字节型。一般来讲货币类型为定点浮点数或者整数，而字节型为整数。12、下列模式中，能够给出数据库物理存储结构与物理存取方法的是()。A、内模式B、外模式C、概念模式D、逻辑模式标准答案：A知识点解析：数据库管理系统的三级模式结构由外模式、模式和内模式组成。外模式，或子模式，或用户模式，是指数据库用户所看到的数据结构，是用户看到的数据视图；模式，或逻辑模式，是数据库中对全体数据的逻辑结构和特性的描述，是所有用户所见到的数据视图的总和，外模式是模式的一部分；内模式，或存储模式，或物理模式，是指数据在数据库系统内的存储介质上的表示，即对数据的物理结构和存取方式的描述。13、VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Text1文本框中，则每输入一个字母()。A、这3个事件都会触发B、只触发KeyPress事件C、只触发KeyDown、KeyUp事件D、不触发其中任何一个事件标准答案：A知识点解析：当用户按下某键时触发KeyDown和KeyPress事件，放开某键时触发KeyUp事件。故每输入一个字符，这3个事件都会触发。故A选项正确。14、为了在运行时能显示窗体左上角的控制框(系统菜单)，可以设置以下哪个属性的值为True()。A、ControlBoxB、MinButtonC、MaxButtonD、BorderStyle标准答案：A知识点解析：考查窗体的常见属性。窗体中ControlBox属性用来控制是否显示控制菜单，属性值为False时不显示控制菜单。属性MinButton和MaxButton控制是否显示最大化和最小化按钮，属性BorderStyle则是设置窗体的边界样式。15、关于水平滚动条，如下叙述中错误的是()。A、当滚动框的位置改变时，触发Change事件B、当拖动滚动条中的滚动框时，触发Scroll事件C、LargeChange属性是滚动条的最大值D、Value是滚动条中滚动框的当前值标准答案：C知识点解析：LargeChange属性值是单击滚动块和左右两端箭头之间空白的地方时，Value增加或减少的量，Small属性值才是滚动条的最大值。故C选项错误。16、下面程序运行后，语句”Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger,jAsIntegeri=0Doi=i+1Forj=10To1Step-3i=i+jPrintiNextjLoopWhilei＜50EndSubA、4B、8C、12D、16标准答案：C知识点解析：考查双重循环的分析。程序段中的循环结构为外循环Do…LoopWhile，内部又包括了For循环，内循环的执行次数固定，每执行一次外循环，执行4次内循环，每次执行完内循环后，外循环变量i的值增加23，因此外循环共执行了3次。可推出内循环中的语句Printi共执行了12次。17、复选框是否被选中，取决于复选框的()。A、Enabled属性B、Value属性C、Checked属性D、Visible属性标准答案：B知识点解析：本题考查复选框的常见属性。复选框的Enabled属性决定复选框是否可用，Value属性决定复选框是否选定，其属性值有3种：0-Unchecked：表示未被选定，1-Checked：选定，2-Grayed：灰色，禁止选择；Visible属性决定其是否可见；复选框没有Checked属性。18、软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是()。A、学生成绩管理系统B、C语言编译程序C、UNIX操作系统D、数据库管理系统标准答案：A知识点解析：软件按功能可以分为：应用软件、系统软件、支撑软件。操作系统、编译程序、汇编程序、网络软件、数据库管理系统都属于系统软件。所以B、C、D都是系统软件，只有A是应用软件。19、以下关于图片框控件的说法中，错误的是()。A、可以通过Print方法在图片框中输出文本B、图片框控件中的图形可以在程序运行过程中被清除C、图片框控件中可以放置其他控件D、用Stretch属性可以自动调整图片框中图形的大小标准答案：D知识点解析：可以通过Print方法在图片框中输出文件，图片框中的图形可以在程序运行过程中通过载人空文件的方法清除，图片框控件可以作为父控件，即可以放置其他控件，Stretch属性用来自动调整图片框中图形内容的大小。20、支持子程序调用的数据结构是()。A、栈B、树C、队列D、二叉树标准答案：A知识点解析：栈支持子程序调用。栈是一种只能在一端进行插入或删除的线性表，在主程序调用子函数时要首先保存主程序当前的状态，然后转去执行子程序，最终把子程序的执行结果返回到主程序中调用子程序的位置，继续向下执行，这种调用符合栈的特点，因此本题的答案为A)。21、在窗体上画一个名称为Textl的文本框，并编写如下程序：OptionBase1PrivateSubForm＿Click()DimliltDimStartAsInteger，FinishAsIntegerDimSumAsIntegerart=Array(12，4，8，16)Start=LBound(arr)Finish=UBound(arr)Sum=0Fori=StartT0FinishSum=Sum+arr(i)Nextic=Sum／FinishTextl．Text=cEndSub运行程序，单击窗体，则在文本框中显示的是()。A、40B、10C、12D、16标准答案：B知识点解析：程序中将变量arr初始化为有4个元素的数组，使用Lbound和LJbound函数分别获取数组下标的上下限，然后将数组中的元素值相加，用整除运算求它们的平均值。算式可写为(12+4+8+16)／4=(40)／4=l0。所以答案为B。22、利用通用对话框控件打开字体对话框的操作是A、把通用对话框控件的Action属性设置为4B、把通用对话框控件的Action属性设置为5C、调用通用对话框控件的OpenFont方法D、调用通用对话框控件的ShowText方法标准答案：A知识点解析：通用对话框(CommonDialog)提供诸如打开文件、保存文件、设置打印选项、选择颜色和字体、显示帮助等操作的一组标准对话框，该控件运行时不可见。通用对话框的Action属性用于设置被打开对话的类型。23、设窗体上有1个名称为HScroll1的水平滚动条，其Max、Min属性分别设置为100、1；有2个名称分别为Option1、Option2的单选按钮，其标题分别为"30"、"50"；还有下面程序代码：PrivateSubOption1_Click()HScroll1=Val(Option1.Caption)EndSubPrivateSubOption2_Click()HScroll1=Val(Option2.Caption)EndSub程序运行时，单击Option2单选按钮，则滚动条上滚动框的位置是A、在最左边B、在最右边C、在中间D、在中间偏左的位置标准答案：C知识点解析：滚动条的Value属性用于设置滚动滑块所处的位置。Max和Min属性分别设置滚动条的最大值和最小值，水平滚动条的最左端为Min，最右端为Max，Max的值减去Min的值得到当前滚动条的刻度个数。单击Option2单选按钮，滚动滑块的位置设置为50，正好在整个滚动条的中间位置。因此，答案为C）。24、工程中有Form1、Form2两个窗体（Form1中有文本框Text1；Form2中有Text1文本框和Command1命令按钮）。Form1是启动窗体。在这些模块中编写下面的程序代码：Form1中的代码如下：PrivateSubText1_DblClick()Text1="VisualBasic"Form2.ShowEndSubForm2中的代码如下：PrivateSubCommand1_Click()Text1=Form1.Text1Form1.ShowEndSub下面关于程序的叙述中错误的是A、双击Form1的Text1后,Text1中显示"VisualBasic"，弹出Form2B、双击Form1的Text1后，Form2成为当前窗体C、单击Form2的命令按钮，Form1成为当前窗体D、Form2的Text1=Form1.Text1语句不能正确执行标准答案：D知识点解析：本题考察窗体切换的知识。双击Form1的Text1时触发Text1_DblClick事件，Text1中显示"VisualBasic"，弹出Form2，此时，Form2成为当前窗体；单击Form2的命令按钮时触发Command1_Click事件，Form1成为当前窗体。选D）。25、下列描述中，错误的是A、图片框控件和图像框控件都支持Print方法B、设计阶段，可以通过Picture属性把图形文件装入图片框C、运行期间，可以用LoadPicture函数把图形文件装入图片框D、运行期间，可以用LoadPicture函数删除图片框中的图形标准答案：A知识点解析：图片框控件可以作为其他控件的容器，可以使用Print方法在其中显示文本，而图像框不具有这些功能。选A。26、窗体上有一个名称为Text1的文本框，名称为Check1的两个复选框构成的控件数组，下标分别为1、2。窗体外观如图所示。要求在程序运行时，改变复选框选中状态，则文本框中文本的字体做相应变化。为此，某人编写了如下程序代码：PrivateSubCheck1_Click(IndexAsInteger)IfIndex=1AndCheck1(1).ValuethenText1.FontItalic=TrueElseText1.FontItalic=FalseEndIfIfCheck1(2).value=1thenText1.FontBold=TrueEndIfIfCheck1(2).value=0ThenText1.FontBold=FalseEndIfEndSub但是，以上程序在运行中不能完全达到要求，应进行修改，下面正确的修改是A、将IfIndex=1AndCheck1(1).ValueThen改为IfCheck1(1).ValueThenB、将第1个If条件中的Check1(1).Value改为Check1(1).Value=TrueC、将第2个If条件中的Check1(2).Value=1改为Check1(2).Value=TrueD、将第3个If条件中的Check1(2).Value=0改为Check1(2).Value=False标准答案：A知识点解析：复选框中的Value属性用来返回或设置复选的状态，值取0时，表示没有选中复选框，1表示选中复选框，2为该复选框为禁止。故进行修改应在第一个If条件中将"IfIndex=1AndCheck1(1).Value"改为"IfCheck1(1).Value"。这是因为当勾选斜体项时，Check1(1).Value为True，设置文本为斜体，否则将文本不设置为斜体。故选择A。27、在窗体上有一个List1列表框，并有如图所示的5个项目，还有一个Text1文本框和一个Command1命令按钮，并编写了如下程序代码：PrivateSubCommand1_Click()DimchAsStringch=""Fork=0ToList1.ListCount-1IfLeft(List1.List(k),Len("数据"))="数据"ThenList1.RemoveItemkEndIfNextkFork=List1.ListCount-1To0Step-1ch=ch&List1.List(k)NextkText1=chEndSub程序运行时单击命令按钮后，在文本框中显示的是A、程序设计计算机原理网络程序设计B、网络程序设计计算机原理程序设计C、程序设计数据结构计算机原理数据库原理网络程序设计D、网络程序设计数据库原理计算机原理数据结构程序设计标准答案：B知识点解析：程序主要是将列表框项目中，前两个字是"数据"字符的字符串删除，并将剩余项按从下往上的顺序，连接成一个新字符串，并显示在文本框中。Left（List1.List(k),Len("数据"））="数据"，这一语句是判断列表框中的项前两个字是否是"数据"，如果是，从列表框移除。然后，利用For循环，按照从下往上的顺序，将列表项的字符串连接起来。由题可知，项目中数据结构和数据库原理两个项的前两个字是"数据"，故将其删除。列表框项从下往上的顺序依次为网络程序设计、计算机原理和程序设计。将这三个字符串连接起来，并显示在文本框中，选项B正确。28、能够用于标识对象名称的属性是()。A、NameB、CaptionC、ValueD、Text标准答案：A知识点解析：每个对象都有Name属性，用于识别不同的对象。故选A。29、在窗体上画一个文本框，名称为Text1，然后编写如下程序：PrivateSubForm_Load()ShowText1.Text＝""Text1.SetFocusEndSubPrivateSubForm_Click()DimaAsString，sAsStringa＝Text1.Texts＝""Fork＝1ToLen(a)s＝UCase(Mid(a，k，1))＋sNextkText1.Text＝sEndSub程序运行后，在文本框中输入一个字符串，然后单击窗体，则文本框中的内容()。A、与原字符串相同B、与原字符串中字符顺序相同，但所有字母均转换为大写C、为原字符串的逆序字符串，且所有字母转换为大写D、为原字符串的逆序字符串标准答案：C知识点解析：程序中Mid函数从输入字符串左边开始逐一取一个字符转换为大写，并连接到上次取出的字符的前面，因此文本框中显示的将是原输入字符串转换为大写的并倒序排列的字符串。所以C正确。30、有下面程序代码：PrivateSubCommand1_Click()s=0n=1DoWhilen<3Fork=1To5Step2s=s+nNextkn=n+1LoopPrintsEndSub程序运行时的输出是A、9B、18C、15D、30标准答案：A知识点解析：本题考查多重循环，当n=1时，判断条件n<3成立，执行For循环，由于步长为2，所以For循环执行3次后结束，此时，s=3；同样，当n=2时，执行结果s=9；当n=3时，判断条件n<3不成立，程序执行结束。故s=9，正确答案为选项A。31、设工程文件包含两个窗体文件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中引用。32、执行语句DimX，YAsInteger后()。A、X和Y均被定义为整型变量B、X和Y均被定义为变体类型变量C、X被定义为整型变量，Y被定义为变体类型变量D、X被定义为变体类型变量，Y被定义为整型变量标准答案：D知识点解析：声明变量时可以同时声明多个变量，但要分别说明每个变量的数据类型。如果定义变量时不说明数据类型，默认是Variant变体类型变量。本题中用Dim同时定义了两个变量X、Y，变量X没说明数据类型，所以是Variant型变量，Y是整型变量。故选D选项正确。33、有两个关系R，S如下：由关系R通过运算得到关系S，则所使用的运算为()。A、选择B、投影C、插入D、连接标准答案：B知识点解析：投影运算是指对于关系内的域指定可引入新的运算。本题中S是在原有关系R的内部进行的，是由R中原有的那些域的列所组成的关系。所以选择B。34、以下合法的VB变量名是()。A、_xB、2yC、a#bD、x_1_x标准答案：D知识点解析：VB中变量的命名规则为：①必须以字母或汉字开头②由字母、汉字、数字或下划线组成③不能使用VB的保留字。_x不能以_下划线开头，不合法；2y不能以数字开头，不合法；a#b中有#，不合法；D选项符合命名规则，故D选项正确。35、下列叙述中正确的是A、算法的效率只与问题的规模有关，而与数据的存储结构无关B、算法的时间复杂度是指执行算法所需要的计算工作量C、数据的逻辑结构与存储结构是一一对应的D、算法的时间复杂度与空间复杂度一定相关标准答案：B知识点解析：算法的效率与问题的规模和数据的存储结构都有关，A错误。算法的时间复杂度，是指执行算法所需要的计算工作量，B正确。由于数据元素在计算机存储空间中的位置关系可能与逻辑关系不同，因此数据的逻辑结构和存储结构不是一一对应的，C错误。算法的时间复杂度和空间复杂度没有直接的联系，D错误。36、在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下程序：FunctionFun(xAsInteger,yAsInteger)AsIntegerFun=IIf(x<y,x,y)EndFunctionPrivateSubForm_Load()Command1.Default=TrueEndSubPrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=20b=12Text1.Text=Str(Fun(a,b))EndSub程序运行后，按回车键，文本框中显示的内容为A、12B、20C、24D、40标准答案：A知识点解析：Form_Load（）过程中，Command1获得焦点。当按回车键时，触发Command1_Click()事件。该事件中给定a和b的值，并调用函数Fun。函数Fun返回整型数据。IIf(x<y,x,y)表示的意思是x<y成立时，返回x，否则返回y。函数调用时传过来的参数是x=20，y=12。因此IIf(x<y,x,y)返回的值是12。选A）。37、设：a=2，b=8，c=6，d=3，表达式a>bAndNot(c>d)Ord>c的值是A、1B、0C、TrueD、False标准答案：D知识点解析：本题中包含的两种运算的优先级别由高到低依次为：比较运算符、逻辑运算符。其中，逻辑运算符的优先级为：Not(非)→And(与)→Or(或)。And前面表达式的值为False，And后面表达式的值为False，Or后面表达式的值也为False，所以最后输出的也是False。因此，答案为D）38、将E－R图转换为关系模式时，实体和联系都可以表示为()。A、属性B、键C、关系D、域标准答案：C知识点解析：从E－R图到关系模式的转换是比较直接的，实体与联系都可以表示成关系，E－R图中属性也可以转换成关系的属性。39、以下选项中，不合法的VisualBasic的变量名是()。A、a5bB、_xyzC、a_bD、andif标准答案：B知识点解析：40、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimiAsInteger，nAsIntegerFori＝0To50i＝i＋3n＝n＋1Ifi>10ThenExitForNextText1.Text＝Str(n)EndSub程序运行后，单击命令按钮，在文本框中显示的值是()。A、2B、3C、4D、5标准答案：B知识点解析：程序中For循环的结束有两种情况，一种是循环完指定的次数，一种是达到一定的条件后直接退出循环。由于在循环体中循环变量i的值被修改：i＝i＋3，因此，每次循环开始时i的取值为0,4,8，i为8时执行i＝i＋3＝11，n＝n＋1＝3，这时i的值大于10，退出For循环，因此For循环执行了3次，即n的值为3。所以在文本框中会显示3。二、基本操作题(本题共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．Ena