国家二级VB机试（选择题）模拟试卷19（共226题）

国家二级VB机试（选择题）模拟试卷19（共9套）（共226题）国家二级VB机试（选择题）模拟试卷第1套一、选择题(本题共25题，每题1.0分，共25分。)1、以下关于VB特点的叙述中，错误的是A、VB中一个对象可有多个事件过程B、VB应用程序能以编译方式运行C、VB应用程序从FormLoad事件过程开始执行D、在VB应用程序中往往通过引发某个事件导致对对象的操作标准答案：C知识点解析：’VisualBasic是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言。在设计VisualBasic程序的过程中可以随时以解释方式运行程序，也可在整个应用程序设计完成后，经编译生成可脱离VisualBasic环境而在Windows下直接运行的可执行文件(．EXE)。VB程序代码中，一个对象可以对应多个事件，整个程序从FormLoad事件过程开始执行。2、以下关于窗体的叙述中，错误的是A、Hide方法能隐藏窗体，但窗体仍在内存中B、使用Show方法显示窗体时，一定触发Load事件C、移动或放大窗体时，会触发Paint事件D、双击窗体时，会触发DblClick事件标准答案：B知识点解析：Load方法用于将窗体装入内存，Show方法用于显示窗体，Hide方法用于隐藏窗体，Llnload方法可以将指定的窗体从内存中清除。移动或放大窗体时，会触发Paint事件；单击窗体时，会触发Click事件；双击窗体时，会触发．DblClick事件。3、在软件设计中不使用的工具是A、系统结构图B、PAD图C、数据流图(DFD图)D、程序流程图标准答案：C知识点解析：在软件开发的各个阶段经常会使用到一些图形工具，如在需求分析阶段使用数据流图(DFD图)，在概要设计阶段使用系统结构图，在详细设计阶段使用程序流程图、N．S图或者PAD图等。4、数据库技术的根本目标是要解决数据的A、存储问题B、共享问题C、安全问题D、保护问题标准答案：B知识点解析：数据库中的数据具有“集成”、“共享”之特点，即数据库集中了各种应用的数据，进行统一地构造与存储，而使它们能被不同的应用程序所使用。因而数据库技术的根本目标是解决数据的共享问题。5、在标准模块中用Public关键字定义的变量，其作用域为A、本模块所有过程B、整个工程C、所有窗体D、所有标准模块标准答案：B知识点解析：在标准模块中用Public关键字定义的变量叫做全局变量，也称为全程变量，在标准模块的声明部分声明。全局变量的作用域最大，可以在工程的每个模块、每个过程中使用。6、双精度浮点数的类型说明符为A、％B、#C、＆D、@标准答案：B知识点解析：在VisualBasic中规定一个变量的数据类型可以用类型说明符来标识，如％表示整型、＄表示字符串型、!表示单精度浮点型、#表示双精度浮点型、&表示长整型。7、以下关于框架的叙述中，错误的是A、框架能够响应Click事件B、框架是一个容器C、框架的Enabled属性为False时，框架内的控件均被屏蔽D、框架可以获得焦点标准答案：D知识点解析：框架是一个容器控件，可以响应单击事件和双击事件，但是一般不需编写这两个事件；框架的Enabled属性为False时，框架内的控件均被屏蔽；框架不是输入型控件，不能接受焦点。8、有下面事件过程：PrivateSubForm_MouseMove(ButtonAsInteger．ShiftAsInteger，XAsSingle，YAsSingle)IfButton=2ThenForm1．PSet(X，Y)PSet方法可以在X，Y处画一个点EndIfEndSub程序运行后，产生的效果是A、在窗体上每单击鼠标左键一次，就在鼠标位置处画一个点B、按着鼠标左键，移动鼠标，可在窗体上画出鼠标的运动轨迹C、按着鼠标右键，移动鼠标，可在窗体上画出鼠标的运动轨迹D、不按任何鼠标键，移动鼠标，可在窗体上画出鼠标的运动轨迹标准答案：C知识点解析：MouseMove中Button是一个整数，它对应鼠标各个按钮的状态，如果某个按钮按下，其中就有一个二进制位被设置。Button参数是具有相应于左按钮(位0)，右按钮(位1)，以及中间按钮(位2)的一个位字段。这些位的值分别等于1，2，和4。它指示这些鼠标按钮的整体状态；三个二进制位中的一些、全部、或一个也没有被设置，指示这些按钮中的一些、全部、或一个也没有被按下。程序中Button=2表示鼠标右键被按下。故答案选C。9、要求函数的功能是：从参数str字符串中删除所有参数ch所指定的字符，返回实际删除字符的个数，删除后的字符串仍在str中，为此某人编写了函数DelChar如下：FunctionDelChar(strAsString,chAsString)AsIntegerDimn%,st$,c$st=""n=0Fork=1ToLen(str)c=Mid(str,k,1)Ifc=chThenst=st&cElsen=n+1EndIfNextkstr=stDelChar=nEndFunction并用下面的Command1_Click()过程观察函数调用结果PrivateSubCommand1_Click()ch$=Text1.TextPrintDelChar(ch,"x"),chEndSub发现结果有错误，程序代码需要修改，以下正确的修改方案是()。A、把语句Ifc=chThen改为Ifc<>chThenB、把语句PrintDelChar(ch,"x"),ch改为PrintDelChar(ch,"x")：PrintchC、把语句DelChar=n改为DelChar=stD、删掉语句str=st标准答案：A知识点解析：DelChar函数中，使用For循环，依次取出str字符串中的字符。然后通过if语句判断取出的字符是否为要删除的字符，若不是则将该字符保存到字符串变量st中，若是则将计数变量n的值加1。观察if条件判断语句可知，"Ifc=chThenst=st&celsen=n+1"逻辑有错误，应该改为"Ifc<>chThenst=st&celsen=n+1"。故选项A正确。10、在设计阶段，如果双击窗体上的一个文本框控件，则在代码窗口中显示该控件的事件过程所对应的事件是A、ClickB、DblClickC、ChangeD、GotFocus标准答案：C知识点解析：在设计阶段，如果双击窗体上的一个文本框控件，则在代码窗口中显示该控件的默认事件过程，文本框的默认事件过程为Change事件。11、下面不能在信息框中输出“VB”的是A、MsgBox”VB”B、x=MsgBox(”VB”)C、MsgBox(”VB”)D、CallMsgBox”VB”标准答案：D知识点解析：MsgBox()函数用于显示提示信息，并可返回一个代表用户单击了哪个按钮的Integer类型值，当其作为函数使用时必须将参数放在括号内部，而返回值可以赋值给一个变量，也可以单独使用此函数而不将其返回值赋值给变量；MsgBox过程也用于显示提示信息，作为过程可以独立使用，也可以使用Call关键字来进行调用，但此时参数需要加括号。12、由高中数学可知，对于连续函数f(x)，若f(x1)与f(x2)值的符号相反，则在x1和x2之间必存在x0，使得f(x0)=0(该点称为“零点”)。设有VB函数：PrivateFunctionf(xAsSingle)AsSingle可以返回f(x)的值(函数体没有给出)。下面程序的功能是从键盘输入2个实数x1、x2，判断在x1、x2之间是否存在零点。PrivateSubCommand1_Click()Dimx1AsSingle，x2AsSinglexl=InputBox("请输入一个实数x1")x2=InputBox("请再输入一个实数x2")if(_________)ThenPrint"在"；x1；"与"；x2；"之间存在零点"ElsePrint"不能确定在"；x1；"与"；x2；"之间是否存在零点"EndIfEndSubPrivateFunctionf(xAsSingle)AsSingleEndFunction为使上面程序可以实现该功能，程序代码中横线处应填写的代码是A、f(x1)>0Orf(x2)<0B、f(x1)<0Andf(x2)<0C、f(x1)*f(x2)<0D、f(x1)*f(x2)>0标准答案：C知识点解析：本题实际是要求判断两个函数值是否符号相反，由中学数学的知识司知，两数相反的标志是两数相乘结果小于0。13、下面程序的功能是输出100以内所有素数：PrivateSubCommand1_Click()Forn=2To100isprime=Time：k=2DoWhilek<=n／2AndIfnModk=0Thenisprime=Falsek=k+1LoopIfisprimeThenPrintnNextnEndSub为使上面程序可以实现该功能，程序代码中横线处应填写的代码是A、isprimeB、NotisprimeC、n<100D、n<=100标准答案：A知识点解析：求素数的基本思路是，用2到n／2依次去除要判断的数n，如果能整除就将isprime置为False代表不是素数；如果isprime已经为False，那么循环没有继续执行的必要了，所以应填入isprime=True，由于是布尔型变量，可以简写为isprime。14、在窗体上画一个命令按钮，名称为Commandl，然后编写如下代码：OptionBase0PrivateSubCommandl_Click()DimA1(4)AsInteger，A2(4)AsIntegerFork=0To2A1(k+1)=InputBox("请输入一个整数")A2(3－k)=Al(k+1)NextkPrintA2(k)EndSub程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为A、0B、1C、2D、3标准答案：C知识点解析：本题的关键之处在于抓住每次具体给哪个数组元素进行了赋值，第一次循环中输入的2被赋给了A1(1)和A2(3)，第二次循环中输入的4被赋给了A1(2)和A2(2)，第三次循环中输入的6被赋给了A1(3)和A2(1)，跳出循环时k的值为3，所以最后输出2。15、设有语句Open"c：＼Test．Dat"ForOutputAs#1则以下叙述中错误的是A、该语句打开C盘根目录下的一个文件Test．Dat，如果该文件不存在则出错B、该语句打开C盘根目录下一个名为Test．Dat的文件，如果该文件不存在则创建该文件C、该语句打开文件的文件号为lD、执行该语句后，就可以通过Print#语句向文件Test．Dat中写入信息标准答案：A知识点解析：根据数据的存取方式和结构不同，文件可分为顺序文件和随机文件。以Append方式打开文件时，文件指针被定位于文件尾，用于数据的追加写入；以Random方式打开的随机文件可用于随机文件的读与写操作；以output方式打开文件时，若文件不存在，则建立一个新文件，打开文件后可以使用Print撑语句向文件中写入信息。16、在窗体上画一个名称为Command1的命令按钮，并编写如下程序：FunctionFun(x)y=0Ifx＜10Theny=xElsey=y+10EndIfFun=yEndFunctionPrivateSubCommand1_Click()n=InputBox("请输入一个数"):n=Val(n)P=Fun(n):PrintPEndSub运行程序，单击命令按钮，将显示输入对话框，如果在对话框中输入100，并单击“确定”按钮，则输出结果为A、10B、100C、110D、出错信息标准答案：A知识点解析：本题是一个简单的函数调用，在函数中会判断参数x的值，根据x的值不同执行If语句的不同分支。由于实际参数为100不满足x＜10，因此函数返回值为10。17、如果一个菜单项的Enabled属性被设置为False，则程序运行时，该菜单项A、不显示B、显示但无效C、有效可用D、不显示但有效可用标准答案：B知识点解析：菜单项也是对象，也可以设置属性，如果Enabled属性被设置为False，则程序运行时，该菜单项显示但无效(呈现灰色)。18、有下面事件过程：PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2ThenForm1.PSet(X,Y)’PSet方法可以在X，Y处画一个点EndIfEndSub程序运行后，产生的效果是A、在窗体上每单击鼠标左键一次，就在鼠标位置处画一个点B、按着鼠标左键，移动鼠标，可在窗体上画出鼠标的运动轨迹C、按着鼠标右键，移动鼠标，可在窗体上画出鼠标的运动轨迹D、不按任何鼠标键，移动鼠标，可在窗体上画出鼠标的运动轨迹标准答案：C知识点解析：鼠标事件分点击事件和状态事件：点击事件有单击(Click)和双击(DblClick)，不区分左右键；状态事件有按下(MouseDown)、移动(MouseMove)和弹起(MouseUp)，能够区分出鼠标的左、右和中间键。如果鼠标按钮是当其指针在窗体或控件之上时被按下并释放，则该对象将“捕获”鼠标并接收全部与该对象相关的鼠标事件。在本题代码中当鼠标移动时触发MouseMove事件，此时判断按下的鼠标键为右键(Button=2)时，则在窗体鼠标指针经过的位置依次画点，从而形成一条线。19、下面关于文件叙述中错误的是A、VB数据文件需要先打开，再进行处理B、随机文件每个记录的长度是固定的C、不论是顺序文件还是随机文件，都是数据文件D、顺序文件的记录是顺序存放的，可以按记录号直接访问某个记录标准答案：D知识点解析：VB数据文件需要先打开，再进行处理，文件分为两类：顺序文件和随机文件。顺序文件的记录是顺序存放的，只能从头到尾逐记录访问，每个记录的长度是不定的；随机文件每个记录的长度是固定的，可以实现随机访问。20、下面语句中能够打开随机文件的是A、Open“file．txt”ForRandomAs#1B、Open“file．txt?tForInputAs#1C、Open“file．txt”ForOutputAs#1D、Open“file．txt”，ForAppendAs#1．标准答案：A知识点解析：VlsuslBasic程序中关于文件的操作，主要是先打开一个文件，然后对这个文件进行读或写的操作，操作完成后，关闭这个文件。打开文件的基本格式为：OpcnFiIeNameF0rM0deAs#FileNumber。打开方式主要有output、Append、Input、Random等几种方式，其中打开随机文件使用Random方式打开。21、有下面程序代码：PrivateSubCommandl_Click()a=Array(1，2，3，4，5，6，7，8，9，10)n=UBound(a)Fork=0ToUBound(a)／2Printa(k)*a(n)；：n=n-1NextkEndSub程序运行后，单击命令按钮Commandl，输出结果是A、261122030B、212205690C、3028241810D、1018242830标准答案：D知识点解析：使用Array函数建立的数组其下标下界为0，n的值是数组的上界即9；在循环中k从0循环到数组长度的一半，每次输出a(k)*a(n)的值然后令n—1，故此容易得到每次输出的是数组两端值之积，依次向数组中间移动，即1*10、2*9、3*8、4*7、5*6。22、如果改变驱动器列表框的Drive属性，则将触发的事件是A、ChangeB、ScrollC、KeyDownD、KeyUP标准答案：A知识点解析：驱动器列表框(DriveListBox)用来显示当前系统中所有有效磁盘驱动器的列表。驱动器列表框的Drive属性用于设置或返回选择的驱动器，设置时只能通过代码设置而不能在属性窗口中设置。程序运行时，当从驱动器列表框中选择一个新的驱动器或通过代码改变其Drive属性值将触发其Change事件。23、编写如下程序：PrivateSubCommand1Click()DimmAsInteger，nAsIntegexn=2Form=1To3Printproc(n)；NextmEndSubFunctionproc(iASInteger)DimaAsInteger,StaticbAsIntegera=a+1：b=b+1proc=a*b+iEndFunction程序运行后，单击命令按钮Commandl，输出结果为A、333B、345C、356D、123标准答案：B知识点解析：使用Dim关键字定义的是动态局部变量，过程执行结束后即被释放；使用Static关键字定义的是静态局部变量，过程执行结束后仍然保留。本题中函数proc中的局部变量a是动态变量，是静态变量。即每次函数调用后b的值会保留。先后三次调用proc(n)方法，依次输出3、4、5。24、设有如下数组定义语句：Dima(-1To4，3)AsInteger以下叙述中正确的是A、a数组有18个数组元素B、a数组有20个数组元素C、a数组有24个数组元素D、语法有错标准答案：C知识点解析：二维数组定义时对于数组的每一维均给定下标的下界和上界，中间用To连接，即给出下标可取值的变化范围。“数组元素个数”指的是数组中成员的个数，每一维的长度是上界-下界+1，数组元素个数等于各维长度之积。数组下标的默认下限值为0，此时数组某一维的元素个数等于该维下标上界值加1。25、在窗体上画一个命令按钮，然后编写如下程序：OptionBase1PrivateSubCommandl_Click()DimArt(10)AsIntegerFori=1To10Arr(i)=11-iNextix=InputBox(”输入一个整数(3～10)”)PrintArr(2+Art(x))EndSub程序运行后，单击命令按钮，在输入对话框中输入7，则输出结果为A、3B、4C、5D、6标准答案：C知识点解析：本题是一个简单的数组操作，首先在一个循环中为数组元素赋值，然后输出指定的数组元素值。最终输出的是Arr(2+Arr(7))=Arr(6)=5。国家二级VB机试（选择题）模拟试卷第2套一、选择题(本题共25题，每题1.0分，共25分。)1、下面属于应用软件的是A、学生成绩管理系统B、UNIX操作系统C、汇编程序D、编译程序标准答案：A知识点解析：计算机软件按功能分为应用软件、系统软件、支撑软件（或工具软件）。系统软件是管理计算机的资源，提高计算机的使用效率，为用户提供各种服务的软件，如操作系统、数据库管理系统、编译程序、汇编程序和网络软件等，B、C、D均为系统软件。应用软件为了应用于特定的领域而开发的软件，A选项正确。2、关系表中的每一行记录称为一个()。A、字段B、元组C、属性D、关键码标准答案：B知识点解析：在关系表中，每一列称为一个属性，对应表中的一个字段；每一行称为一个元组，对应表中的一条记录。3、下列描述中正确的是A、程序就是软件B、软件开发不受计算机系统的限制C、软件既是逻辑实体，又是物理实体D、软件是程序、数据与相关文档的集合标准答案：D知识点解析：计算机软件与硬件是计算机系统中相互依存的两部分。计算机软件是包括程序、数据及相关文档的完整集合。软件由两部分组成：一部分是机器可执行的程序和数据；二是机器不可执行的，与软件开发、运行、维护、使用等有关的文档。软件具有以下六个特点：①软件是一种逻辑实体，而不是物理实体，具有抽象性。②软件的生产与硬件不同，它没有明显的制作过程。③软件在运行、使用期问不存在磨损、老化问题。④软件的开发、运行对计算机系统具有依赖性，受计算机系统的限制，这导致了软件移值的问题。⑤软件复杂性高，成本昂贵。⑥软件的开发涉及诸多社会因素4、下面程序运行后，语句“Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger,jAsIntegeri＝0Doi＝i＋1Forj＝10To1Step－3i＝i＋jPriniNextjLoopWhilei＜50EndSubA、4B、8C、12D、16标准答案：C知识点解析：本题考查双重循环的分析。程序段中的循环结构为外循环Do…LoopWhile，内部又包括了For循环，内循环的执行次数固定，每执行一次外循环，执行4次内循环，每次执行完内循环后，外循环变量i的值增加23，因此外循环共执行了3次。可推出内循环中的语句Printi共执行了12次。5、VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Text1文本框中，则每输入一个字母()。A、只触发KeyUp事件B、这3个事件都会触发C、只触发KeyDown、KeyPress事件D、不触发其中任何一个事件标准答案：B知识点解析：当控件具有焦点时，如果按下一个字母键，将会依次触发此控件的KeyDown、KevUp和KevPress事件。6、两个或两个以上模块之间关联的紧密程度称为A、耦合度B、内聚度C、复杂度D、数据传输特性标准答案：A知识点解析：模块的独立性是指每个模块只完成系统要求的独立的子功能，并且与其他模块的联系较少且接口简单。衡量软件的模块独立性使用：内聚性和耦合性两个定性度量标准。内聚性是对一个模块内部各个元素彼此结合的紧密程度的度量；耦合性是对模块间互相连接的紧密程度的度量。一般较优秀的软件设计，应尽量做到高内聚、低耦合，即减弱模块之间的耦合性和提高模块内的内聚性，有利于提高模块的独立性。7、设有以下函数过程：Functionfun(aAsInteger，bAsInteger)DimCAsIntegerIfaA、a、b的最大公约数B、a、b的最小公倍数C、a除以b的余数D、a除以b的商的整数部分8、下面()不是VB的文件系统控件。A、DriveListBox控件B、DirListBox控件C、FileListBox控件D、ListBox控件9、以下能在窗体Forml的标题栏中显示“VisualBasic窗体”的语句是A、Form1Name="VisualBasic窗体"B、Form1．Title="VisualBasic窗体"C、Form1．Caption="VisualBasic窗体"D、Form1．Text="VisualBasic窗体"10、在窗体上画一个水平滚动条，其属性值满足MinA、增加一个SmallChange量B、减少一个SmallChange量C、增加一个LargeChange量D、减少一个LargeChange量11、在窗体上画一个文本框，其名称为Text1，然后编写如下程序：OptionBase1PfivateSubForm_Click()DimArr(10)AsIntegerFori=6To10An-(i)=i一3NextiTextl．Text=Str(Arr(6)+An-(An．(6)+Arr(10)))EndSub程序运行后，单击窗体，在文本框中显示的内容是()。A、7B、8C、9D、1012、窗体上有一个名称为Label1的标签和一个名称为Command1的命令按钮。命令按钮的单击事件过程如下：PrivateSubCommand1_Click()x=InputBox("输入x："，，0)：y=InputBox("输入y："，，0)Label1．Caption=x+yEndSub运行程序，单击命令按钮，在输入对话框中分别输入2、3，运行的结果是A、程序运行有错误，数据类型不汽配B、程序运行有错误，InputBox函数的格式不对C、在Label1中显示5D、在Labll中显示2313、以下叙述中错误的是A、在keyPress事件过程中不能识别键盘的按下与释放B、在keyPress事件过程中不能识别回车键C、在keyDown和keyUp事件过程中，将键盘输入的“A”和“a”视作相同的字母D、在keyDown和keytJp事件过程中，从键盘上输入的“1”和从右侧小键盘上输入的“1”14、窗体上有一个名称为Textl的文本框，一个名称为Combol的组合框。将文本框中的内容添加到组合框中所使用的命令是A、Textl．AddIternCombo1．TextB、Comb01．AddltemTextl．TextC、Comb01．Text=Text1．TextD、Textl．Text=Combo1．Text15、下面关于控件数组的叙述中正确的是A、控件数组中所有控件的名称相同，但其Index属性值各不相同B、控件数组中所有控件的名称相同，但其Value属性值各不相同C、控件数组中每个元素都是独立的控件，因此都有各自的事件过程D、上述都是错误的16、在窗体上画一命令按钮和一文本框，其名称分别为Command1和Text1，然后编写如下程序：FunctionFun(xAsInteger,yAsInteger)AsIntegerFun=IIf(x＜y,x,y)EndFunctionPrivateSubForm_Load()Command1.Default=TrueEndSubPrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=20:b=12Text1.Text=Str(Fun(a,b))EndSub程序运行后，按回车键，文本框中显示的内容为A、12B、20C、24D、4017、设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改为Whilea＜bD、把Whilea＞b改为Whilea＞=b18、下列关于菜单项的描述中，错误的是A、通过内缩符号(…)设置菜单项的层次B、通过Enabled属性设置菜单项的有效性C、菜单项的索引号可以不连续D、菜单项的索引号必须从1开始19、运行如下程序PrivateSubCommandlClick()Dima(5，5)AsIntegerFori=1To5Forj=1To4a(i，j)=i*2+jIfa(i，j)／7=a(i，j)＼7Thenn=n+1EndIfNextjNextPrintnEndSub则n的值是A、2B、3C、4D、520、若己把一个命令按钮的Default属性设置为True，则下面可导致按钮的Click事件过程被调用的操作是A、用鼠标右键单击此按钮B、按键盘上的Esc键C、按键盘上的回车键D、用鼠标右键双击此按钮21、窗体上有一个名称为Textl的文本框，一个名称为Commandl的命令按钮。要求编写一个程序，统计文本框中0-9各数字字符的个数。某人编写如下程序：PrirateSubCommandl_Click()Dimcount(10)AsInteger’第1个For循环Fori=0To9count(i)=0Nexts=Trim(Text1，Text)strLen=Len(s)’第2个For循环Fori=1TostrLenc=Mid(s，i，1)Ifc＞="0"Andc＜="9"Thenx=Val(c)：count(i)=count(i)+1EndIfNext’第3个For循环Fori=0To9PrintStr(i)，count(i)NextEndSub运行程序后，发现不能实现题目的要求，程序应该进行的修改是A、将第2个For循环的初值改为0B、将第2个For语句改为Fori=0To9C、去掉x=Val(c)语句D、将count(i)=count(i)+1改为count(x)=count(x)+122、以下关于文件的叙述中，错误的是A、顺序文件有多种打开文件的方式B、读取顺序文件的记录时，只能从头至尾逐记录进行C、顺序文件中各记录的长度是固定的D、随机文件一般占用空间比较小23、下面关于文件叙述中错误的是A、VB数据文件需要先打开，再进行处理B、随机文件每个记录的长度是固定的C、不论是顺序文件还是随机文件，都是数据文件D、顺序文件的记录是顺序存放的，可以按记录号直接访问某个记录24、关于随机文件，以下叙述中错误的是A、使用随机文件能节约空间B、随机文件记录中，每个字段的长度是固定的C、随机文件中，每个记录的长度相等D、随机文件的每个记录都有一个记录号25、在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommandl_Click()DimI，NumRandomizeDoForI=1To1000Num=Int(Rnd*100)：PrintNum；SelectCaseNumCase12ExitForCase58ExitDoCase65，68，92EndEndSelectNextILoopEndSub上述事件过程执行后，下列描述中正确的是A、Do循环执行的次数为1000次B、在For循环中产生的随机数小于或等于100C、当所产生的随机数为12时结束所有循环D、当所产生的随机数为65、68或92时窗体关闭、程序结束国家二级VB机试（选择题）模拟试卷第3套一、选择题(本题共25题，每题1.0分，共25分。)1、数据流图中带有箭头的线段表示的是A、控制流B、事件驱动C、模块调用D、数据流标准答案：D知识点解析：数据流图是从数据传递和加工的角度，来刻画数据流从输入到输出的移动变换过程。其中带箭头的线段表示数据流，沿箭头方向传递数据的通道，一。般在旁边标注数据流名。2、数据字典(DD)所定义的对象都包含于A、数据流图(DFD图)B、程序流程图C、软件结构图D、方框图标准答案：A知识点解析：数据字典是指对数据的数据项、数据结构、数据流、数据存储、处理逻辑、外部实体等进行定义和描述，其目的是对数据流程图中的各个元素做出详细的说明。3、下面属于白盒测试方法的是A、等价类划分法B、逻辑覆盖C、边界值分析法D、错误推测法标准答案：B知识点解析：白盒测试的主要方法有逻辑覆盖、基本路径测试等。4、在数据库系统中，用户所见的数据模式为A、概念模式B、外模式C、内模式D、物理模式标准答案：B知识点解析：用户所见到的数据模式是外模式也称用户模式。它是用户的数据视图，它由概念模式导出。一个概念模式可以有若干个外模式，每个用户只关心与它有关的外模式，这样不仅可以屏蔽大量无关信息，而且有利于数据维护。5、数学式y2=x＞10在VB中应表示为()。A、y*y＞xAnd10＜=xB、Sqr(y)＞xAndx＞=10C、Sqr(y)＞xOrx＜=10D、Dy*y＞xOrx＞=10标准答案：A知识点解析：Sqr(x)是平方根函数，所以选项B)、C)不正确。And、Or是逻辑运算符，And是逻辑与，Or是逻辑或，所以选项D)不正确。由题意，答案为A)。6、窗体上有1个Timer1计时器，1个Shape1形状控件，还有下面程序代码：DimflagAsBooleanPrivateSubForm_Load()flag=TrueTimer1．Enabled=TrueTimer1．Interva1=1000EndSubPrivateSubTimer1Timer()IfflagThenShape1．Height=Shape1．Height*2Shape1．Width=Shape1．Width*2ElseShape1．Height=Shape1．Height*0．5Shape1．Width=Shape1．Width*0．5EndIfflag=NotflagEndSub执行程序所产生的效果是A、Shape1形状的尺寸在缩小到原来一半和恢复原状这2种状态间切换，每秒切换一次B、Shape1形状的尺寸在扩大到原来2倍后恢复原状这2种状态问切换，每秒切换一次C、Shape1形状的尺寸在缩小到原来一半和扩大到原来2倍这2种状态间切换，每秒切换一次D、Shape1形状的尺寸会不断扩大标准答案：B知识点解析：Form_Load过程中设定timer事件定时触发，定时时间为1秒；在Timer1_Timer过程中，Shape1形状的尺寸在扩大到原来2倍后恢复原状，然后退出。下一次timer事件触发时继续这个过程。因此，选B。7、如果要将一个窗体从内存中清除，应使用的语句是()。A、UnloadB、ShowC、LoadD、Hide标准答案：A知识点解析：Unload语句用来将指定窗体从内存中清除。格式：Unload窗体名称。8、对于能够获得焦点的控件，若要使其不能接收焦点，应该A、将Tabstop属性值设为TrueB、将TabStop属性值设为FalseC、将TabIndex属性值设为0D、将Enabled属性值设为False标准答案：D知识点解析：TabStop属性是用来设置是否允许用户使用Tab键将焦点移到该控件上，默认情况下是允许的。若其值为True时，允许使用Tab键将焦点移到该控件；否则，就不允许。Tablndex属性则是用来设置该控件的跳表顺序的，取值是一个整数，从0开始依次类推，该属性的值小的将先获取焦点。Enabled是用来设置控件是否可用。根据题意，选项D正确。9、窗体上有一个名称为Commandl的命令按钮，其单击事件过程如下：PrivateSubCommand1_Click()Fori=3ToStep-1Sum=0Forj=1ToiSum=Sum+i*jNextNextPrintSumEndSub运行程序时，单击命令按钮，则窗体上显示的是A、1B、6C、18D、25标准答案：A知识点解析：i初值为3，步长为-1，即循环中i值分别为3，2，1，j的for循环中，步长为1。注意Sum=0语句。每次执行以j为变量的for循环前Sum被清0。因此Sum只在i=1的循环有值。选A。10、下列叙述中正确的是,,A、解决同一个问题的不同算法的时间复杂度一般是不同的B、解决同一个问题的不同算法的时间复杂度必定是相同的C、对同一批数据作同一种处理，如果数据存储结构不同，不同算法的时间复杂度肯定相同D、对同一批数据作不同的处理，如果数据存储结构相同，不同算法的时间复杂度肯定相同标准答案：A知识点解析：算法的时间复杂度是指执行算法所需要的计算工作量，而计算工作量是用算法所执行的基本运算次数来度量的。解决同一个问题的不同算法的时间复杂度，可能相同也可能不相同。算法的时间复杂度与数据存储结构无关，对同一批数据作同一种处理或者不同处理，数据存储结构相同或者不同，算法的时间复杂度都可能相同或者不同。故选A选项。11、存储在计算机内有结构的数据集合是A、数据库B、数据库系统C、数据库管理系统D、数据结构标准答案：A知识点解析：数据库是指长期存储在计算机内的、有组织的、可共享的数据集合。数据库系统是由数据库及其管理软件组成的系统，是应用软件。数据库管理系统是数据库系统的核心，它位于用户与操作系统之间，属于系统软件。数据结构是计算机存储、组织数据的方式。故本题选A选项。12、下列有语法错误的赋值语句是A、y=7=9B、s=m+nC、Text1．Text=10D、m+n=12标准答案：D知识点解析：赋值语句可以把指定的值赋给一个变量或一个对象的某个属性，其格式为[Let]目标操作符=源操作符。格式中的“源操作符”可以是变量、表达式、常量、对象属性以及它们的组合，但目标操作符必须是单个的变量或者属性。13、判断单选按钮是否被选中的属性为A、SelectedB、CheckedC、ValueD、Index标准答案：C知识点解析：Value属性返回或设置单选按钮的选中状态，其中单选按钮的Value属性可设置为两种值：False表示未选(默认值)；值为True表示选中，选择某单选按钮后，该单选按钮中将显示“●”。14、窗体上有1个名称为Labell的标签；1个名称为Listl，且含有若干表项的列表框。为了使得单击Listl中某个表项时，在Labell中相应地显示该表项，应使用的程序代码为A、PrivateSubLiktl—Click()Labell．Caption=Listl．IndexEndSubB、PrivateSubListl—Click()Labell．Caption=Listl．ListCOuntEndSubC、PrivateSubListl—Click()Labell．Caption=Listl．TextEndSubD、PrivateSubListlClick()Labell．Caption=Listl．SelectedEndSub标准答案：C知识点解析：标签控件(Label)常用于显示用户不能直接改变的信息，其C印tion属性用来设置其显示的文本。列表框的Text属性用于返回列表框中选择的项目的内容，返回值总与列表框的List(ListIndex)属性的返回值相同，而列表框的ListIndex属性只返回当前选择的项目的索引号。15、命令按钮Command1的单击事件过程如下：PrivateSubCommand1_Click()Dima(10，10)AsIntegerx=0Fori=1To3Forj=1To3a(i，j)=i*2ModjIfxA、1B、2C、3D、4标准答案：B知识点解析：本题中使用二重循环为二维数组赋初值，每个元素的值为行号×2然后除以列号的余数：接下来找出数组的最大值。由于列号最大只能为3，所以余数的最大值为2。16、命令按钮Commandl的MouseUp事件过程结构如下：PrivateSubCommandlMouseUp(ButtonAsInteger，ShiftAsInteger,XAsSingle，YASSingle)……EndSub则以下叙述中错误的是A、X、Y参数表示的是Commandl左卜角在窗体中的位置B、Button参数用于确定按下的鼠标键C、Shift参数用于确定是否按下了Alt、Ctrl或Shift键D、MouseUp表示抬起鼠标按键时触发的事件标准答案：A知识点解析：鼠标状态事件又分为按下事件(MouseDown)、移动事件(MouseMove)和弹起事件(MouseUp)，这三个事件具有相同的参数。Button参数的值是在MouseUp事件发生时，系统自动产生的，代表按下的是那个鼠标键：Shift参数确定使用转换键的情况；X、Y参数可以确定触发此事件时鼠标的位置。17、有下面程序代码：PrivateSubCommandl_Click()DimaAsStringa="COMPUTER"n=search(a，"T")：PrintIIf(n=0，"未找到"，n)EndSubPrivateFunctionsearch(strAsString，chAsString)AsIntegerFork=1ToLen(str)c=Mid(str，k，1)Ifc=chThensearch=k：ExitFunctionEndIfNextksearch=0EndFunction程序运行后，单击命令按钮Commandl，输出结果是A、0B、8C、6D、未找到标准答案：C知识点解析：本题中Search函数的参数是两个字符串，在函数内进行循环，依次取出第一个参数的第k位和第二个参数进行比较，如果相等则返回k的值，实际上就是查找第二个参数在第一个参数中出现的位置。18、为了通过传值方式来传送过程参数，在函数声明部分应使用的关键字为A、ValueB、ByValC、ByRefD、Reference标准答案：B知识点解析：传值就是通过值传送实际参数，即传送实参的值而不是传送它的地址。在这种情况下，通用过程不访问变量(实参)的原始地址，因此不会改变原来变量的值，所有的变化都是在变量的副本上进行的。传值方式通过关键字Byval来实现。也就是说，在定义通用过程时，如果形参前面有ByVal，则该参数通过传值方式传送。在传值方式下，对形参的改变不会影响到实参。19、设有如下事件过程：PrivateSubForm_Click()x=0WhileX<10x=x+1：x=x*xWendPrintXEndSub运行程序，单击窗体，输出结果是A、16B、19C、20D、25标准答案：D知识点解析：本题是简单While循环，在循环中改变循环变量x的值，要注意退出循环时x必然是不会满足循环条件的。本题中循环中x依次变化为1、4、25。20、关于文件操作，以下叙述中正确的是A、Kill命令的作用是删除用户编写的VB程序文件B、使用Name命令能够对文件或文件夹重新命名C、用FileCopy进行文件拷贝时，可以使用通配符D、用FileCopy可以将打开的文件复制到指定的文件夹标准答案：B知识点解析：Lill语句的功能是从磁盘中删除任何文件。FileCopy语句的功能是复制文件，其格式为FileC0py，，其中当destination和source中文件名不相同时，执行复制并重命名文件功能；当destination和source中路径不同但文件名相同时，执行复制功能；当destina土ion中指定的文件已存在时，将覆盖该文件；当source中指定的文件已打开时。将出错。使用Name命令能够对文件或文件夹重新命名。21、假定建立了一个名为Commandl的命令按钮数组，则以下说法中错误的是A、数组中每个命令按钮的名称(Name属性)均为CommandlB、数组中每个命令按钮的标题(Caption属性)都一样C、数组中所有命令按钮可以使用同一个事件过程D、用名称Commandl(下标)可以访问数组中的每个命令按钮标准答案：B知识点解析：本题考查控件数组。选项B)中，命令按钮控件数组的Caption属性不一定相同，可以单独分别设置，其他选项均正确。22、以下叙述中错误的是A、在通用过程中，多个形式参数之间可以用逗号作为分隔符B、在Print方法中，多个输出项之间可以用逗号作为分隔符C、在Dim语句中，所定义的多个变量可以用逗号作为分隔符D、当一行中有多个语句时，可以用逗号作为分隔符标准答案：D知识点解析：本题考查的考点是有关分隔符的。在过程的参数中需要用分隔符隔开；在Print方法中使用逗号呵以隔开多个输出项；在一条Dim语句中定义多个变量时，这些变量也要用逗号隔开；在一行中写多个语句时，多个语句之间需要用冒号隔开。23、顺序文件在一次打开期间A、只能读，不能写B、只能写，不能读C、既可读，又可写D、或者只读，或者只写标准答案：D知识点解析：打开文件的基本格式为：OpenFileNameForModeAs#FileNumber。其中打开顺序文件主要有Output、Append、Input几种方式，按照这几种方式打开的顺序文件或者只读，或者只写，不能同时读写。24、窗体上有一个Textl文本框，一个Commandl命令按钮，并有以下程序：PrivateSubCommandl_click()DimnIfTextl．Text＜＞”123456”Thenn=n+l：Print”口令输入错误”&n&”次”EndIfEndSnb希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上而的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是()。A、在Dimn语句的下面添加一句：n=0B、把Print”口令输入错误”＆n＆”次”改为Print”口令输入错误”+n+”次”C、把Print”口令输入错误”＆n＆”次”改为Print”口令输入错误”&Str(n)&”次”D、把Dimn改为Staticn标准答案：D知识点解析：本题中题干部分的程序之所以会产生不合要求的结果，其原因是在单击事件中的第一条语句为Dimn，这样的话每次单击按钮时触发此事件，都将会执行这条语句，重新定义一个局部变量n并设其默认初值为0。Static语句在过程级别中使用，用于声明变量并分配存储空间，在整个代码运行期间都能保留使用Static语句声明的变量的值，因此此处应该使用Staticn来声明变量。25、以下关于控件数组的叙述中，正确的是A、数组中各个控件具有相同的名称B、数组中可包含不同类型的控件C、数组中各个控件具有相同的Index属性值D、数组元素不同，可以响应的事件也不同标准答案：A知识点解析：控件数组是一组具有共同名称和共同类型的控件，它们拥有共同的事件，数组中的每个控件都有惟一的索引号(Index)，即下标。国家二级VB机试（选择题）模拟试卷第4套一、选择题(本题共25题，每题1.0分，共25分。)1、设树T的深度为4，其中度为1，2，3，4的结点个数分别为4，2，1，1。则T中的叶子结点数为A、8B、7C、6D、5标准答案：B知识点解析：深度为m二叉树其总结点数为2m－1=24－1=15。总结点数减去度为1，2，3，4的结点个数就是叶子结点数。15－4－2－1－1=7。2、下面为单精度实型(即单精度浮点型)变量的是A、x$B、x＆C、x!D、x#标准答案：C知识点解析：在visualBasic中规定一个变量的数据类型可以用类型说明符来标识，如％表示整型、$表示字符串型、!表示单精度浮点型、#表示双精度浮点型、＆表示长整型。3、在软件开发中，需求分析阶段可以使用的工具是A、N-S图B、DFD图C、PAD图D、程序流程图标准答案：B知识点解析：在软件开发中，需求分析阶段常使用的工具有数据流图(DFD)，数据字典(DD)、判断树和判断表。4、如果要定义一个窗体级变量，定义变量语句的位置应该是()。A、在使用该变量的过程中B、在该窗体模块所有过程的前面C、在该窗体模块所有过程的后面D、在某个标准模块中标准答案：B知识点解析：窗体级变量，在窗体的“通用声明”段所有过程的前面用Dim语句或Private语句声明的变量，可被本窗体的任何过程访问。5、有两个关系R和S如下：则由关系R得到关系S的操作是A、自然连接B、并C、选择D、投影标准答案：C知识点解析：关系S是由关系R中的一行元组组成，应通过选择运算得到。6、若要把窗体上命令按钮Command1的状态设置为不可用，应该执行的命令是()。A、Command1．Enabled=FalseB、Command1．Visible=FalseC、Command1．Cancel=FalseD、Command1．Default=False标准答案：A知识点解析：命令按钮的Enabled属性是设置可用不可用，故A选项正确。Visible属性是设置可见不可见；Cancel属性值为True时，表示按Esc键和单击该命令按钮一样都会触发该命令按钮的单击事件，反之，Esc链不起作用；Default属性值为True时，表示按Enter键和单击该命令按钮一样都会触发该命令按钮的单击事件，反之，Enter键不起作用。7、在设计阶段，假定在图片框Picture1中装入了一个图形，为了删除该图片框控件，应采用的正确操作是A、选择图片框，然后按Del键B、执行语句Picture1．Picture=LoadPicture("")C、执行语句Picture1．Picture=""D、选择图片框，在属性窗口中选择Picture属性，然后按回车键标准答案：A知识点解析：删除控件的操作步骤是首先选中控件，然后按键盘上的Del键。8、设窗体的名称为Form1，标题为Win，则窗体的MouseDown事件过程的过程名是A、Form1_MouseDownB、Win_MouseDownC、Form_MouseDownD、MouseDown_Form1标准答案：C知识点解析：在VB中，某个控件事件过程的过程名应该为：控件名称事件名称，但是窗体例外，任何窗体的事件过程都使用Form事件名称，因此窗体Form1的MouseDown事件的过程名就应该是FormMouseDown。9、在VB中，函数过程与子程序过程的区别之一是()。A、函数过程必须有参数，而子程序过程可以没有B、函数过程的参数传递只采用值传递，而子程序过程只采用地址传递C、在程序中，子程序过程调用的代码可以写在表达式中，而函数过程不能D、函数过程有返回值，而子程序过程没有标准答案：D知识点解析：在VisualBasic中有两类过程：一类是系统提供的内部函数和事件过程；另一类是用户根据自己的需要定义的，供事件过程的多次调用。在第二类过程中，涉及最多的是子过程。它们的共同点是完成某种特定功能的一组程序代码，不同的是函数是可以直接返回值的特殊过程，所以函数过程定义时有返回值的类型说明。两者最大的区别就是Sub过程的过程不能直接返回值，而Function过程能直接返回值。10、设有如下程序：PrivateSubForm_Click()num=InputBox("请输入一个实数")：P=InStr(num，"．")Ifp＞0ThenPrintMid(num，p+1)ElsePrint"END"EndIfEndSub运行程序，单击窗体，根据提示输入一个数值。如果输入的不是实数，则程序输出“END”；否则A、用字符方式输出该实数B、输出该实数的整数部分C、输出该实数的小数部分D、去掉实数中的小数点，保留所有数码输出标准答案：C知识点解析：字符串匹配函数Instr用于查找第二个参数在第一个参数中第一次出现的位置，若未找到返回0；Mid(字符串，起始位置[，个数])函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串，若不指定个数将返回字符串中从参数“起始位置”到字符串尾端的所有字符。本题实际就是先找到小数点的位置，然后输出小数点后面的部分，即小数部分。11、如果在列表框List1中没有选中项目，则List1．ListIndex的值为A、-1B、0C、1D、2标准答案：A知识点解析：列表框的ListIndex属性用于返回或设置控件中当前选择项目的索引(下标)，设计时不可用。当ListIndex的值设置为-1时，表示未选定项目，第一项的索引值为0，最后一项的索引值为ListCount-1。12、为达到把a、b中的值交换后输出的目的，某人编程如下：PrivateSubCommandl_Click()a％=10：b％=20Callswap(a，b)Printa,bEndSubPrivateSubswap(ByValaAsInteger，ByValbAsInteger)c=a：a=b：b=cEndSub在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是A、调用swap过程的语句错误，应改为：Callswap(a，b)B、输出语句错误，应改为：print"a"，"b"C、过程的形式参数有错，应改为swap(ByRefaInteger，ByRefbInteger)D、swap中3条赋值语句的顺序是错误的，应改为a=b：b=c：c=a标准答案：C知识点解析：本题考查函数参数传递。VB有两种参数传递方式：传值ByVal和传地址ByRef，ByVal方式形参的修改不会影响到实参，ByRef方式修改形参相当于修改实参。题目要求在调用swap过程后，修改形参影响实参，参数应该使用ByRef方式。13、下列各组的排序方法中，最坏情况下比较次数相同的是A、冒泡排序与快速排序B、简单插入排序与希尔排序C、堆排序与希尔排序D、快速排序与希尔排序标准答案：A知识点解析：对长度为n的线性表排序，下表为常用排序方法时间复杂度：上表中未包括希尔排序，因为希尔排序的时间效率与所取的增量序列有关，如果增量序列为：d1=n/2,di+1=di/2，在最坏情况下，希尔排序所需要的比较次数为O(n1.5)。可知冒泡排序与快速排序最坏情况下比较次数相同。故选A选项。14、设有如下事件过程：PrivateSubCommand1_Click()Dimaa=Array(3，5，6，3，2，6，5，3，5，4，3，9，4，5，6，3，5)x=0n=UBound(A)Fori=0Tonm=0Forj=0TonIfa(i)=a(j)Thenm=m+1EndIfNextjIfm＞xThenx=m：b=a(i)NextiPrintbEndSub运行程序，输出是A、2B、3C、5D、9标准答案：B知识点解析：本题程序中内层For循环是统计具有相同值元素的个数，外层循环的功能则是，对数组中的所有元素进行统计，找出第1个具有相同值的元素个数最多的那个元素值。数组组中元素值为3的元素有5个，元素值为5的元素有5个，元素值为6的元素为3个，元素值为2的元素有1个，元素值为4的元素有1个，元素值为9的元素有1个。因此第1个具有相同元素值的最多个的元素值是3。15、以下不属于VisualBasic数据文件的是()。A、顺序文件B、随机文件C、数据库文件D、二进制文件标准答案：C知识点解析：可以从不同的角度对文件进行分类：按照文件的内容，可分成程序文件和数据文件；按照文件存储信息的形式，可分为ASCII文件和二进制文件；按照文件的组织形式，可分成顺序文件和随机文件；按照存储介质，又可以分为光盘文件、磁盘文件、磁带文件和打印文件等。16、假定有以下通用过程：FunctionFun(nAsInteger)AsIntegerx=n*n：Fun=x-11EndFunction在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：PrivateSubCommandl_Click()DimiAsIntegerFori=1To2y=Fun(i)Printy；NextiEndSub程序运行后，单击命令按钮，在窗体上显示的内容是A、13B、108C、-10-7D、05标准答案：C知识点解析：本题共调用Fun函数2次，每次的函数值都是参数的平方减去11的值，故此输出-10，-7。17、以下打开VisualBasic菜单编辑器的操作中，错误的是A、执行“编辑”菜单中的“菜单编辑器”命令B、执行“工具”菜单中的“菜单编辑器”命令C、单击工具栏中的“菜单编辑器”按钮D、右击窗体，在弹出的快捷菜单中选择“菜单编辑器”命令标准答案：A知识点解析：VisualBasic中的菜单通过菜单编辑器建立，可以通过4种方式进入菜单编辑器：执行“工具”菜单中的“菜单编辑器”命令；使用Ctrl+E组合键：单击工具栏中的“菜单编辑器”按钮；在要建立菜单的窗体上单击右键，将弹出一个菜单，然后单击“菜单编辑器”命令。18、设a、b都是自然数，为求a除以b的余数，某人编写了以下函数：Fvunctionfun(aAsInteger，bAsInteger)Whilea＞ba=a-bWendfun=aEndFunction在调试时发现函数是错误的。为使函数能产生正确的返回值，应做的修改是A、把a=a-b改为a=b-aB、把a=a-b改为a=a＼bC、把Whilea＞b改为Whilea＜bD、把Whilea＞b改为Whilea＞=b标准答案：D知识点解析：本题函数过程的原代码仅适合a不能被b整除的两数，而当a能被b整除时则不适用，如a=4，b=2，a除以b的余数为0，而原代码返回的函数值为2。因此需将语句whilea＞b改为whilea＞=b。19、下面程序计算并输出的是PrivateSubCommand1Click()a=10：s=0Dos=s+a*a*a：a=a-1LoopUntila<=0PrintsEndSubA、13+23+33…+103的值B、10!+…+31+21+11的值C、(1+2+3+…+10)3的值D、10个103的和标准答案：A知识点解析：对于Do型循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件是什么，至少执行一次循环体。在Until循环中条件为False时执行循环体，条件为Tme时退出循环：在while循环中条件为Tme时执行循环体，条件为False时退出循环。本题是一个比较简单的Do循环，计算从1到10的立方和。20、如果把程序的启动对象设置为：SubMain，则SubMain过程A、只能写在Forml窗体中代码的最前面B、可以写在Forml窗体中代码的任何位置C、只能写在某个标准模块的代码中D、可以写在任何窗体或标准模块的代码中标准答案：C知识点解析：在一个应用程序中，有时候需要在显示多个窗体之前对一些条件进行初始化，这就需要在启动程序时执行一个特定启动过程，并命名为SubMain，它类似于C语言中的Main函数。SubMain过程必须在标准模块窗口中建立。21、编写如下程序：PrivateSubCommand1_Click()Dima(3,3)AsInteger,b(3,3)AsIntegerFori=1To3Forj=1To3a(i,j)=i+j:b(i,j)=a(i,j)+i*(j-1)NextjNextiFori=1To3Forj=1To3Printb(i,j);NextjPrintNextiEndSub程序运行后，单击命令按钮Command1，输出结果为A、234345456B、2463694812C、357581171115D、46871013101418标准答案：B知识点解析：本题中有两个二维数组a和b，然后用一个二重循环为两个数组赋值，根据每次循环中i和i的值不难得出B为正确答案。22、有下面事件过程：PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle，YAsSingle)IfButton=2ThenForm1．PSet(X，Y)’PSet方法可以在X，Y处画一个点EndIfEndSub程序运行后，产生的效果是A、在窗体上每单击鼠标左键一次，就在鼠标位置处画一个点B、按着鼠标左键，移动鼠标，可在窗体上画出鼠标的运动轨迹C、按着鼠标右键，移动鼠标，可在窗体上画出鼠标的运动轨迹D、不按任何鼠标键，移动鼠标，可在窗体上画出鼠标的运动轨迹标准答案：C知识点解析：鼠标事件分点击事件和状态事件：点击事件有单击(click)和双击(DblClick)，不区分左右键；状态事件有按F(MouseDown)、移动(MouseMove)和弹起(Mouseup)，能够区分出鼠标的左、右和中间键。如果鼠标按钮是当其指针在窗体或控件之上时被按下并释放，则该对象将“捕获”鼠标并接收全部与该对象相关的鼠标事件。在本题代码中当鼠标移动时触发MouseMove事件，此时判断按下的鼠标键为右键(Button=2)时，则在窗体鼠标指针经过的位置依次画点，从而形成一条线。23、为了把命令按钮设置为图形格式，其Style属性值应为A、TrueB、FalseC、1D、0标准答案：C知识点解析：命令按钮的Style属性用来设置命令按钮的外观，可设置成以下两种形式，值为Standard，按钮以标准的形式显示，即文字形式，为默认值；值为Gfaphical，按钮将以图形的方式显示。24、以下关于菜单设计的叙述中错误的是A、各菜单项可以构成控件数组B、每个菜单项可以看成是一个控件C、设计菜单时，菜单项的“有效”未选，既，表示该菜单项不显示D、菜单项只响应单击事件标准答案：C知识点解析：本题考查菜单的使用。菜单的“有效”属性名为Enabled，用于设定该菜单项是否有效。默认有效，若设置为无效，执行时呈灰色显示，鼠标点击无效。25、在窗体上画一个名称为Commandl的命令按钮，并编写如下程序：PrivateTypeRecordIDAsInteger：NameAsString*20EndTypePrivateSubCommandl_Click()DimMaxSize，NextChar,MyCharOpen”d：＼temp＼female．txt”ForInputAs#1MaxSize=LOF(1)ForNextChar=MaxSizeTo1Step-1MyChar=Input(1，#)NextNextCharPrintEOF(1)Close#1EndSub运行程序，单击命令按钮，其输出结果为A、TrueB、FalseC、0D、Null标准答案：A知识点解析：LOF函数返回给文件分配的字节数(即文件的长度)，与DOs下用Dir命令所显示的数宁相同。EOF函数用于判断义件指针是否已到文件结尾，如果到达文件末尾，则返回True。通过使用EOF函数，测试是否到达文件末尾。本题中的循环遍历了整个文件，因此循环结束时文件指针在文件结尾。国家二级VB机试（选择题）模拟试卷第5套一、选择题(本题共40题，每题1.0分，共40分。)1、在VisualBasic环境下设计应用程序时，系统能自动检查出的错误是A、语法错误B、逻辑错误C、逻辑错误和语法错误D、运行错误标准答案：A知识点解析：VisualBasic可以自动对输入的内容进行语法检查，有语法错误会给出提示，但是不会自动检查逻辑错误，也无法检查出运行错误。2、为了使列表框中的项目呈多列表显示，需要设置的属性为A、ColumnsB、StyleC、ListD、MultiSelect标准答案：A知识点解析：本题考查控件属性。设置列表框中的项目呈多列表显不，需要设置列表框的Columns属性：当该属性设置为0(默认)时，所有的项目呈单列显示；如果该属性等于1，则列表框呈多行多列显示；如果大于1且小于列表框中的项目数，则列表框呈单行多列显示。3、下列叙述中正确的是()。A、循环队列中的元素个数随队头指针与队尾指针的变化而动态变化B、循环队列中的元素个数随队头指针的变化而动态变化C、循环队列中的元素个数随队尾指针的变化而动态变化D、以上说法都不对标准答案：A知识点解析：在循环队列中，用队尾指针rear指向队列中的队尾元素，用队头指针front指向排头元素的前一个位置。因此，从队头指针front指向的后一个位置直到队尾指针rear指向的位置之间所有的元素均为队列中的元素。所以循环队列中的元素个数与队头指针和队尾指针的变化而变化，A正确。4、下面关于菜单的叙述中错误的是A、弹出式菜单也用菜单编辑器编辑B、弹出式菜单中的某个菜单项也可以有自己的子菜单C、把弹出式菜单的最高级菜单项的Visible属性设置为True，可以弹出该弹出式菜单D、用菜单编辑器可以同时编