国家二级（VB）机试模拟试卷14（共381题）

国家二级（VB）机试模拟试卷14（共9套）（共381题）国家二级（VB）机试模拟试卷第1套一、选择题(本题共40题，每题1.0分，共40分。)1、已知二叉树后序遍历序列是CDABE，中序遍历序列是CADEB，它的前序遍历序列是()。A、ABCDEB、ECABDC、EACDBD、CDEAB标准答案：C知识点解析：由于后序遍历的最后一个元素为E，所以E为根结点，所以它的前序遍历的首个元素为E，故排除A和D选项。由于中序遍历中，元素B在元素根结点E的后面，所以B为二叉树的右子树，并且该二叉树右子树只有一个元素，所以前序遍历的最后一个元素应为B，故选项C为正确选项，即该二叉树的前序遍历序列是EACDB。2、命令按钮Command1的单击事件过程如下：PrivateSUbCommand1_Click()Dima(10，10)AsIntegerx=0Fori=1To3Forj=1To3a(i，j)=i*2ModjIfxA、1B、2C、3D、4标准答案：B知识点解析：题目中定义了一个二维数组，为数组赋初值并找出这些值中最大的值输出。数组中的值为：a(1，1)=1*2mod1=0a(1，2)=1*2mod2=0a(1，3)=1*2mod3=2a(2，1)=2*2mod1=0a(2，2)=2*2mod2=0a(2，3)=2*2mod3=1a(3，1)=3*2mod1=0a(3，2)=3*2mod2=0a(3，3)=3*2mod3=0显然最大值为2，因此Printx语句将在窗体上显示2。3、关系数据库管理系统能实现的专门关系运算包括()。A、排序、索引、统计B、选择、投影、连接C、关联、更新、排序D、显示、打印、制表标准答案：B知识点解析：关系数据库管理系统的专门关系运算包括选择运算、投影运算和连接运算。4、窗体上有两个名称分别为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。5、在窗体Form1上放一个名为Text1的文本框和一个名为Command1的命令按钮，然后编写一个事件过程。要求程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“VB等级考试二级”。以下能正确实现上述操作的事件过程是()。A、PrivateSubText1_Change()Command1．Caption="VB等级考试二级"EndSubB、PrivateSubCommand1_Click()Caption="VB等级考试二级"EndSubC、PrivateSubForm1_Click()Text1．Caption="VB等级考试二级"EndSubD、PrivateSubCommand1_Click()Text1．Text="VB等级考试二级"EndSub标准答案：A知识点解析：本题考查文本框的事件。文本框的Click事件是单击文本框时触发的，Change事件是每次文本框中文本发生改变时都触发的事件。题中要求当文本框的字符改变以后实现要求，因此应通过文本框的Change事件更改Command1的caption属性。6、在用Open语句打开文件时，如果省略“For方式”，则打开的文件的存取方式是()。A、顺序输入方式B、顺序输出方式C、随机存取方式D、二进制方式标准答案：C知识点解析：Open语句打开文件时的格式为：Open文件说明[For方式][Access存取类型][锁定]As[#]文件号[Len=记录长度]其中，“方式”可以是：Output指定顺序输出方式、Input指定顺序输入方式、Append指定顺序输出方式，它与Output不同的是，当用Append方式打开文件时，文件指针被定位在文件末尾，如果文件执行写操作，则写入的数据附加在原来文件的后面。Random指定随机存取方式，也是默认方式。7、在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：OptionBase0PrivateSubCommand1_Click()DimA1(4)AsInteger，A2(4)AsIntegerFork＝0To2A1(k＋1)＝InputBox("请输入一个整数")A2(3－k)＝A1(k＋1)NextkPrintA2(k)EndSub程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为()。A、0B、1C、2D、3标准答案：C知识点解析：程序运行过程如下：k＝0，输入2，A1(k＋1)＝A1(0＋1)＝A1(1)＝2，A2(3－k)＝A2(3－0)＝A2(3)＝2k＝1，输入4，A1(k＋1)＝A1(1＋1)＝A1(2)＝4，A2(3－k)＝A2(3－1)＝A2(2)＝4k＝2，输入6，A1(k＋1)＝A1(2＋1)＝A1(3)＝6，A2(3－k)＝A2(3－2)＝A2(1)＝6k＝3，For循环结束，输出A2(k)的值即A2(3)的值，即2。8、在窗体上有一个名称为Drivel的驱动器列表框，一个名称为Dirl的目录列表框，一个名称为Filel的文件列表框，两个名称分别为Labell、Label2的标签(标题分别为空白和”共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化，并且在标签Labell中显示当前文件夹中文件的数量。下列能够正确实现上述功能的程序是()。A、PrivateSubDirl_change()Filel．Path=Dirl．PathEndSubPrivateSubDrivel_Change()Dirl．Path=Drive1．DriveLabel1．Caption=File1．ListCountEndSubB、PrivateSubDirl_Change()File1．Path=Dirl．PathEndSubPrivateSubDriveI_Change()Dirl．Path=Drivel．DriveLabel1．Caption=File1．ListEndSubC、PrivateSubDirlchange()Filel．Path=Dirl．PathLabel1．Caption=File1．ListCountEndSubPrivateSubDrivel_change()Dirl．Path=Drive1．DriveLabell．Caption=Filel．ListCountEndSubD、PrivateSubDirl_Change()Fiiel．Path=Dirl．PathLabell．Caption=Filel．ListEndSubPrivateSUbDrivel_Change()Dirl．Path=Drive1．DriveLabel1．Caption=File1．ListEndSub标准答案：C知识点解析：考查文件系统控件。要使驱动器、目录和文件列表框同步显示，那么就需要编写代码才能使它们之间彼此同步，在驱动器Drivel的Change事件中，要Dirl．Path=Drivel．Drive，使目录的路径和驱动器一致，同时在目录Dirl的Change事件中要Filel．Path=Dirl．Path，使文件路径的位置和驱动器一致。可以在文件列表框中使用ListCount属性来统计文件数目(当文件路径改变时统计)。9、一个教师可讲授多门课程，一门课程可由多个教师讲授。则实体教师和课程间的联系是()。A、1：1联系B、1：m联系C、m：1联系D、m：n联系标准答案：D知识点解析：因为一个教师可讲授多门课程，而一门课程又能由多个老师讲授所以他们之间是多对多的关系，可以表示为m：n。10、窗体的左右两端各有1条直线，名称分别为Linel、Line2；名称为Shape1的圆靠在左边的Linel直线上(见图)；另有1个名称为Timer1的计时器控件，其Enabled属性值是True。要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：PrivateSubTimer1_Timer()Fork=Linel．X1ToLine2．X1Step100IfShape1．Left+Shape1．WidthA、把计时器的Interval属性设置为1B、把Fork=IAnel．X1ToLine2．X1Step100和Nextk两行删除C、把Fork=Linel．X1ToLine2．X1Step100改为Fork=Line2．X1ToLinel．X1Step100D、把IfShape1．Left+Shape1．Width标准答案：B知识点解析：在计时器事件中不应再设置步长为100的For循环，应该把For循环去掉，只留下循环体的语句，计时器每秒激发一次，每次判断小球是否移到Line2处，不到就改变自己的Left值即继续移动。因此B正确。11、关于Keypress事件，以下叙述中正确的是()。A、在控件数组的控件上按键盘键，不能触发KeyPress事件B、按下键盘上任一个键时，都能触发KeyPress事件C、按字母键时，拥有焦点的控件的KeyPress事件会被触发D、窗体没有KeyPress事件标准答案：C知识点解析：A选项错误原因：在控件数组的任何控件上按键盘键，会触发KeyPress事件；B选项错误原因：只有按键盘上的ASCII字符键时，才能触发KeyPress事件。ASCII字符键包括标准键盘上的字符、数字、标点符号、<：Enter>、和键等，其他键KeyPress事件不能识别。D选项错误原因：窗体也有KeyPresss事件。故C选项正确。12、设窗体上有一个通用对话框控件CDI，希望在执行下面程序时，打开如图所示的文件对话框：PrivateSubCommandl＿Click()CDl．DialogTitle=“打开文件”CDl．InitDir=“C：”CDl．Filter=“所有文件I*.*｜Word文档｜*．doc｜文本文件｜*．txt”CDl．FileName=“”CDl．Action=1IfCDl．FileName=“”ThenPrint“未打开文件”ElsePrint“要打开文件”&CDl．FileNameEndIfEndSub但实际显示的的对话框列出了C：＼下的所有的文件盒文件夹，“义件类型”一栏中显示的是“所有文件”。下面的改正方案中正确的是()A、把CD1．Actioll=l改为CD1．Action=2B、把”CDI．Filter＝”后面字符串中的“所有文件”改为“文本文件”C、在语句CD1．Actiom=1的前面添加：CDI．Filterlndex=3D、把CDI．FileName＝“”改为CDI．FileName=“文本文件”标准答案：C知识点解析：在通用对话框控件中，Filter属性指定了在对话框中显示的文件类型，该属性可以设置多个文件类型，每种文件类型由文件描述和文件通配符与扩展名组成，并由“｜”隔开。FilterIndex属性用来指定默认的过滤器，Filter属性中设置了多个过滤器后，每个过滤器的对应的能按从左到右顺序是1、2…，Fiherlndex属性默认为l，即第一个过滤器，因此程序中会显示：C＼下的所有文件。应该在通活框打开之前(CDl．Action=1之前)添加CDl．FliterIndex=3，即使默认过滤器为第3个过滤器。13、语句DimArr(一2To4)．AsInteger所定义的数组的元素个数为()。A、7个B、6个C、5个D、4个标准答案：A知识点解析：本题是定义了一个一维数组，下标是一2to4，所以数组元素的个数是4一(一2)+1=7，故选A。14、设a＝10，b＝5，c＝1，执行语句Printa>b>c后，窗体上显示的是()。A、TrueB、FalseC、11D、出错标准答案：B知识点解析：本题中Print语句中的表达式只有">"运算符，相同优先级，左结合。先计算a>b，即10>5，值为True，(即－1)，再计算－1>1，结果为False。故B选项正确。15、为了使命令按钮的Picture、DownPicture或DisabledPicture属性生效，必须把它的Style属性设置为()。A、0B、1C、TrueD、False标准答案：B知识点解析：为了使命令按钮的Picture、DownPicture或DisablePicture属性生效，必须把Style属性设置为1(图形格式)，否则设置的图片无效。16、某人编写了向随机文件中写一条记录的程序，代码如下：TypeRTvpeNameAsString*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#文件号，[记录号]，变量。其中“变量”是除对象变量和数组变量外的任何变量。17、窗体上有名称为Command1的命令按钮，名称分别为Label1、Label2、Label3的标签。编写如下程序：PrivatexAsIntegerPrivateSubCommand1_Click()StaticyAsIntegerDimzAsIntegern＝5z＝z＋ny＝y＋nx＝x＋yLabel1＝xLabel2＝yLabel3＝zEndSub运行程序，连续3次单击命令按钮后，3个标签中分别显示的是()。A、555B、15105C、151515D、30155标准答案：D知识点解析：变量x被定义为窗体模块变量，它在整个窗体模块中有效。Click事件中变量y定义为Static，即静态变量，它的值在每调用过程时都会保留上次的值。每次单击按钮标签中显示的值即x、y、z的值是：第一次，n＝5，z＝z＋n＝0＋5＝5，y＝y＋n＝0＋5＝5，x＝x＋y＝0＋5＝5；第二次，n＝5，z＝z＋n＝0＋5＝5，y＝y＋n＝5＋5＝10，x＝x＋y＝5＋10＝15；第三次，n＝5，z＝z＋n＝0＋5＝5，y＝y＋n＝10＋5＝15，x＝x＋y＝15＋15＝30；因此3次单击命令按钮后，3个标签中分别显示的是30155。18、已知：x=-6y=39则表达式“y＼x*Sgn(x)”的值为()。A、-6.5B、-6C、6D、6.5标准答案：C知识点解析：本题按运算符从高到低优先级计算：*(＼，所以应该是39＼(一6)*Sgn(-6)(39＼(-6){(-1)－(39＼6(6，故选C。19、某二叉树中共有350个结点，其中200个为叶子结点，则该二叉树中度为2的结点数为()。A、不可能有这样的二叉树B、150C、199D、149标准答案：A知识点解析：在树结构中，一个结点所拥有的后件个数称为该结点的度。对任何一棵二叉树，度为0的结点(即叶子结点)总是比度为2的结点多一个。二叉树中有350个结点，叶子结点个数为200，设度为1的结点个数为n1，度为2的结点个数为n2。n2=n0一1=199，n1=350—200一199=一49，显然节点个数不可能为负数，所以这样的二叉树是不存在的。故A选项正确。20、公司中有多个部门和多名职员，每个职员只能属于一个部门，一个部门可以有多名职员。则实体部门和职员间的联系是A、1：1联系B、m：1联系C、1：m联系D、m：n联系标准答案：C知识点解析：两个实体集间的联系实际上是实体集间的函数关系，主要有一对一联系（1:1）、一对多联系（1:m）、多对一联系（m:1）、多对多联系（m:n）。对于每一个实体部门，都有多名职员，则其对应的联系为一对多联系（1:m），答案选C。21、某系统结构图如下图所示(n≥5)该系统结构图的最大扇出数是()。A、nB、3C、2D、n+1标准答案：A知识点解析：模块的扇出是指本模块的直属下层模块的个数，或者说是由一个模块直接调用的其他模块数。题干中某系统为一个模块，其扇出数目为n(n≥5)，功能2模块扇出数为3，功能n模块扇出数为2，则该系统结构图的最大扇出数是n。故本题答案为A选项。22、窗体上有一个名称为Command1的命令按钮，其单击事件过程及相关的代码如下：PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=Val(InputBox("输入整数"))y=Val(InputBox("输入整数"))PrintStr(fun(x,y)+x+y)EndSubPrivateFunctionfun(ByRefmAsInteger,ByValnAsInteger)m=m*mn=n+nfun=m+nEndFunction运行程序，单击命令按钮时，出现输入对话框，分别输入3、5，则窗体上显示的是A、27B、28C、33D、38标准答案：C知识点解析：函数fun执行后，x值被改变，y值不变。即x=9，y=5；计算得结果为33，选C）。23、顺序文件在一次打开期间()。A、只能读，不能写B、只能写，不能读C、既可读，又可写D、或者只读，或者只写标准答案：D知识点解析：顺序文件的读写是由Open语句的打开模式决定。用Output模式打开，则可对顺序文件进行写操作；用Input模式打开，可对顺序文件进行读操作；用Append模式打开，可将数据追加到文件尾部。打开一次期间，只能读，或只能写，不能同时进行读写操作。但随机文件和二进制文件打开以后可以同时进行读写操作。故D选项正确。24、文件d:\city.txt的内容如下：BeiJingTianJinShangHaiChongQing编写如下事件过程：PrivateSubForm_Click()DimInDOpen"d:\city.txt"ForInputAs#1DoWhileNotEOF(1)LineInput#1,InDLoopClose1PrintInDEndSub运行程序，单击窗体，输出结果是A、文件city.txt的全部内容B、BeiJingC、ChongQingD、空白标准答案：C知识点解析：#1文件以读操作的方式打开。在文件结尾的部分退出。退出时InD内存储的内容是ChongQing，打印的内容就是ChongQing，选D）。25、以下程序段的功能是()。x=8．6y=Int(x+0．5)PrintyA、输出y的绝对值B、实现x的四舍五入C、实现x的绝对值D、实现y的四舍五入标准答案：B知识点解析：本题考查函数Int的功能，Int(x)的作用是取不大于x的最小的整数，可以实现数据的四舍五入。26、能正确表述"x为大于等于5并且小于20的数"的VisualBasic表达式是A、x>=5Andx<20B、x>=5Orx<20C、5<=x<20D、5<=x<=20标准答案：A知识点解析：选项B表述的是x为大于等于5或者小于20的数，不符题意；选项C、选项D的表达式不符合VB的逻辑表达式方式，是错误的。27、VisualBasic根据计算机访问文件的方式将文件分成3类，其中不包括()。A、顺序文件B、Unix文件C、二进制文件D、随机文件标准答案：B知识点解析：本题考查VB文件的分类。VB中根据文件的访问形式分为顺序文件、随机文件和二进制文件。28、有如下程序代码：PrivateSubForm_Click()DimSumAsIntegerSum=0WhileSum<=20Sum=Sum+1WendPrintSumEndSub运行程序，单击窗体，输出结果是A、19B、20C、21D、22标准答案：C知识点解析：While循环只有在"条件"为真（True）的情况下执行循环体。如果条件从一开始不成立，则一次循环也不执行。本题程序运行时，sum=0，符合条件sum<=20，执行循环体，sum=0+1=1；当sum=1时，sum<=20，继续执行循环体，sum=2；如此下去，当sum=20时，sum<=20，执行该循环体后，sum=21，不再符合循环执行条件，退出循环。故本题正确答案为C。29、在列表框或组合框中，能够表示当前被选中列表项序号的是A、ListIndexB、IndexC、TopIndexD、List标准答案：A知识点解析：列表框或组合框中，ListIndex属性用于设置或返回当前被选择项目的索引号；List属性用来列出或设置列表项的内容。故正确答案为选项A。30、以下叙述中错误的是A、程序运行过程中，可以利用代码重新设置菜单项的Visible属性的值B、在菜单标题中，由"&"所引导的字母指明了访问该菜单项的访问键C、在同一窗体的菜单项中，不允许出现标题相同的菜单项D、弹出式菜单也在菜单编辑器中进行设计标准答案：C知识点解析：选项C中，同一窗体的菜单项，是"名称"不能相同，即"name"属性不能相同，但"caption"标题属性可以相同。故正确答案为选项C。31、下列与队列结构有关联的是A、函数的递归调用B、数组元素的引用C、多重循环的执行D、先到先服务的作业调度标准答案：D知识点解析：队列的修改是依先进先出的原则进行的，D正确。32、设有如下的程序段：s=0i=1Whilei<=10s=s+iWendPrints以上程序段的执行结果是A、输出55B、输出56C、死循环，直到溢出D、输出无穷大的数标准答案：C知识点解析：i=1，循环条件1<10，s=0+1；下次循环i的值仍为1，继续执行；以此类推，无论执行多少次，变量i的值都没有发生改变，循环条件i<=10总是满足即"条件"永远为真，程序将不停地重复执行循环体，造成"死循环"，故正确答案为C选项。33、以下不属于VisualBasic数据文件的是A、顺序文件B、随机文件C、数据库文件D、二进制文件标准答案：C知识点解析：可以从不同的角度对文件进行分类：按照文件的内容，可分成程序文件和数据文件；按照文件存储信息的形式，可分为ASCII文件和二进制文件；按照文件的组织形式，可分成顺序文件和随机文件；按照存储介质，又可以分为光盘文件、磁盘文件、磁带文件、打印文件等。34、设数据集合为D={1,3,5,7,9}，D上的关系为R，下列数据结构B=（D，R）中为非线性结构的是A、R={(5,1),(7,9),(1,7),(9,3)}B、R={(9,7),(1,3),(7,1),(3,5)}C、R={(1,9),(9,7),(7,5),(5,3)}D、R={(1,3),(3,5),(5,9)}标准答案：D知识点解析：一个非空的数据结构如果满足以下两个条件：有且只有一个根结点；每一个结点最多有一个前件，也最多有一个后件，则称为线性结构，在数据结构中习惯称为线性表。A选项中，5为根结点，线性表为51793。B选项中，9为根结点，线性表为97135。C选项中，1为根结点，线性表为19753。D选项，结点1与7都是根结点，属于非线性结构，故D选项正确。35、在黑盒测试方法中，设计测试用例的主要根据是()。A、程序内部逻辑B、程序外部功能C、程序数据结构D、程序流程图标准答案：B知识点解析：黑盒测试是对软件已经实现的功能是否满足需求进行测试和验证，黑盒测试完全不考虑程序内部的逻辑结构和内部特性，只根据程序的需求和功能规格说明，检查程序的功能是否符合它的功能说明，所以本题选择B36、计算下面分段函数的正确语句是()。A、y＝IIf(x>0，x＋1，IIf(x<0，x－1，0))B、y＝IIf(x＝0，0，IIf(x>0，x－1，x＋1))C、y＝IIf(x>0，x＋1，IIf(x<0，0，x－1))D、y＝IIf(x＝0，0，x－1，x＋1)标准答案：A知识点解析：IIF是条件函数，它的语法格式是：IIf(<条件表达式>，<表达式为True时的取值>，<表达式为False时的取值>)B选项中，内层的IIF函数中，当x>0时，x＋1，否则x－1，所以应该是IIf(x>0，x＋1，x－1)。C选项中，内层的IIf函数中，当x<0时，x－1，否则0，所以应该是IIf(x<0，x－1,0)。D选项中IIf函数中有4个参数不对，应该有3个参数。故B、C、D选项均错误，A选项正确。37、编写如下程序：PrivateSubCommand1_Click()DimiAsInteger，jAsIntegern＝InputBox("输入一个大于1的正整数")Fori＝2TonForj＝2ToSqr(i)IfiModj＝0ThenExitForNextjIfj>Sqr(i)ThenPrintiNextiEndSub该程序的功能是()。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正确。38、窗体上有一个名称为Command1的命令按钮，编写如下事件过程：PrivateSubCommand1_Click()i=0DoWhilei<6Forj=1Toin=n+1Nexti=i+1LoopPrintnEndSub运行程序，单击命令按钮时，窗体上显示的是A、10B、15C、16D、21标准答案：B知识点解析：For循环中n从1累加到i。DoWhile循环由循环变量i控制一共执行6次。选B）。39、设x是整型变量，与函数IIf(x>0，－x，x)有相同结果的代数式是()。A、|x|B、－|x|C、xD、－x标准答案：B知识点解析：IIF函数是条件函数，本题的含义是如果x>0条件成立，即x为正数，就返回－x，即x的负数，否则返回x(它本身)，两种情况都是返回负数。根据这一点，选项B符合要求。故B选项正确。40、下列针对框架控件的叙述中，错误的是()。A、框架是一个容器控件B、框架也有Click和DblClick事件C、框架也可以接受用户的输入D、使用框架的主要目的是为了对控件进行分组标准答案：C知识点解析：框架是一个容器控件，用于将屏幕上的对象分组。框架常用的事件是Click和DblClick，它不接受用户输入，不能显示文本和图形，也不能与图形相连。二、基本操作题(本题共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。窗体上有一个名称为Label1、抓题为“标签控件”的标签；有一个名称为Command1、标题为“命令按钮”的命令按钮、单击上述两控件中的任一控件，则在标签Label2中显示所单击控件的标题内容(标题内容前添加“单击”二字)，下图是单击命令按钮后的窗体外观。请去掉程序中的注释符，把程序中的?改为正确的内容。注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。(2)在考生文件夹下有一个工程文件sit4．vbp，其窗体上有一个由八个图片框控件组成的控件数组、两个命令按钮及一个计时器控件，如图1所示。程序功能：将计时器控件设置为每隔0．5秒触发一次Timer事件。运行程序时，只显示下标为0的图片框控件数组元素，其他图片桩均不可见。单击“开始”按钮，数组中的每个图片框自左至右依次显示，时间间隔为0．5秒，产生“月亮”从左向右移动的效果，如图2所示。月亮移到右端后再从左端重新开始。单击“停止”按钮，“月亮”停止移动。要求：按照题目要求设置控件属性，去掉程序中的注释符，把程序中的?改为止确的内容。注意：不能修改程序的其他部分和控件属性，最后将修改后的文件按原文件名进行存盘。标准答案：(1)步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。参考答案PrivateSubCommand1_Click()CallShowName(Command1)’将Command1控件传入ShowNameEndSubPrivateSubLabel1_Click()CallShowName(Label1)’将Label控件传入ShowNameEndSubPrivateSubShowName(cAsControl)’两者类型都为控件IfTypeOfcIsCommandButtonThenLabel2．Caption="单击"&Command1．CaptionEndIfIfTypeOfcIsLabelThenLabel．Caption="单击"&Label1．CaptionEndIfEndSub步骤3：调试并运行程序，关闭程序后按题目要求存盘。(2)步骤1：打开本题工程文件，将Timerl的Interval属性设置为500。步骤2：打开代码编辑窗口，去掉程序中的注释符“’’，将问号改为正确的内容。参考答案PrivateSubForm_Load()Picturel(0)．Left=0Picturel(0)．Top=100Fork=1To7Picturel(k)．Visible=False当窗体装载时，下标为1～7的图片都不显示NextEndSubPrivateSubCommand1_C1ick()Timerl．Enabled=True’单击Command1按钮，Timer事件触发EndSubPrivateSubCommand2_Click()Timerl．Enabled=FalseEndSubPrivateSubTimerlTimer()StatlciAsIntegerPicturel(i)．Visible=Falsei=i+1Ifi=8Then判断图片是否执行到最后一张i=0’重置i值EndIfPicturel(i)．Visible=TrueEndSub步骤3：调试并运行程序，关闭程序后按题目要求存盘。知识点解析：(1)单击两个控件中的任一个，通过Call语句调用函数ShowName()实现在标签Label2中显示所单击控件的标题内容，自定义函数ShowName()用于判断控件的类型，CommandButton表示命令按钮，Label表示标签，如果变量C的控件类型是Com-mandButton，那么Label2的Caption属性设置为"单击"&Command1．Caption，显示控件的标题内容。(2)首先将Timerl的Interval属性设置为500，使计时器控件设置为每隔0．5秒触发一次。在Form_Load事件过程中，通过图片框Visible属性设置只显示下标为0的图片框控件数组元素，其他下标为1～7的图片框均不显示。单击“开始”按钮，计时器的Enabled属性设置为True，Timerl_Timer事件启动，运用循环语句将数组中的每个图片框自左向右依次显示，产生“月亮”从左向右移动的效果，循环变量设置为局部变量Static，使“月亮”移到右端后再从左端重新开始。单击“停止”按钮，“月亮”停止移动。四、综合应用题(本题共1题，每题1.0分，共1分。)44、在窗体上建立三个菜单(名称分别为Read、Cale和Save，标题分别为“读人数据”、“计算并输出”和“存盘”)，然后添加一个文本框(名称为Text1，可显示多行，ScrollBars属性设置为2)(如图所示)。程序运行后，如果执行“读入数据”命令，则读入datainl．txt文件中的100个整数，放入一个数组中，数组的下界为1；如果单击“计算并输出”按钮，则把该数组中小于50的元素显示在文本框中，求出它们的和，并把所求得的和显示在窗体上；如果单击“存盘”按钮，则将所求得的和存入考生文件夹下的dataout．txt文件中。在考生文件夹下有一个工程文件sjt5．vbp。窗体文件中的ReadData过程可以把datain1．txt文件中的100个整数读入Arr数组中；而WriteData过程可以把指定的整数值写到考生文件夹下指定的文件中(整数值通过计算求得，文件名为dataout．txt)。注意：考生不得修改窗体文件中已经存在的程序。存盘时，工程文件名仍保存为sjt5．vbp，窗体文件名仍保存为sjt5．frm。标准答案：步骤1：打开本题工程文件，利用菜单设计器，按表3．108中的设置建立菜单项，在窗体Form1中绘制一个文本框，其相关属性值见表1和表2。步骤2：分析并编写程序代码。程序提供代码OptionBase1DimArr(100)AsIntegerSubReadData()OpenApP．Path&“\”&”datainl．txt”ForInputAs#1Fori=1To100Input#1，Arr(i)NextiClose#1EndSubSubWriteData(FilenameAsString，NumAsInteger)OpenApp．Path&”\”&FihnameForOutputAs#1Print#1，NumClose#1EndSub程序结束PrivateSubCaic_Crick()Text1．Text=””Fori=1To100IfArr(i)＜50ThenText1．Text=Text1．Text&Arr(i)＆Space(5)sum=sum+Arr(i)EndIfNextiPrintsumEndSubPrivateSubRead_Click()ReMDataEndSubPrivateSubSave_Click()WriteData”dataout．txt”．sumEndSub步骤3：调试并运行程序，关闭程序后按题目要求存盘。知识点解析：在“读数”命令的Click事件过程中，通过调用ReadData过程将数据从inS．txt文件读人数组Arr(窗体变量)中；在“计算”命令的Click事件过程中，在For循环语句(循环变量i的初值为1，终值为100)中依次将数组Arr中小于50的元素的值显示在文本框中，并将其值累加到变量sum；在“保序”命令的Click事件过程中，通过调用WriteData过程将Sum的值写入数据文件out5．txt。国家二级（VB）机试模拟试卷第2套一、选择题(本题共40题，每题1.0分，共40分。)1、在数据库管理技术的发展中，数据独立性最高的是()。A、人工管理B、文件系统C、数据库系统D、数据模型标准答案：C知识点解析：在人工管理阶段，数据无法共享，冗余度大，不独立，完全依赖程序；在文件系统阶段，数据共享性差；在数据库系统阶段，共享性好，独立性高。2、当一个工程含有多个窗体时，其中启动窗体是()。A、启动VisualBasic时建立的窗体B、第一个添加的窗体C、最后一个添加的窗体D、在“工程属性”对话框中指定的窗体标准答案：D知识点解析：VB规定，对于多窗体程序，必须在“工程属性”对话框中指定其中一个窗体为启动窗体。如果未指定，那么就默认设计时的第一个窗体为启动窗体，这个默认的启动窗体就是“工程属性”对话框中的默认窗体。3、窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是()。PrivateSubCommand1Click()Picture1．Picture=LoadPicture("c：＼picture．jpg")Picture1．ClsPicture1．Print"picture"EndSubA、窗体无显示，图片框显示图片和文字pictureB、窗体上出现picture文本，图片框无显示C、窗体上出现picture文本，图片框显示图片picture．jpgD、窗体无显示，图片框只显示picture文字标准答案：A知识点解析：本题考查图片框属性。单击命令按钮时，图片框首先装入图片，然后图片框清空(注意，该方法只能清空在图片框中输出的文本信息和绘图信息，而不能清除有LoadPicture函数装载的图片)，最后图片框显示图片和“picture”文字。全部操作都是在图片框中进行的，窗体上没有任何显示。4、窗体上有一个名称为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选项错。5、在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下事件过程：PrivateSubCommand1_Click()Counter=0Fori=1To4Forj=6To1Step-2Counter=Counter+1NextjNextiLabel1．Caption=Str(Counter)EndSub程序运行后，单击命令按钮，标签中显示的内容是()。A、11B、12C、16D、20标准答案：B知识点解析：这是一个双层循环，外层循环是4次，内层循环变量初值6，终值1，步长一2，则j可取的值为6、4、2，因此内层For循环会循环3次，两层循环的总数是4*3=12次，Counter的值即为12。Str函数将数值转换成字符串，即“12”，所以标签中显示的内容为“12”。6、设有一个有10个元素的数组，下列程序将该数组的第1个元素与第10个元素交换，第2个元素与第9个元素交换……，第5个元素与第6个元素交换，在横线处应填写()。PrivateSubCommand1_Click()Dima(1To10)AsIntegerDimiAsInteger,DimPAsIntegerDimtAsInteger,DimjAsIntegerFori=1To10a(i)=iNextiForj=1To5t=a(j)NextjFori=1To10Printa(i)NextiEndSubA、a(j)=a(11-j)a(11-j)=tB、a(11-j)=a(j)a(j)=tC、a(i)=a(11-j)a(j)=tD、a(11-j)=ta(j)=a(11-j)标准答案：A知识点解析：本题考查数组中元素的逆置操作。循环次数为数组中元素个数的一半，每一次都要进行下标之和为11的前后两个元素交换。7、在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下事件过程：PrivateSubCommand1_Click()Counter＝0Fori＝1To4Forj＝6To1Step－2Counter＝Counter＋1NextjNextiLabel1.Caption＝Str(Counter)EndSub程序运行后，单击命令按钮，标签中显示的内容是()。A、11B、12C、16D、20标准答案：B知识点解析：这是一个双侧循环，外层循环是4次，内层循环变量初值6，终值1，步长-2，则j可取的值为6，4，2，因此内层For循环会循环3次，两侧循环的总数是4*3＝12次，Counten的值即为12.Sir函数将数值转换成字符串，即“12”，所以标签中显示的内容为“12”。8、在E盘当前目录文件夹下建立一个名为“Student。txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序()。PrivateTypestudentStuNameAsString*10StuGradeAsString*10StuAgeAsIntegerEndTypePrivateSubForm_Click()DimSAsstudentOpen“c：＼student．txt”ForRandomAs#1Len=Len(s)Fori=1To5s．StuName=InputBox(“请输入姓名”)s．StuGrade=InputBox(“请输入年级号”)s．StuAge=Val(InputBox(“请输入年龄”))NextiClose#1EndSubA、Print#1．SB、Print#1，iC、Put#1，sD、Put#1，i标准答案：C知识点解析：本题考查文件操作。题目中要求以随机的方式(Random)打开一个文件，打开文件的格式为：OpenPileNameForRandomAs#文件号[Len=几句长度]然后以命令写入一条记录，格式为：PUt[#]文件号[记录号]变量名。若省略记录号，表示在当前记录每下写入记录型变量，逗号(，)不可以省略。9、以下叙述中正确的是()。A、事件过程都由用户来编写B、事件过程都不是由用户编写的C、事件过程有的由用户编写，有的由系统确定D、用户可以确定事件方法过程是否由用户编写标准答案：D知识点解析：本题考查事件过程。一般控件都有事件过程，这些事件过程在编写程序时，可以根据问题的需要来确定是否编写该事件过程。10、下列叙述中正确的是()。A、线性表的链式存储结构与顺序存储结构所需要的存储空问是相同的B、线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构C、线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构D、线性表的链式仔储结构与顺序存储结构在存储空间的需求上没有可比性标准答案：B知识点解析：线性链式存储结构中每个结点都由数据域与指针域两部分组成，增加了存储空间，所以一般要多于顺序存储结构。11、结构化程序所要求的基本结构不包括()。A、顺序结构B、COTO跳转C、选择(分支)结构D、重复(循环)结构标准答案：B知识点解析：1966年Boehm和Jacopini证明了程序设计语言仅仅使用顺序、选择和重复三种节本控制结构就足以表达出各种其他形式结构的程序设计方法。12、设工程中有Form1、Form2两个窗体，要求单击Form2上的Command1命令按钮，Form2就可以从屏幕上消失，下面的事件过程中不能实现此功能的是()。A、PrivateSubCommandl_Click()Form2．HideEndSubB、PrivateSubCommandl_Click()UnloadMeEndSubC、PrivateSubCommandl_Click()Form2．UnloadEndSubD、PrivateSubCommandl_Click()Me．HideEndSub标准答案：C知识点解析：Form2．Hide是隐藏Form2窗体；UnloadMe是卸载并关闭当前窗体；Me．Hide是隐藏当前窗体。From2．Unload语法错误。故c选项不能使窗体Form2消失。13、用来设置文字字体是否为粗体的属性是()。A、FontltalicB、FontUnderlineC、FontSizeD、FontBold标准答案：D知识点解析：Fonthalic用来设置文字是否为斜体，FontUnderLine用来设置文字是否加下划线，FontSize用来设置文字的字号，FontBold用来设置文字是否为粗体。14、算法的有穷性是指()。A、算法程序的运行时间是有限的B、算法程序所处理的数据量是有限的C、算法程序的长度是有限的D、算法只能被有限的用户使用标准答案：A知识点解析：算法原则上能够精确地运行，而且人们用笔和纸做有限次运算后即可完成。有穷性是指算法程序的运行时间是有限的。15、窗体上已有的3个单选按钮组成了1个名为ChkOpt1的控件数组。用于区分控件数组ChkOpt1中每个元素的属性是()。A、CaptionB、ListCountC、ListIndexD、Index标准答案：D知识点解析：控件数组的每个元素都有一个与之关联的下标，下标值由Index属性指定，控件数组的各元素就以这个属性来区分。16、命令按钮Commandl的单击事件过程如下：PrivateSubCommandl＿Click()X=10Printf(X)EndSubPrivateFunctionf(YAsInteger)f=V*VEndFunction运行上述程序，如下叙述中正确的是()。A、程序运行出错，X变量的类型与函数参数的类型不符B、在窗体上显示100C、函数定义错，函数名f不能又作为变量名D、在窗体上显示l0标准答案：A知识点解析：变量x在按钮单击事件过程中没有定义，因此系统自动将它定义为Vatiant类型，由于过程中参数类型为Integer，所以程序运行时会提示“ByRef参数类犁不符”错误。A选项正确。只在按钮事件中加上DimxasInteger就可以解决问题，或者f过程中的yasinteger改为ByValyasinteger也可以解决。17、一般情况下，当对关系R和S进行自然连接时，要求R和S含有一个或者多个共有的A、记录B、行C、属性D、元组标准答案：C知识点解析：自然连接是一种特殊的等值连接，它满足下面的条件：①两关系间有公共域；②通过公共域的等值进行连接，选C。18、下列不是VisualBasic合法常量的是()。A、&H15&B、’abc’C、1E-8D、#2-2-2015#标准答案：B知识点解析：VisualBasic中的常量分为两种，一种是文字常量，一种是符号常量，其中，文字常量又分为字符串常量和数值常量。A选项为十六进制长整型数值常量；C选项为浮点数常量；D选项为日期常量；B选项中字符串常量应该使用一对双引号括起来，而不应该用单引号，所以B选项不是合法的常量。本题选择B选项。19、以下叙述中，错误的是()。A、缺省状态下，启动VisualBasic后，可在工具箱窗口中找到通用对话框控件的图标B、通用对话框显示的对话框类型可以通过Action属性设置C、通用对话框显示的对话框类型可以通过相应的方法进行设置D、程序运行时，通用对话框控件不可见标准答案：A知识点解析：通用对话框是一种ActiveX控件，它随同VisualBasic提供给程序设计人员。在一般情况下，启动VisualBasic后，在工具箱中没有通用对话框控件。为了把通用对话框控件加入到工具箱中，可以使用“工程”菜单中的“部件”对话框将通用对话框控件引入工具箱中，A选项叙述错误；对话框的类型可以通过Action属性设置，也可以用相应的方法设置，B、C选项叙述正确；在程序设计阶段，通用对话框按钮以图标形式显示，不能调整其大小，程序运行后消失，D选项叙述正确，故本题A选项叙述有误。本题选择A选项。20、为了在Form_Load事件过程中用Print方法在窗体上输出指定的内容，首先应执行的操作是A、设置窗体的Visible属性B、设置窗体的AutoRedraw属性C、调用窗体的Show方法D、设置窗体的Enabled属性标准答案：C知识点解析：窗体加载的时候是可以Print的，但这个时候还没有显示出来，看不到Print的结果，要调用窗体的Show方法显示结果。21、语句：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。22、为了实现对象的自动拖放，应该设置该对象的一个属性。下面设置中正确的是A、DragMode=1B、DragMode=0C、DragIcon=1D、DragIcon=0标准答案：A知识点解析：实现对象的自动拖放应设置DragMode=1。23、在学校中，“班级”与“学生”两个实体集之间的联系属于()关系。A、一对一B、一对多C、多对一D、多对多标准答案：B知识点解析：一个班可以有多名学生，而一名学生只能属于一个班级，所以“班级”与“学生”两个实体集之间的联系属于一对多关系。24、工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是：PublicxAsIntegerPrivateyAsInteger窗体文件的程序代码是：DimaAsIntegerPrivateSubForm_Load()DimbAsIntegera＝2：b＝3：x＝10：y＝20EndSubPrivateSubCommand1_Click()a＝a＋5：b＝b＋5：x＝x＋5：y＝y＋5Printa；b；x；yEndSub运行程序，单击窗体上的命令按钮，则在窗体上显示的是()。A、55155B、751525C、78155D、75155标准答案：D知识点解析：程序在模块文件中定义x为整型全局变量，在整个工程中都起作用，而y定义为整型私有变量，只能在本模块文件中起作用。在窗体文件中变量a在本窗体文本中起作用，窗体加载事件中定义的变量b和没有声明的变量y，只在本事件过程起作用。程序窗体加载时，对后边有影响的变量值为a为2，x为10，没有指定初值的变量值默认为0，因此单击命令按钮后，a＝a＋5＝7，b＝b＋5＝5，x＝x＋5＝15，y＝y＋5＝5，结果输出75155。25、在窗体上建立一个命令控件数组Command1，并双击第一个命令按钮，编写如下事件过程：PrivateSubCommandl_Click(IndexAsInteger)Commandl(Index)．Caption=FormatS(Now,”hh：mm：ss”)EndSub以下描述正确的是()。A、当单击某个命令按钮时，数组中所有命令按钮的Caption属性将被设置为当前时间B、当单击某个命令按钮时，该按钮的Caption属性将被设置为当前时间C、程序有错误D、窗体的Caption属性将被设置为当前时间标准答案：B知识点解析：本题考查控件数组。建立控件数组以后，数组中的每个元素名字相同，依靠Index属性来区分单击了哪个命令按钮。题目中单击哪个命令按钮，哪个命令按钮的标题属性就变为当前时间。26、在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：PrivateSubCommand1_Click()a＝InputBox("Enteraninteger")b＝Text1.TextText1.Text＝b＋aEndSub程序运行后，在文本框中输入456，然后单击命令按钮，在输入对话框中输入123，则文本框中显示的内容是()。A、579B、123C、456123D、456标准答案：C知识点解析：默认情况下，InputBox的返回值是一个字符串，因此程序中a＝"123"，b＝"456"，b＋a＝"456"＋"123"＝"456123"。因此C选项正确。另外，使用字符连接运算符"＋"时，如果连接的是字符串和数值，可根据返回值类型判断，若返回值类型为字符串，则它将数值转换成字符串后与另一字符串连接成新字符串返回；若返回值类型为数值，则它要求字符串中只能包含数字，而不能有其他字符，否则报"类型不匹配"的错误。27、PrintRight("VBProgramming"，2)语句的输出结果是()。A、VBB、ProgrammingC、ngD、2标准答案：C知识点解析：Right是字符串的右部截取函数，本题中是从字符串"VBProgramming"右边向左截取2个字符，即为"ng"，故选C。28、A、自然连接B、交C、投影D、并标准答案：A知识点解析：关系R和关系S有公共域，关系T是通过公共域的等值进行连接的结果，符合自然连接，选A。29、若实体A和B是一对多的联系，实体B和C是一对一的联系，则实体A和C的联系是A、一对一B、一对多C、多对一D、多对多标准答案：B知识点解析：A和B为一对多的联系，则对于A中的每一个实体，B中有多个实体与之联系，而B与C为一对一联系，则对于B中的每一个实体，C中之多有一个实体与之联系，则可推出对于A中的每一个实体，C中有多个实体与联系，所以为一对多联系。30、下列叙述中正确的是()。A、循环队列是队列的一种链式存储结构B、循环队列是队列的一种顺序存储结构C、循环队列是非线性结构D、循环队列是一种逻辑结构标准答案：B知识点解析：在实际应用中，队列的顺序存储结构一般采用循环队列的形式。31、一般情况下，当对关系R和S进行自然连接时，要求R和S含有一个或者多个共有的A、记录B、行C、属性D、元组标准答案：C知识点解析：自然连接是一种特殊的等值连接，它满足下面的条件：①两关系间有公共域；②通过公共域的等值进行连接，选C。32、A、自然连接B、交C、投影D、并标准答案：A知识点解析：关系R和关系S有公共域，关系T是通过公共域的等值进行连接的结果，符合自然连接，选A。33、窗体上有一个名称为Shape1并显示为圆的形状控件（其Width和Height属性值相等），一个名称为Timer1的计时器，并有下面程序代码：DimrAsSingle,flagAsIntegerPrivateSubForm_Load()r=Shape1.WidthTimer1.Enabled=TrueTimer1.Interval=500EndSubPrivateSubTimer1_Timer()Ifflag=0ThenShape1.Width=Shape1.Width-10IfShape1.Width<=100Thenflag=1EndIfElseShape1.Width=Shape1.Width+10IfShape1.Width>=rThenflag=0EndIfEndIfEndSub运行程序后产生的结果是A、圆逐渐缩小，再逐渐增大，然后再逐渐缩小，依此往复B、圆一直在缩小C、圆每隔0.5秒向右移动一次D、圆每隔1秒向下移动一次标准答案：A知识点解析：Form_Load过程中设定timer事件定时触发；在Timer1_Timer过程中，圆圈先变小后变大，然后退出。下一次timer事件触发时继续这个过程。因此，选A）。34、下列控件中，不响应Click事件的是A、框架B、标签C、图像框D、形状标准答案：D知识点解析：形状控件不响应Click事件。35、支持子程序调用的数据结构是()。A、栈B、树C、队列D、二叉树标准答案：A知识点解析：栈支持子程序调用。栈是一种只能在一端进行插入或删除的线性表，在主程序调用子函数时要首先保存主程序当前的状态，然后转去执行子程序，最终把子程序的执行结果返回到主程序中调用子程序的位置，继续向下执行，这种调用符合栈的特点，因此本题的答案为A。36、设工程文件包含两个窗体文件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中引用。37、现有程序如下：OptionBase1PrivateSubForm_Click()Dimx(5，6)AsInteger，y(5)AsIntegerFori＝1To5Forj＝1To6x(i，j)＝