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

国家二级（VB）机试模拟试卷22（共9套）（共397题）国家二级（VB）机试模拟试卷第1套一、选择题(本题共40题，每题1.0分，共40分。)1、以下选项中，不合法的VisualBasic的变量名是()。A、a5bB、＿xyzC、a＿bD、andif标准答案：B知识点解析：VB中变量的命名规则为：①必须以字母或汉字开头②由字母、汉字、数字或下划线组成③不能使用VB已经占用的关键字。本题选项B中变量名以下划线开头，不合法。故B选项错误。2、下列关于函数过程的叙述中，正确的是()。A、如果不指明函数过程参数的类型，则该参数没有数据类型B、函数过程的返回值可以有多个C、函数过程形参的类型与函数返回值的类型没有关系D、当数组作为函数过程的参数时，既能以传值方式传递，也能以引用方式传递标准答案：C知识点解析：本题考查过程定义。在VB中出现的变量，如果没有声明类型，那么为变体型。VB中可以通过调用函数过程得到返回值，一个函数过程只能有一个返回值，如果需要改变主调过程的参数，可以进行传址方式调用函数。VB数组参数中不存在传址调用，函数的参数和返回值类型之间没有任何关系。3、在数据库系统的组织结构中，下列()映射把用户数据库与概念数据库联系了起来。A、外模式／模式B、内模式／外模式C、模式／内模式D、内模式／模式标准答案：A知识点解析：数据库有两层映像，即外模式／模式和模式／内模式映像。模式／内模式映像定义数据库全局逻辑结构与存储结构之间的对应关系。4、单击一次命令按钮，下列程序代码的执行结果为()。PrivateSubCommand1_Click()DimaAsInteger，bAsInteger，c，AsIntegera=2：b=3：c=4PrintP2(c，b，a)EndSubPrivateFunctionP1(xAsInteger，yASInteger，zAsInteger)P1=2*x+y+3*zEndFunctionPrivateFunctionP2(xAsInteger，yAsInteger，zAsInteger)P2=P1(z，x，y)+xEndFunctionA、21B、19C、17D、34标准答案：A知识点解析：本题考查函数调用以及参数传递。在命令按钮单击事件中，调用输出函数P2的执行结果，实参a、b、c传递给形参x、y、z，具体的值为2、3、4。在P2函数过程中，调用P1，实参z、x、y传递给P1的实参x、y、z，具体的值为4、2、3。5、在窗体上画两个单选按钮，名称分别为Optionl、Option2，标题分别为“宋体”和“黑体”；1个复选框(名称为Checkl，标题为“粗体”)和1个文本框(名称为Textl，Text属性为“改变文字字体”)，窗体外观如图所示。程序运行后，要求“宋体”单选按钮和“粗体”复选框被选中，则以下能够实现上述操作的语句序列是()。A、Optionl．Value=FalseCheekl．Value：TrueB、Optionl．Value=TrueCheckl．Value=0C、Option2．Value=FalseCheekl．Value=2D、Optionl．Value=TrueCheckl．Value=1标准答案：D知识点解析：单选按钮控件的Value属性值为True表示被选中．False表示被选中；复选框控什的Value属性值为0表示未选中，1表示选中，2表示禁止。本题中是单选按钮和复选框都被选中，故D选项正确。6、一个栈的初始状态为空。现将元素1、2、3、4、5、A、B、C、D、E依次入栈，然后再依次出栈，则元素出栈的顺序是()。A、12345ABCDEB、EDCBA54321C、ABCDE12345D、54321EDCBA标准答案：B知识点解析：栈是先进后出的原则组织数据，所以入栈最早的最后出栈，所以选择B。7、下列叙述中正确的是()。A、MsgBox语句的返回值是一个整数B、执行MsgBox语句并出现信息框后，不用关闭信息框即可执行其他操作C、MsgBox语句的第一个参数不能省略D、如果省略MsgBox语句的第三个参数(Title)，则信息框的标题为空标准答案：C知识点解析：Msgbox语句的功能：显示消息提示框，在对活框中显示提示消息，等待用户单击按钮，单击不同的按钮返回不同的整数。它有2种形式：①MsgBox函数格式：变量=MsgBox(<提示内容>[，样式][，标题])，注意MsgBox函数带括号，有返回值。②MsgBox语句格式：MsgBox(<提示内容>[，样式][，标题])，有无括号都可以，无返回值。故A选项错误。其中：第1个参数：提示内容是必需的，不能省略。故C选项正确。第2个参数：可选。整型表达式，缺省值0，指定信息框中按钮数目、类型、图标类型、缺省按钮等。第3个参数：可选，如果省略，则标题栏并不为空默认显示它所属的工程名。故D选项错误。执行MsgBox语句时出现信息框后，必须关闭信息框才可执行其他操作。故B选项错误。8、下列程序执行后，变量a的值为()。Dima，b，c，dAsSinglea=10：b=20：c=40Ifb>aThend=a：a=b：b=dEndIfIfc>aThend=a：a=c：c=dEndIfIfc>bThend：b：b=c：c=dEndIfA、10B、40C、20D、100标准答案：B知识点解析：本题考查选择语句。程序段中包括3条选择语句，其作用分别为：如果a小于b那么交换a和b，如果a小于c那么交换a和c，如果b小于c那么交换b和c，相当于对a、b、c做了降序排列。9、在窗体上有一个文本框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事件，其中，UC88e把字符“p”转化为大写字母，显示大写字母“P”。10、检查软件产品是否符合需求定义的过程称为()。A、确认测试B、需求测试C、验证测试D、路径测试标准答案：A知识点解析：确认测试的任务是验证软件的功能和性能，以及其他特性是否满足需求规格说明中确定的各种需求。11、窗体上有一个名称为Text1的文本框；一个名称为Timer1的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下：PrivateSubTimer1_Timer()StaticflagAsIntegerIfflag＝0Thenflag＝1flag＝－flagIfflag＝1ThenText1.ForeColor＝&HFF&’&HFF&为红色ElseText1.ForeColor＝&HC000&’&HC000&为绿色EndIfEndSub以下叙述中正确的是()。A、每次执行此事件过程时，flag的初始值均为0B、flag的值只可能取0或1C、程序执行后，文本框中的文字每5秒改变一次颜色D、程序有逻辑错误，Else分支总也不能被执行标准答案：C知识点解析：程序中flag被定义为Static变量，它的值只在第一次执行事件过程时为0，以后每次执行计时器事件过程它的值都会保留上次过程中运算后的值，之后它的值是1或－1。文本框控件的ForeColor属性表示文本框中文字的颜色，计时器控件的Interval属性为5000，即计时器间隔为5秒钟一次，每次调用就会交替改变文本框中文字的颜色。因此C选项正确。12、在窗体上画一个组合框，一个命令按钮和一个文本框，其名称分别为Combo1，Command1和Text1，然后编写如下事件过程：PrivateSubForm_Load()Combo1.AddItem"AAAAA"Combo1.AddItem"BBBBB"Combo1.AddItem"CCCCC"Combo1.AddItem"DDDDD"Combo1.AddItem"EEEEE"EndSub程序运行后，如果单击命令按钮，则在文本框中显示组合框的项目"CCCCC"。为了实现该操作，在命令按钮的Click事件过程中应使用的语句为()。A、Text1.Text＝Combo1.List(2)B、Text1.Text＝Combo1.TextC、Text1.Text＝Combo1.List(3)D、Text1.Text＝Combo1.ListIndex标准答案：A知识点解析：List属性可以返回组合框中各选项的内容。用下标区分各选项，第1个选项下标为0，依次类推。"CCCCC"为组合框中第3个选项，可以用Combo1.List(2)返回选项内容。故A选项正确，C选项错误。Text属性返回的是组合框中选中项目的内容；ListIndex属性返回的是选中项目的索引值，即下标。故B、D选项错误。13、设窗体上有一个通用对话框控件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个过滤器。14、以下程序的功能是随机产生10个两位的整数：OptionBase1PrivateSubCommand1_Click()Dima(10)AsIntegerDimiAsIntegerRandomizeFori＝1To10a(i)＝Int(Rnd*100)＋1Printa(i)NextiEndSub运行以上程序，发现有错误，需要对产生随机数的语句进行修改。以下正确的修改是()。A、a(i)＝Int(Rnd*100)B、a(i)＝Int(Rnd*90)＋10C、a(i)＝Int(Rnd*100)＋10D、a(i)＝Int(Rnd*101)标准答案：B知识点解析：由Rnd函数生成的随机数在0～1之间，包括0但不包括1，所以有可能产生0，与题目要求的两位的整数不符。所以语句a(i)＝Int(Rnd*100)＋1需要修改为a(i)＝Int(Rnd*90)＋10，这样就能正确产生两位的整数了。15、计算z的值，当x大于等于y时，z=x；否则z=y。下列语句中错误的是()。A、Ifx>=ythenz=x：z=yB、Ifx>=yThenz=xElsez=yC、z=y：Ifx>=yThenz=xD、Ifx标准答案：A知识点解析：根据题意，使用If-Then—Else结构，正确的表达方式为：Ifx>=yThenz=xElsez=y，故A选项表达错误，B、C、D均是上述表达的等价形式。16、在窗体上画一个通用对话框，其名称为CommonDialogl，则下列与CommonDialogl．ShowOpen方法等效的语句是()。A、CommonDialogl．Action=lB、CommonDialogl．Action=2C、CommonDialogl．Action=3D、CommonDialogl．Action=4标准答案：A知识点解析：通用对话框的属性Action=1与ShowOpen方法等效，而Action=2则与ShowSave等效。17、在关系模型中，每一个二维表称为一个A、关系B、属性C、元组D、主码（键）标准答案：A知识点解析：关系模型采用二维表来表示，即每个二维表称为一个关系。18、形状控件能够显示为6种图形，不能显示的图形是()。A、正方形B、三角形C、椭圆D、矩形标准答案：B知识点解析：形状控件的Shape属性用来确定所画形状的几何特性。它可以被设置为6种值，如下表所示，分别画出不同的几何形状。故本题B选项三角形无法显示。本题选择B选项。19、长整型常数的类型说明符为A、%B、#C、&D、@标准答案：C知识点解析：%：整型，#：双精度实型，&：长整型，@：货币型。20、下列选项中不属于软件生命周期开发阶段任务的是()。A、软件测试B、概要设计C、软件维护D、详细设计标准答案：C知识点解析：软件生命周期分为软件定义、软件开发及软件运行维护三个阶段，其中开发阶段包括概要设计、详细设计、实现和测试。21、当执行循环的时间较长时，为了避免被误认为是死机，通常应在循环体中放置一个语句，这个语句是A、ExitDoB、ExitSubC、ExitForD、DoEvents标准答案：D知识点解析：ExitDo语句是指从Do循环中退出，A错误；ExitSub语句是指从过程中退出，B错误。ExitFor语句是指从For循环中退出，C项错误。在执行闲置循环中将占用全部CPU时间，不允许执行其他事件过程，使系统处于无限循环中没有反应，DoEvents可以把控制权交给周围环境使用，然后回到原来程序继续执行，故D项正确。22、窗体上有1个名称为Label1的标签；1个名称为List1，且含有若干表项的列表框。为了使得单击List1中某个表项时，在Label1中相应地显示该表项，应使用的程序代码为A、PrivateSubList1_Click()Label1.Caption=List1.IndexEndSubB、PrivateSubList1_Click()Label1.Caption=List1.ListCountEndSubC、PrivateSubList1_Click()Label1.Caption=List1.TextEndSubD、PrivateSubList1_Click()Label1.Caption=List1.SelectedEndSub标准答案：C知识点解析：单击List1中某个表项时触发List1_Click()事件。标签的Caption属性用于设置标签中所要显示的内容。列表框的text属性为List1中表项的正文，通过这个属性可以得到被选中的项目。因此选C。23、表达式Str(Len(”123”))+Str(77．71)的值是()。A、3+77．7B、377．7C、80．7D、12377．7标准答案：B知识点解析：本题考查字符串处理函数。Str的功能是把数字转化为字符，Len函数的功能是求字符串中字符的个数。题中“+”为字符串连接运算符。24、下面关于控件数组的叙述中正确的是A、控件数组共用同一个Click事件过程，因此在过程中无法区分单击了哪个控件B、控件数组共用同一个Click事件过程，但在过程中可以区分单击了哪个控件C、控件数组中不同控件使用不同的Click事件过程D、控件数组中的控件具有相同的名称，TabIndex属性的值代表了它们下标标准答案：B知识点解析：控件数组中任意一个控件的事件都将触发整个控件数组的事件，不再作为单独控件的事件处理。也就是说，如果建立了一组单选按钮的控件数组，那么无论单击哪个单选按钮，都将触发整个控件数组的Click事件。为了区分是控件数组中哪个控件产生的事件，VisualBasic将产生事件控件的索引号传递给控件数组的事件过程。而一组单选按钮构成的控件数组的Click事件过程增加了一个Index参数：通过Index参数来判断是哪一个单选按钮触发的Click事件。建立控件数组之后，无论单击哪一个单选按钮，都将触发这个Click事件过程，故C选项错误。控件数组共用同一个Click事件过程，但在过程中可以通过Index参数，区分单击了哪个控件，故选项A错误，B正确。些控件共用一个相同的控件名（即控件数组中所有控件的Name属性相同），控件数组中的每个控件元素都有一个唯一的索引号（Index属性）加以区分。故D项错误。25、下面关于直线控件的叙述中正确的是A、改变X1、Y1、X2、Y2属性的值，可以改变直线显示的长短和方向B、X1、Y1属性的值表示直线左端点的坐标C、如果属性X1的值等于属性X2的值，则说明直线是水平显示的D、上述都是正确的标准答案：A知识点解析：X1，Y1表示直线的起点坐标，选项B错误；X1和X2的值相等，表示直线是垂直显示的，选项C错误。故正确答案为选项A。26、在软件开发中，需求分析阶段可以使用的工具是()。A、N－S图B、DFD图C、PAD图D、程序流程图标准答案：B知识点解析：在需求分析阶段可以使用的工具有数据流图DFD图，数据字典DD，判定树与判定表，所以选择B。27、假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片(注意，清除图片，而不是删除图片框)，应采用的正确方法是()。A、单击图片框，然后按Del键B、执行语句Picture1.Picture＝LoadPicture("")C、执行语句Picture1.Picture＝""D、执行语句：Picture1.Cls标准答案：B知识点解析：A选项按Del键不能删除图片；C选项中Pictue属性值不能为空字符串，语法错误；D选项中Cls方法只能清除图片上显示的内容，不能清除图片。要将图片框中的图片清除，用B选项方法可以。故B选项正确。28、在关系数据库中，用来表示实体间联系的是A、属性B、二维表C、网状结构D、树状结构标准答案：B知识点解析：关系模型实体间的联系采用二维表来表示，简称表。选项C为网状模型实体间的联系，选项D为层次模型实体间的联系，选项A属性刻画了实体29、在窗体上画一个名称为Command1的命令按钮，并编写如下程序：OptionBase1PrivateSubCommand1_Click()Dima(4，4)Fori＝1To4Forj＝1To4a(i，j)＝(i－1)*3＋jNextjNextiFori＝3To4Forj＝3To4Printa(j，i)；NextjPrintNextiEndSub运行程序，单击命令按钮，则输出结果为()。A、69710B、710811C、811912D、9121013标准答案：D知识点解析：程序中数组元素赋值如下：第1行，a(1,1)＝1，a(1,2)＝2，a(1,3)＝3，a(1,4)＝4；第2行，a(2,1)＝4，a(2,2)＝5，a(2,3)＝6，a(2,4)＝7；第3行，a(3,1)＝7，a(3,2)＝8，a(3,3)＝9，a(3,4)＝10；第4行，a(4,1)＝10，a(4,2)＝11，a(4,3)＝12，a(4,4)＝13；要输出的元素为：a(3,3)、a(4,3)、a(3,4)、a(4,4)，即为9、12、10、13。因此答案为D。30、编写如下程序：PrivateSubCommand1_Click()Dima(3，3)AsIntegerDimsAsIntegerFori＝1To3Forj＝1To3a(i，j)＝i*j＋iNextjNextis＝0Fori＝1To3s＝s＋a(i，4－i)NextiPrintsEndSub程序运行后，单击命令按钮Command1，输出结果为()。A、7B、13C、16D、20标准答案：C知识点解析：程序通过For循环为数组a赋值，具体值如下：a(1,1)＝1＋1＝2，a(1,2)＝2＋1＝3，a(1,3)＝3＋1＝4；a(2,1)＝2＋2＝4，a(2,2)＝4＋2＝6，a(2,3)＝6＋2＝8；a(3,1)＝3＋3＝6，a(3,2)＝6＋3＝9，a(3,3)＝9＋3＝12；程序要计算指定数组元素的和，这几个元素是a(1,3)，a(2,2)，a(3,1)，所以s＝4＋6＋6＝16。31、在关系模型中，每一个二维表称为一个A、关系B、属性C、元组D、主码（键）标准答案：A知识点解析：关系模型采用二维表来表示，即每个二维表称为一个关系。32、在窗体上画一个名称为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知识点解析：程序中输入100，则调用过程为Fun(100)，过程Fun中判断参数是否小于10，小于10则将此值赋给y，如果不小于10，则变量y值加10，由于100不小于10，所以y值加10，等于10，并将此值做为函数值返回。因此输出结果为10。33、假定有如下的程序段：DimintVarAsIntegerintvar=TruePrintintVar则输出结果是A、0B、-1C、TrueD、False标准答案：B知识点解析：VB里面True=-1,False=0。34、编写如下程序：PrivateSubCommand1_Click()Fori=1To4PrintSpace(12-3*i);Forj=1ToiPrintj;NextjFork=i-1To1Step-1Printk;NextkPrintNextiEndSub程序运行后，单击命令按钮Command1，输出结果为A、1121123211234321B、1121123211234321C、1121123211234321D、1234321123211211标准答案：C知识点解析：PrintSpace(12-3*i)语句为打印空格符。根据变量i的值变化，打印的个数不同。For循环的执行根据变量值进行相应的打印。选C）。35、设窗体上有一个名称为Timer1的计时器控件，其Interval属性被设置为500，Enabled属性被设置为True；还有一个名称为Text1的文本框和下面的事件过程：PrivateSubTimer1_Timer()StaticxAsLongx=x+1Text1=xEndSub程序运行一段时间后，文本框中显示的是100，则表示A、程序已经运行了100秒B、程序已经运行了100毫秒C、程序已经运行了50秒D、文本框到窗体左边框的距离是100标准答案：C知识点解析：过程Timer1_Timer()按计时器的Interval属性值定时运行。该属性用来设置计时器事件之间的间隔，以毫秒为单位，取值范围为0～65535，因此其最大时间间隔不能超过65秒。文本框中显示值是100时，表示Timer1_Timer()运行了100次，则运行时间是100*500毫秒=50秒。所以本题答案为C）。36、窗体上有一个名称为Command1的命令按钮，事件过程如下：PrivateSubCommand1_Click()Dimarr_x(5，5)AsIntegerFori＝1To3Forj＝2To4arr_x(i，j)＝i*jNextjNextiPrintarr_x(2，1)；arr_x(3，2)；arr_x(4，3)EndSub运行程序，并单击命令按钮，窗体上显示的内容为()。A、060B、260C、0612D、2612标准答案：A知识点解析：程序定义了一个二维数组，然后利用For循环对其中部分元素赋值，没有得到赋值的元素值为0。赋值元素的第1维范围是1～3，第2维范围是2～4。因此在输出语句中，arr_x(2,1)第2维不在赋值范围所以此元素值＝0，arr_x(3,2)两维都在赋值范围内所以此元素值为3]。37、窗体上有名称为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）。38、下面有关标准模块的叙述中，错误的是()。A、标准模块不完全由代码组成，还可以有窗体B、标准模块中的Private过程不能被工程中的其他模块调用C、标准模块的文件扩展名为．basD、标准模块中的全局变量可以被工程中的任何模块引用标准答案：A知识点解析：标准模块中只包含其他窗体模块中公用的一些变量、过程等代码，不包括窗体。故选项A错误。标准模块中用Private声明的过程属于私有过程，只能被它所在的模块中的其他过程调用，不能被工程中其他模块调用，用Public声明的全局变量属于公用变量，可以被工程中的任何模块引用。标准模块的文件扩展名是．bas。39、窗体上有1个名称为Commandl的命令按钮，在设计模式下，双击Commandl，将打开()。A、属性窗口B、代码窗口C、工程资源管理器窗口D、工具箱窗口标准答案：B知识点解析：在设计模式下，双击按钮控件，将进入代码设计窗口，故B选项正确。本题选择B选项。40、执行下面程序段的输出是()。Print1，2；Print3Print4；5A、12345B、12345C、12345D、12345标准答案：A知识点解析：使用Print输出表达式时，如果输出的各表达式之间用逗号分隔，则按标准输出格式(分区输出格式)显示数据项，在这种情况下，以14个字符为单位把一个输出行分为若干个区段，逗号后面的表达式在下一区段输出。如果每个输出项之间用分号或空格作分隔符，则按紧凑输出格式输出数据；在一般情况下，每执行一次Print方法都会自动换行，也就是说，后面执行Print时将在新的一行上显示信息。为了仍在同一行上显示，可以在末尾加上一个分号或逗号，故本题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，相应的窗体文件为sjt3．frm。其功能是随机产生30个0～1000的整数，将其放入一个数组中，然后输出其中的最大值。程序运行后，单击命令按钮(名称为Command1，标题为“输出最大值”，如图所示)，即可求出其最大值，并显示在窗体上。这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sjt4．vbp，相应的窗体文件为sjt4．frm，在窗体上有一个文本框和一个命令按钮。程序运行后，单击命令按钮，即可计算出1一1000范围内能被7整除或被5整除的整数的个数，并显示在文本框中。在窗体的代码窗口中，已给出了部分程序，其中计算能被7整除或能被5整除的整数的个数的操作在通用过程Fun中实现，请编写该过程的代码。要求：请勿改动程序中的任何内容，只在FunctionFun()和EndFunction之间填入编写的若干语句。最后将修改后的文件按原文件名存盘。标准答案：(1)【操作步骤】步骤1：打开本题工程文件。步骤2：分析并编写程序代码。程序提供代码OptionBase1PrivateSubCommand1_Click()DimarrN(30)AsIntegerDimMaxAsIntegerRandomizeFori=1To30’arrN(i)=Int(Rnd*？)Nexti’?=arrN(1)Fori=2To30’If?ThenMax=arrN(i)EndIfNextiPrintMaxEndSub程序结束参考答案第1个？处填入：1000第2个？处填入：Max第3个？处填入：arrN(i)>Max或Max<arrN(i)步骤3：调试并运行程序，关闭程序后按题目要求存盘。(2)【操作步骤】步骤1：打开本题工程文件。步骤2：分析并编写程序代码。参考答案FunctionFun()DimsAsInteger,iAsIntegerFori=1To1000IfiMod5=0OriMod7=0Thens=s+1EndIfNextiFun=sEndFunction步骤3：调试并运行程序，关闭程序后按题目要求存盘。知识点解析：暂无解析四、综合应用题(本题共1题，每题1.0分，共1分。)44、在考生文件夹下有一个工程文件sjt5．vbp，相应的窗体文件为sjt5．frm，此外还有一个名为datain．txt的文本文件，其内容如下：32437658281298573142536475869713243546576879805937程序运行后，单击窗体，将把文件datain．txt中的数据输入到二维数组。Mat中，按5行、5列的矩阵形式在窗体上显示出来，并输出矩阵右上一左下对角线上的数据，如图所示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。标准答案：本题须先定义一个数组，然后以输入方式打开文件in5．txt，并在一个嵌套的For循环中用Input#读入数据并赋值给每个数组元素。然后再通过一个嵌套的For循环将数组arr中的数据在窗体上按5行、5列的矩阵形式显示出来，最后将数组arr中第l维下标与第2维下标之和为6的数组元素显示在窗体上。步骤1：打开本题工程文件。步骤2：分析并编写程序代码。程序提供代码OptionBase1PrivateSubForm＿Click()ConstN=5ConstM=5Dim?Dimi，jOpenApp．Path&“＼”&“datain．txt”?As#lFori=lToNForj=lToM?NextjNextjClose#lPrintPrint“初始矩阵为：”PrintFori：IToNForj=lToMPrintTab(5*j)；Mat(i，j)；NextjPrintNextiPrint：PrintPrint“右上-左下对角线上的数为：”FOri=1ToNForj=1ToM’IfThenPrintTab(5*i)；Mat(i，j)；EndIfNextjNextiEndSub程序结束第1个?处填入：Mat(N，M)AsInteger第2个?处填入：ForInput第3个?处填入：Input#l，Mat(i，j)第4个?处填入：i+j=6步骤3：调试并运行程序，关闭程序后按题目要求存盘。知识点解析：暂无解析国家二级（VB）机试模拟试卷第2套一、选择题(本题共40题，每题1.0分，共40分。)1、在设计窗体时双击窗体的任何地方，可以打开的窗口是()。A、代码窗口B、属性窗口C、工程资源管理器窗口D、工具箱窗口标准答案：A知识点解析：设计窗体时双击窗体的任何地方，默认打开的是代码窗口。故选A。2、命令按钮Command1的单击事件过程如下：PrivateSubCommand1_Click()Dima(10，10)AsIntegerx＝0Fori＝1To3Forj＝1To3a(i，j)＝i*2ModjIfxA、1B、2C、3D、4标准答案：B知识点解析：暂无解析3、窗体上有名称为Command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1(Simple)，并有如下事件过程：PrivateSubCommandl_Click()Fori=0ToListl．ListCoum一1IfListl．Selected(i)=TrueThenList2．AddIternTextEndIfNextEndSub上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是()。A、将For循环的终值改为Listl．ListCountB、将List1．Selected(i)=True改为List1．List(i)．Selected=TrueC、将List2．AddItemText改为List2．AddItemList1．List(i)D、将List2．AddItemText改为List2．AddItemList1．ListIndex标准答案：C知识点解析：题目程序不能将List1中的选中项添加到List7．中，List2．AddItemText一行有误，应该改为List2．AddItemListl．List(i)才能使List1中每个选中的行添加到List2中。列表框控件的List属性保存了列表框中所有值的数组，可以通过下标访问数组中的值。4、数据结构主要研究的是数据的逻辑结构、数据的运算和()。A、数据的方法B、数据的存储结构C、数据的对象D、数据的逻辑存储标准答案：B知识点解析：数据结构是研究数据元素及其之间的相互关系和数据运算的一门学科，它包含3个方面的内容，即数据的逻辑结构、存储结构和数据的运算。5、在数据库系统的内部结构体系中，索引属于()。A、模式B、内模式C、外模式D、概念模式标准答案：B知识点解析：内模式又称物理模式，它给出了数据库物理存储结构与物理存取方法，如数据存储的文件结构、索引、集簇及hash等存取方式与存取路径，内模式的物理性主要体现在操作系统及文件级上，它还未深入到设备级上(如磁盘及磁盘操作)。6、下列关于线性链表的描述中，正确的是()。Ⅰ、只含有一个指针域来存放下一个元素地址Ⅱ、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或后件)Ⅲ、结点由两部分维成：数据域和指针域。A、仪Ⅰ、ⅡB、仪Ⅰ、ⅢC、仅Ⅱ、ⅢD、全部标准答案：D知识点解析：在定义的链表中，若只含有一个指针域来存放下一个元素地址，称这样的链表为单链表或线性链表。在链式存储方式中，要求每个结点由两部分组成：一部分用于存放数据元素值，称为数据域；另一部分用于存放指针，称为指针域。其中指针用于指向该结点的前一个或后一个结点(即前件或后件)。7、假定有以下循环结构：DoUntil条件表达式循环体Loop则以下正确的描述是()。A、如果“条件表达式”的值是0，则一次循环体也不执行B、如果“条件表达式”的值不为0，则至少执行一次循环体C、不论“条件表达式”的值是否为“真”，至少要执行一次循环体D、如果“条件表达式”的值恒为0，则无限次执行循环体标准答案：D知识点解析：本题的DoUntil…Loop循环结构是先判断，再执行的结构。DoUntil循环语句执行的过程是，先判断条件表达式的值，如果条件表达式的值为0或False时,即条件不成立时，则执行循环体，否则当条件表达式的值为非0或True时，即成立，则退出DO…Loop循环。本题中，选项A条件表达式的值是0，说明条件不成立，执行循环体。故A错误。选项B条件表达式的值不为0，说明条件成立，退出循环。故B错误。选项C中DoUntil…Loop语句中条件表达式的值为“假”时，才至少执行一次循环体，故C错误。选项D中条件表达式的值恒为0，说明表达式总是不成立，所以可以无限执行循环体，故D选项正确。8、某人编写了如下程序，用来求10个整数(整数从键盘输入)中的最大值：PrivateSubCommand1_Click()Dima(10)AsInteger，maxAsIntegerFork＝1To10a(k)＝InputBox("输入一个整数")Nextkmax＝0Fork＝1To10Ifa(k)>maxThenmax＝a(k)EndIfNextkPrintmaxEndSub运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的，程序需要修改。下面的修改中可以得到正确运行结果的是()。A、把Ifa(k)>maxThen改为Ifa(k)B、把max＝a(k)改为a(k)＝maxC、把第2个循环语句Fork＝1To10改为Fork＝2To10D、把max＝0改为max＝a(10)标准答案：D知识点解析：程序中把变量max的初始值设置为0，没有考虑到负数的情况。应该把它的初始值设置为数组中的一个元素的值，然后让数组中的各个元素与这个值比较，如果比它大，就替换变量max的值，这样才能得到数组中的最大值。因此要修改max＝0这一行。9、在数据库管理技术的发展中，数据独立性最高的是()。A、人工管理B、文件系统C、数据库系统D、数据模型标准答案：C知识点解析：在人工管理阶段，数据无法共享，冗余度大，不独立，完全依赖程序；在文件系统阶段，数据共享性差；在数据库系统阶段，共享性好，独立性高。10、假设用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数组的说法错误的是()。A、命令按钮的所有Caption属性都是CommandlB、在代码中访问任意一个命令按钮只需使用名称Command1C、命令按钮的大小都相同D、命令按钮共享相同的事件过程标准答案：B知识点解析：本题考查控件数组。在命令按钮数组Commandl中，Commandl为控件数组中所有元素的名字，因此访问数组中某个元素时，必须说明其Index属性。控件数组中所有元素的大小相同，共用相同的事件过程，通过Index属性值的不同来区分具体由哪个按钮进行处理。11、下列打开“代码窗口”的操作中错误的是()。A、按F4键B、单击“工程资源管理器”窗口中的“查看代码”按钮C、双击已建立好的控件D、执行“视图”菜单中的“代码窗口”命令标准答案：A知识点解析：按F4键打开的是“属性窗口”，故A选项错误。12、下列关于栈和队列的描述中，正确的是()。A、栈是先进先出B、队列是先进后出C、队列允许在队头删除元素D、栈在栈顶删除元素标准答案：D知识点解析：栈实际也是线性表，只不过是一种特殊的线性表。栈是只能在表的一端进行插入和删除运算的线性表，通常称插入、删除的这一端为栈顶，另一端为栈底。队列是只允许在一端删除，在另一端插入的顺序表，允许删除的一端称作队头，允许插入的一端称作队尾。13、结构化程序所要求的基本结构不包括()。A、顺序结构B、GOTO跳转C、选择(分支)结构D、重复(循环)结构标准答案：B知识点解析：1966年Boehm和Jacopini证明了程序设计语言仅仅使月j顺序、选择和重复三种节本控制结构就足以表达出各种其他形式结构的程序设计方法。14、以下叙述中错误的是()。A、续行符与它前面的字符之间至少要有一个空格B、VisualBasic中使用的续行符为下划线(_)C、以撇号(′)开头的注释语句可以放在续行符的后面D、VisualBasic可以自动对输入的内容进行语法检查标准答案：C知识点解析：续行符"_"与前面的内容至少要保留一个空格，并且续行符只能出现在行尾，后面不能有注释。故选项C错误。15、以下不能触发滚动条Change事件的操作是()。A、拖动滚动框B、单击两端的滚动箭头C、单击滚动框D、单击滚动箭头与滚动框之间的滚动条标准答案：C知识点解析：改变滚动框的位置后会触发Change事件，拖动滚动框、单击滚动箭头、单击滚动箭头与滚动框之间的滚动条都会改变滚动框的位置。16、要计算x的平方根并放入变量y，正确的语句是()。A、y＝Exp(x)B、y＝Sgn(x)C、y＝Int(x)D、y＝Sqr(x)标准答案：D知识点解析：Exp函数是e为底的指数函数，即ex；Sgn是符号函数，正数返回1，负数返回－1,0返回0；Int是取整函数，取<＝N的最大整数；Sqr是求平方根函数。故D选项正确。17、窗体上有1个名称为Commandl的命令按钮，事件过程如下：PrivateSubCommandl＿Click()m=-3．6IfSgn(m)Thenn=Int(113)Elsen=Abs(m)EndIfPrintnEndSub运行程序，并单击命令按钮，窗体上显示的内容为()。A、-4B、-3C、3D、3.6标准答案：A知识点解析：Sgn函数返回参数的符号，参数为负数时返回-l，为0时，返回0，为正数时返回l。所以Sgn(-3．6)返回-l。VisualBasic中把任何非0值都认为是真，以0表示假，因此if语句中将执行n=Int(m)语句。Int函数返回不大于参数的最大整数，Int(-3．6)要返回小于-3．6的整数即是-4，因此n=-4。18、窗体上有一个名称为Commandl的命令按钮，一个名称为Textl的文本框。编写如下程序：PrivateSubCommandl＿Click()DimXAsIntegerx=Val(InputBox(“输入数据”))Textl=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选项的说法不正确。19、下面关于菜单的叙述中正确的是A、为了使得选中一个菜单项就可以执行某种操作，要为它的Click事件过程编写执行该操作的代码B、同一级菜单中的菜单项不能同名，但不同级菜单中的菜单项可以同名C、只能使用鼠标右键把弹出式菜单弹出来D、弹出式菜单中的菜单项不能再有自己的子菜单标准答案：A知识点解析：Click事件在鼠标单击时触发，要使得选中菜单项就执行某种操作，可以在Click事件过程中编写需要执行的操作代码。A）正确。VB中的菜单项不管是同级还是不同级都不允许同名，B）错误。一般情况下，不显示弹出式菜单。需要时用PopupMenu方法显示弹出式菜单。C）错误。VB中允许有多级弹出式菜单，D）错误。20、对于含有多个窗体的工程而言，以下叙述中正确的是A、没有指定启动窗体时，系统自动将最后一个添加的窗体设置为启动窗体B、启动窗体可以通过"工程属性"对话框指定C、Load方法兼有装入和显示窗体两种功能D、Hide方法可以将指定的窗体从内存中清除标准答案：B知识点解析：没有指定启动窗体时，系统自动将第一个窗体默认为启动窗体，所以选项A)错误；要想使包含多个窗体的工程中的某个窗体在程序运行时首先显示，则方法就是在"工程属性"对话框中将"启动对象"设置为某个窗体，所以选项B)正确；Load方法有装入窗体功能，所以选项C)错误；Hide方法用于使指定的窗体不显示,但不从内存中删除窗体，，所以选项D)错误。21、编写如下程序：PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=1y=1Doy=x*yIfy>10ThenExitDoElsex=x+3EndIfLoopUntilx<=10Printx;yEndSub程序运行后，单击命令按钮Command1，输出结果为A、11B、41C、42D、728标准答案：B知识点解析：Do…LoopUntil循环当条件为真时循环执行循环体。代入初值进行计算可得结果。选B）。22、下列关于水平滚动条的叙述中，错误的是A、Value属性值表示单击滚动条两端的箭头时，滚动框向左或向右移动的增量B、Scroll事件在鼠标拖动滚动框时产生C、用鼠标拖动滚动框后，会触发Change事件D、单击滚动条两端箭头时，会触发Change事件标准答案：A知识点解析：当滚动框移动时，触发Change事件。Value属性是滚动条的当前位置值，其返回值始终介于Max和Min属性值之间，包括这两个值。选A。23、数据库技术的根本目标是()。A、数据存储B、数据共享C、数据查询D、数据管理标准答案：B知识点解析：数据库是长期储存在计算机内、有组织的、可共享的大量数据的集合，它具有统一的结构形式并存放于统一的存储介质内，是多种应用数据的集成，并可被各个应用程序所共享，所以数据库技术的根本目标是解决数据共享问题。24、下列程序段的执行结果为()。a=6Fork=1To0a=a+kNextkPrintk=aA、－16B、－116C、16D、1121标准答案：C知识点解析：本题考查循环的分析。For型循环默认的循环变量的步长为1，由于循环变量的初值大于终值，因此循环体一次也不执行。25、在窗体上画两个名称分别为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属性值显示在标签上，需要进行类型转换(将数值型数据转换成字符串型数据)。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、与数学式子对应的VisualBasic表达式是A、Sqr((a+b)/a*b)B、Sqr((a+b)/a*b)C、((a+b)/(a*b))^1/2D、((a+b)/a*b)^(1/2)标准答案：A知识点解析：算术运算符优先级从高到低依次是乘方，取负，乘法和除法运算符，整除运算符，加法和减法运算符；数学函数的平方根（Square）函数是sqr（x），返回值为自变量x的平方根。从表达式上看首先a、b之和除以a、b的乘积，最后求其平方根。故首先将（a+b），然后是（a*b），接着是求商，即（a+b）/(a*b),最后求平方根，因为平方根的优先级比乘除法高，故应为Sqr((a+b)/a*b)，故B选项正确。A项中表达式与数学式不大对应，A项是先求a、b之和，接着除以a，再接着乘以b，这和题目意思不对应，故A项错误。平方根函数是sqr（x），故C项和D项错误。28、如果在过程A中用语句：Callproc(a,b)调用下面的过程PrivateSubproc(bAsInteger,ByValaAsInteger)a=a+1b=b*2EndSub则调用结束后的结果是A、过程A中变量b的值变为原有值的2倍B、过程A中变量a的值变为原有值的2倍C、过程A中变量a的值变为原有值的2倍，b的值等于原有值加1D、过程A中变量b的值变为原有值的2倍，a的值等于原有值加1标准答案：B知识点解析：用Call语句调用Sub过程。如果形参前面有关键字ByVal，则该参数以传值方式传送。调用结束后，变量a的值变为原有值的2倍，变量b的值不变。故本题正确答案为B。29、编写如下程序：PrivateSubCommand1_Click()Dimstr1AsString，str2AsStringstr1＝InputBox("输入一个字符串")subfstr1，str2Printstr2EndSubSubsubf(s1AsString，s2AsString)DimtempAsStringStaticiAsIntegeri＝i＋1temp＝Mid(s1，i，1)Iftemp<>""Thensubfs1，s2s2＝s2&tempEndSub程序运行后，单击命令按钮Command1，且输入"abcdef"，则输出结果为()。A、afbecdB、cdbeafC、fedcbaD、adbecf标准答案：C知识点解析：程序中过程subf的两个参数都默认按址传递，其内部定义的变量i为Static即静态变量，在过程调用时它会保留上次的值。这个过程的功能是通过递归调用自己依次取出参数1中即s1中的字符连接在s2的尾部，即使s1的字符串倒序后存入s2中。程序中输入了abcdef，则输出结果为fecdba。30、下列叙述中正确的是A、所谓算法就是计算方法B、程序可以作为算法的一种描述方法C、算法设计只需考虑得到计算结果D、算法设计可以忽略算法的运算时间标准答案：B知识点解析：算法是指对解题方案的准确而完整的描述，算法不等于数学上的计算方法，也不等于程序,A选项错误。算法设计需要考虑可行性、确定性、有穷性与足够的情报，不能只考虑计算结果，C选项错误。算法设计有穷性是指操作步骤有限且能在有限时间内完成，如果一个算法执行耗费的时间太长，即使最终得出了正确结果，也是没有意义的，D选项错误。算法在实现时需要用具体的程序设计语言描述，所以程序可以作为算法的一种描述方法，B选项正确。31、在窗体上画一个名称为Text1的文本框，再建立一个名称为Option1的控件数组（含3个单选按钮，标题分别为宋体、黑体、仿宋，下标从０开始），并编写如下程序代码：PrivateSubOption1_Click(IndexAsInteger)DimftAsStringSelectCase_________________Case0ft="宋体"Case1ft="黑体"Case2ft="仿宋"EndSelectText1.FontName=ftEndSub程序运行后，单击某个单选按钮，可将文本框的文本字体设置为相应的字体，则在横线处应填入的内容是A、ftB、Option1.TextC、TextD、Index标准答案：D知识点解析：控件数组是指由一组相同类型的控件组成。数组中的每一个控件都有唯一的索引号（Index）。由题意知，是根据Index来判定字符串变量ft所显示的内容。故本题正确答案为D选项。32、下列叙述中正确的是A、不同的对象可以具有相同名称的方法B、’abcd’是一个合法的字符串常量C、语句Dima(1To6,-2To4)AsInteger定义数组时出错D、向随机文件中写数据时，既可用Write#语句也可用Put#语句标准答案：A知识点解析：字符串常量由字符组成，可以是双引号和回车符以外的任何ASCII字符，选项B中应该用一对双引号括起来。选项C所定义的数组正确，Write#语句的功能是向顺序文件写入记录，Put#语句的功能是把"变量"的内容写入由"文件"号所指定的磁盘文件中，故本题正确选项为A。33、面向对象方法中，继承是指()。A、一组对象所具有的相似性质B、一个对象具有另一个对象的性质C、各对象之间的共同性质D、类之间共享属性和操作的机制标准答案：D知识点解析：继承是面向对象的方法的一个主要特征，是使用已有的类的定义作为基础建立新类的定义技术。广义的说，继承是指能够直接获得已有的性质和特征，而不必重复定义它们，所以说继承是指类之间共享属性和操作的机制。34、窗体上有1个名称为Command1的命令按钮，事件过程及函数过程如下：PrivateSubCommand1_Click()DimpAsIntegerp＝m(1)＋m(2)＋m(3)PrintpEndSubPrivateFunctionm(nAsInteger)AsIntegerStaticsAsIntegerFori＝1Tons＝s＋1Nextm＝sEndFunction运行程序，第2次单击命令按钮Command1时的输出结果为()。A、6B、10C、16D、28标准答案：D知识点解析：在过程m中s被定义为静态变量，因此它的值只在第一次调用过程时初始化，以后再调用都不再初始化，而是保留之前的值。m过程的功能是根据参数值累加，因此第1次单击时，m(1)＋m(2)＋m(3)＝1＋3＋6＝10，此时变量s的值，即过程m的值为6，第2次单击时，m(1)＋m(2)＋m(3)＝7＋9＋12＝28。因此答案为D。35、若要使文本框能够输入多行文本，应该设置的属性是()。A、MultiLineB、WordWrapC、ScrollBarsD、AutoSize标准答案：A知识点解析：文本框控件的MultiLine属性如果设置为False，则在文本框中只能输入单行文本；当设置为True时，可以使用多行文本，即在文本框中输入或输出文本时可以换行，并在下一行接着输入或输出。36、窗体上有一个名称为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选项的说法不正确。37、为了删除列表框中的一个列表项，应使用的列表框方法是A、MoveB、RemoveC、ClearD、RemoveItem标准答案：D知识点解析：RemoveItem方法用来删除列表中指定的项目，格式为：列表框.RemoveItem索引值。38、软件设计中模块划分应遵循的准则是A、低内聚低耦合B、高耦合高内聚C、高内聚低耦合D、以上说法均错