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

国家二级（VB）机试模拟试卷17（共9套）（共396题）国家二级（VB）机试模拟试卷第1套一、选择题(本题共40题，每题1.0分，共40分。)1、设有关键码序列(66，13，51，76，81，26，57，69，23)，要按关键码值递增的次序排序，若采用快速排序法，并以第一个元素为划分的基准，那么第一趟划分后的结果为()。A、23，13，51，57，66，26，81，69，76B、13，23，26，51，57，66，81，76，69C、23，13，51，57，26，66，81，69，76D、23，13．51，57，81，26，66，69，76标准答案：A知识点解析：快速排序是起泡捧序的改进。在快速排序中，任取一个记录，以它为基准用交换的方法将所有的记录分成两部分，关键码值比它小的在一部分，关键码值比它大的在另一部分，再分别对两个部分实施上述过程，一直重复到排序完成。2、下列描述正确的是()。A、软件测试是指动态测试B、软件测试可以随机地选取测试数据C、软件测试是保证软件质量的重要手段D、软件测试的目的是发现和改正错误标准答案：C知识点解析：软件测试有多种方法，根据软件是否需要被执行，可以分为静态测试和动态测试，A选项叙述错误。软件测试应在测试之前制定测试计划，并严格执行，排除测试随意性，并且需要设计正确的测试用例，B选项叙述错误。软件测试就是在软件投入运行之前，尽可能多地发现软件中的错误，改正错误是调试的过程，D选项叙述错误。软件测试是保证软件质量的重要手段，C选项正确。3、在新建一个VB工程时，将新建窗体的Name属性设置为TheFirst，则默认的窗体文件名为()。A、Forml．frmB、工程1．frmC、TheFirst．frmD、Forml．vbp标准答案：C知识点解析：本题考查窗体的命名。窗体文件的扩展名是tim，新建工程时默认的工程名为“工程1．vbp”，默认的窗体名为窗体的Name属性，这里为“TheFist．frm”。4、下列合法的VisualBasic变量名是()。A、3AB、A+3C、A3D、Abs标准答案：C知识点解析：变量是一个名字，给变量命名时应遵循以下规则。①名字的第一个字符必须是英文字母，最后一个字符可以是类型说明符；故A选项错误。②名字只能由字母、数字和下画线组成；选项中B选项含有非法字符“+”，故B选项错误。③名字的有效字符为255个。④不能用VisualBasic的保留字作为变量，但可以把保留字嵌入变量名中。Abs是系统的函数名(求绝对值函数Abs())为保留字，不能作为变量名。故D选项错误。所以C选项正确。5、窗体上有一个名称为Option1的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程：PrivateSubOption1_Click(IndexAsInteger)…EndSub下面关于此过程的参数Index的叙述中正确的是()。A、Index为1表示单选按钮被选中，为0表示未选中B、Index的值可正可负C、Index的值用来区分哪个单选按钮被选中D、Index表示数组中单选按钮的数量标准答案：C知识点解析：Index参数值返回的是单选按钮数组中各单选按钮的索引值，用它来区分各单选按钮。故A、D选项错误，C选项正确；Index的值只能是非负数，故B选项错误。6、窗体上有一个名称为Text1的文本框，一个名称为CD1的通用对话框，一个标题为"打开文件"的命令按钮，如图所示。命令按钮的单击事件过程如下：PrivateSubCommand1_Click()CD1.ShowOpenOpenCD1.FileNameForInputAs#1MsgBoxCD1.FileNameLineInput#1，sText1.Text＝sClose#1EndSub单击命令按钮，执行以上事件过程，打开选定的文件，读取文件的内容并显示在文本框中.以下叙述中正确的是()。A、程序没有错误，可以正确完成打开文件、读取文件中内容的操作B、执行Open命令时出错，因为没有指定文件的路径C、Open语句是错误的，应把语句中的ForInput改为ForOutputD、LineInput命令格式错标准答案：A知识点解析：第1条语句中用ShowOpen方法显示"打开"对话框后，在对话框中选中文件，单击"打开"按钮后，CD1.FileName属性就会返回打开文件的路径，所以用Open语句打开文件时，就可用CD1.FileName指定打开文件的路径，故B选项说法错误。因为第4条语句中要用LineInput从文件读取数据，故用Open语句打开文件时用Input模式打开是正确的，故C选项说法错误。LineInput命令格式为：LineInput#文件号，变量名，题中LineInput语句格式正确。故D选项错误。本题程序无错误，能实现所说功能，故A选项正确。7、下列各选项中，不属于序言性注释的是()。A、程序标题B、程序设计者C、主要算法D、数据状态标准答案：D知识点解析：注释一般为序言性注释和功能性注释。序言性注释常位于程序开头部分，它包括程序标题、程序功能说明、主要算法、接口说明、程序位置、开发简历、程序设计者、复审者、复审日期及修改日期等。功能性注释一般嵌在源程序体之中，用于描述其后的语句或程序的主要功能。8、以下关于局部变量的叙述中错误的是()。A、在过程中用Dim语句或Static语句声明的变量是局部变量B、局部变量的作用域是它所在的过程C、在过程中用Static语句声明的变量是静态局部变量D、过程执行完毕，该过程中用Dim或Stmic语句声明的变量即被释放标准答案：D知识点解析：局部变量是在过程(事件过程或通用过程)内定义的变量，作用域为该变量所在的过程，定义时使用Dim、Static关键字。使用Dim关键字定义的是动态局部变量，过程执行结束后即被释放：使用Static关键字定义的是静态局部变量，过程执行结束后仍然保留。9、下面是求最大公约数的函数的首部()。Functionfun(ByValxAsInteger，ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数，下面正确的语句是A、Printfun(8，12)，fun(12，16)，fun(16，8)B、Printfun(8，12，16)C、printfun(8，12)，fun(12，16)，fun(16)D、Printfun(8，fun(12，16))标准答案：D知识点解析：函数过程在传递参数时，形参表与实参表中对应变量的名字不必相同，但参数的个数、对应位置和对应类型必须相同。本题中的fun函数有两个参数，任何对于fun的调用都必须传递实参为两个整犁值；选项A)中得到3个结果，显然不是我们所需要的；选项D)中的函数嵌套调用能够求出3个数的最大公约数。10、某人编写了下面的程序：PrivateSubCommand1_Click()DimaAsInteger，bAsIntegera=InputBox("请输入整数")b=InputBox("请输入整数")proaprobCaupro(a+b)EndSubPrivateSubpro(nAsInteger)Wllile(n>0)PrintnMod10；n=n＼10WendPrintEndSub此程序功能是：输入2个正整数，反序输出这2个数的每一位数字，再反序输出这2个数之和的每一位数字。例如：若输入123和234，则应该输出：321432753但调试时发现只输出了前2行(即2个数的反序)，而未输出第3行(即2个数之和的反序)，程序需要修改。下面的修改方案中正确的是()。A、把过程pro的形式参数nAsInteger改为ByValnAsIntegerB、把Callpro(a+b)改为proa+bC、把n=n＼10改为n=n／10D、在prob语句之后增加语句c％=a+b，再把Callpro(a+b)改为proc标准答案：A知识点解析：在过程定义中过程的形式参数定义时如果没有ByVal指明参数的传递方式，那么默认为地址传递，这样过程中对形参的改变将影响到实参的值。本程序中过程定义语句PrivateSubpro(nAsInteger)说明形参n为按地址传递的，而在过程内语句n=n＼10改变了形参的值，因此，a、b的值就不再是最初输入的值了，表达式a+b就不是期望的两个输入数的和。因此得不到正确结果。只要把PrivateSubpm(nAsInteger)改为PrivateSubpro(ByValnAsInteger)，程序即可得到正确结果，因此A选项正确。11、以下说法中正确的是()。A、事件过程也是过程，只能由其他过程调用B、事件过程的过程名是由程序设计者命名的C、事件过程通常放在标准模块中D、事件过程是用来处理由用户操作或系统激发的事件的代码标准答案：D知识点解析：事件过程也是过程，其他过程或系统都可以调用它。故A选项错误。事件过程的过程名是由系统命名的。故B选项错误。通常事件过程放在窗体模块中。故C选项错误。事件过程是用来处理由用户操作或系统激发的事件的代码。只有当用户或系统触发事件后，才执行相应的事件过程。故D选项正确。12、窗体上有1个名为List1的列表框，其中已经输入了若干个项目(如图3所示)；还有2个文本框，名称分别为Text1、Text2，1个名称为Command1的命令按钮，并有以下程序。PrivateSubCommand1Click()DimstrAsString，sAsString，kAsIntegers=Text1：str=""Fork=List1．ListCount-1To0Step-1IfInStr(List1．List(k)，s)>0Thenstr=str&List1．List(k)&""EndIfNextkIfstr=""ThenText2="没有匹配项目"ElseText2=strEndIfEndSub程序运行时，在Text1中输入”京”，单击命令按钮，则在Text2中显示的内容是()。A、京B、北京南京C、南京北京D、没有匹配的项目标准答案：C知识点解析：本题考查循环程序的分析以及列表框属性的应用。函数InStr(List1．List(k)，s)的作用是在List1．List(k)中从头开始寻找s，找不到就返回0，否则返回s在List1．List(k)中的位置。整个循环的功能是，从列表框中最后一个列表项开始寻找含有与Text1中字符串相同的子串，如果存在相同的子串，把List1．List(k)全部连接到str中，并显示在Text2中。13、在窗体上画一个命令按钮(Name属性为Command1)，然后编写如下事件过程：PrivateSubCommand1_Click()Dima(10)AsInterger，p(3)AsIntergerK=5Fori=1To10a(i)=iNextiFori=1To3p(i)=a(i*i)NextiFori=1To3k=k+p(i)*2NextiPrintkEndSub程序运行后，单击命令按钮，输出结果是()。A、35B、28C、33D、37标准答案：C知识点解析：题中第一个循环功能是给数组a赋值，即a(1)=1、a(2)=2…；第二个循环功能是给数组p赋值，即p(1)=1、p(2)=4、p(3)=9；第三个循环是求K的值，即是将K值加上数组P所有元素的值，所以K=K+p(1)*2+p(2)*2+p(3)*2=33。14、有三个关系R，S和T如下：则由关系R和S得到关系T的操作是()。A、自然连接B、交C、投影D、并标准答案：A知识点解析：自然连接是一种特殊的等值连接，它要求两个关系中进行比较的分量必须是相同的属性组，并且在结果中把重复的属性列去掉，所以根据T中元组可以判断R和S做的是自然连接操作。15、窗体上有一个菜单编辑器设计的菜单。运行程序，并在窗体上单击鼠标右键，则弹出一个快捷菜单，如图所示，下列选项错误的是()。A、在设计“粘贴”菜单项时，在菜单编辑器窗口中设置了“有效”属性(有“√”)B、菜单中的横线是在该菜单项的标题输入框中输入了一个“一”(减号)字符C、在设计“选中”菜单项时，在菜单编辑器窗口中设置了“复选”属性(有“√”)D、在设计该弹出菜单的主菜单项时，在菜单编辑器窗口中去掉了“可见”前面的“√”标准答案：A知识点解析：快捷菜单中的“粘贴”菜单项为无效时，在菜单编辑器窗口中“有效”属性应该是不选中状态，没有“√”，故A选项错误。16、窗体上有1个名称为Commandl的命令按钮，事件过程及函数过程如F：PrivateSubCommand1一Click()DimmAsStringm=InputBox(“请输入字符串”)Prinlpick＿str(m)EndSubPrivateFunctionpick＿str(sAsString)AsStringtemp=“”i=lslen=Len(S)DoWhilei<=sLen／2temp=temp+Mid(s，i，l)+Mid(s，sIen－i+I，1)i=i+1Looppick＿str=tempEndFunction运行程序，单击命令按钮，并在输入对话框中输入“basic”，则在窗体上显示的内容为()。A、bcaiB、cbiaC、bcaisD、cbias标准答案：A知识点解析：过程pick＿str的功能魁对输入的字符串的字符重新组合，通过Do循环从原字符串中头尾开始各取一个字符重新组合，循环次数小于等于原字符串长度整除2的值。当输入字符串是“basic”时，字符串长度为5，循环次数为5／2=2次，因此取出的字符依次是“b”，“c”，“a”，“i”。即“bcai”，因此答案为A。17、设a=4，b=5，c=6，执行语句：Printa＜bAndb＜c后，窗体上显示的是()。A、TrueB、FalseC、出错信息D、0标准答案：A知识点解析：Print语句中计算表达式的值，按运算符的优先级顺序，关系运算符“<”比逻辑运算符“And”优先级高。先计算“<”，结果为‘DueAndTrue，再计算“And”，结果为True，故选A。18、使用Open语句可以打开或建立文件，并同时指定文件的输入输出方式。下列输入输出方式中错误的是()。A、RandomB、OutputC、SequentialD、Append标准答案：C知识点解析：使用Open语句可以打开或建立文件，并同时指定文件的输入输出方式，可以是下述操作之一：①Output：指定顺序输出方式。②Input：指定顺序输入方式。③Append：指定顺序输出方式，与Out，put不同的是，当用Append方式打开文件时，文件指针被定位在文件末尾。④Random：指定随机存取方式，也是默认方式。⑤Binary：指定以二进制方式打开文件。故本题C选项不是文件的输入输出方式。本题选择C选项。19、窗体上有两个水平滚动条HV、HT，还有一个文本框Text1和一个标题为“计算”的命令按钮Commandl，并编写了以下程序：PrivateSubCommandl．Click()Callcalc(HV．Value，HT．Value)EndSubPublicSubcalc(xAsInteger，yAsInteger)Text1．Text=x*yEndSub运行程序，单击“计算”按钮，可根据速度与时间计算出距离，并显示计算结果。对以上程序，下列叙述中正确的是()。A、过程调用语句不对，应为calc(HV，HT)B、过程定义语句的形式参数不对，应为Subcalc(xAsControl，yAsContr01)C、计算结果在文本框中显示出来D、程序不能正确运行标准答案：C知识点解析：访问滚动条控件的值，可以直接使用控件的名称，也可以在名称后面指明Value属性。滚动条位置是用数值来表示的，因此定义Cale过程时参数应该定义为Integer类型。程序中，Text，1．Text=x*y语句说明计算的结果在文本框中显示出来。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、以下关于VB对象属性的叙述中，错误的是A、属性是对象的特征B、对象的所有属性值都可以在属性窗口中设置C、不同对象可以具有同名的属性D、对象的某些属性可以在程序中设置标准答案：B知识点解析：对象只有部分属性可以在属性窗口中设置。22、窗体上有一个名称为Command1的命令按钮，并有如下程序代码：OptionBase1PrivateSubCommand1_Click()Dima(4,4)AsIntegerDimbAsIntegerDimiAsInteger,jAsIntegerFori=1To4Forj=1To4a(i,j)=i+jNextjNextiCallf(a,b)PrintbEndSubPrivateSubf(x()AsInteger,ByRefyAsInteger)y=0Fori=1To4y=y+x(i,i)NextEndSub运行程序，单击命令按钮后，窗体上显示的是A、0B、2C、8D、20标准答案：D知识点解析：Command1_Click（）中通过嵌套循环给数组a元素赋初值，执行完后a（1,1）=2，a（2，2）=4，a（3,3）=6，a（4,4）=8；Callf(a,b)语句调用子函数Subf(x()AsInteger,ByRefyAsInteger)。该函数内For循环把a数组中一维下标和二维下标相同的元素值相加。值为20，选D。23、以下关于过程的叙述中，错误的是A、在Sub过程中不能再定义Sub过程B、事件过程也是Sub过程C、过程调用语句的形参个数必须与实参个数相同D、函数过程一定有返回值标准答案：C知识点解析：在调用过程的语句中，要求实参个数与被调用过程形参个数一致。24、下列叙述中正确的是A、程序执行的效率与数据的存储结构密切相关B、程序执行的效率只取决于程序的控制结构C、程序执行的效率只取决于所处理的数据量D、以上说法均错误标准答案：A知识点解析：程序执行的效率与数据的存储结构、数据的逻辑结构、程序的控制结构、所处理的数据量等有关。25、有下面事件过程：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。26、窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数组Command1，其下标从左到右分别为0、1、2、3，窗体外观如图所示。命令按钮的事件过程如下：PrivateSubCommand1_Click(IndexAsInteger)SelectCaseIndexCase0CD1.Action＝1Case1CD1.ShowSaveCase2CD1.Action＝5Case3EndEndSelectEndSub对上述程序，下列叙述中错误的是()。A、单击"打开"按钮，显示打开文件的对话框B、单击"保存"按钮，显示保存文件的对话框C、单击"打印"按钮，能够设置打印选项，并执行打印操作D、单击"退出"按钮，结束程序的运行标准答案：C知识点解析：通用对话框中Action＝1，或用ShowOpen方法都可显示"打开"文件对话框；Action＝2，或用ShowSave方法都可显示文件"另存为"对话框；Action＝3，或用ShowColor方法都可显示"颜色"对话框；Action＝4，或用ShowPrint方法都可显示"字体"对话框；Action＝5，或用ShowHelp方法都可显示"打印"对话框；本题中，"打开"、"保存"、"打印"、"退出"按钮的下标(即Index值)分别是0、1、2、3，用Index值区分各命令按钮。当Index＝0时，CD1.Action＝1，说明单击"打开"按钮，会显示"打开"文件对话框；当Index＝1时，CD1.ShowSave，说明单击"保存"按钮，会显示文件"另存为"对话框；当Index＝3时，End，说明单击"退出"按钮，会结束程序运行。故A、B、D选项正确。当Index＝2时，CD1.Action＝5，说明单击"打印"按钮，会显示"打印"对话框，但打开对话框后，只能设置打印选项，不能执行打印操作。故C选项错误。27、编写如下程序：PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=1:y=1Doy=x*yIfy>10ThenPrintx,yExitDoElsex=x+3EndIfLoopWhilex<=10EndSub运行程序，循环实际执行次数为A、0B、2C、3D、4标准答案：C知识点解析：x初值为1。第一次先执行循环然后判断条件。在循环体中，x被加3，执行完第2次时x=7。执行第三次时，y=28，满足条件y>10，执行ExitDo跳出循环。选C。28、下列程序段的执行结果为()。a=6Fork=1To0a=a+kNextkPrintk=aA、－16B、－116C、16D、1121标准答案：C知识点解析：本题考查循环的分析。For型循环默认的循环变量的步长为1，由于循环变量的初值大于终值，因此循环体一次也不执行。29、有三个关系R、S和T如下：则由关系R和S得到关系T的操作是()。A、自然连接B、并C、交D、差标准答案：D知识点解析：关系T中的元组是关系R中有而关系S中没有的元组的集合，即从关系R中除去与关系S中相同元组后得到的关系T。所以做的是差的运算。30、下列各语句中，正确的是A、DimxAsVariant=Array(1,2,3,4,5)B、Dimx()AsInteger:x=Array(1,2,3,4,5)C、DimxAsVariant:x=Array(1,"abc",2,3,4)D、DimxAsInteger:x=Array(1,2,3,4,5)标准答案：C知识点解析：在VisualBasic中允许定义默认数组。所谓默认数组，就是数据类型为Variant(默认)的数组，对于默认数组可以存放不同类型的数据，选项A赋值方式错误，选项C正确。Array函数用来为数组元素赋值，即把某个数据集读入某个数组。其格式为：数组变量名=Array（数组元素值）。注意：数组变量不能是具体的数据类型，只能是变体（Variant）类型。选项B、D均错误。故正确答案为C选项。31、在窗体上画一个名称为CD1的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程：PrivateSubCommand1_Click()CD1.FileName=""CD1.Filter="所有文件|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"CD1.FilterIndex=2CD1.DialogTitle="选择文件"CD1.Action=1EndSub则当程序运行时，单击命令按钮Command1后，将显示对话框窗口，以下有关叙述中错误的是A、语句CD1.Action=1可等价地替换为语句CD1.ShowSaveB、在显示的对话框中指定的默认文件名为空C、显示的对话框的标题为"选择文件"D、在对话框中显示的默认文件类型为(*.Doc)标准答案：A知识点解析：语句CD1.Action=1与CD1.ShowOpen等价，ShowOpen方法用于显示打开文件对话框，打开指定目录中的文件，故选项A错误。Filter属性用于文件过滤器，属性格式为：描述1|过滤器1|描述2|过滤器2…；FilterIndex属性用于指定默认的文件过滤器，即本题中默认的文件过滤器为Doc文件，文件名为空，故选项B，D正确；DialogTitle属性设置对话框的标题，选项C正确。故正确答案为选项A。32、算法的有穷性是指()。A、算法程序的运行时间是有限的B、算法程序所处理的数据量是有限的C、算法程序的长度是有限的D、算法只能被有限的用户使用标准答案：A知识点解析：算法原则上能够精确地运行，而且人们用笔和纸做有限次运算后即可完成。有穷性是指算法程序的运行时间是有限的。33、设有如下通用过程：PublicFunctionf(xAsInteger)DimyAsIntegerx＝20y＝2f＝x*yEndFunction在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSubCommand1_Click()StaticxAsIntegerx＝10y＝5y＝f(x)Printx；yEndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是()。A、105B、2040C、205D、1040标准答案：B知识点解析：过程f中形参变量x没有指定传递方式，则默认按地址传递，会影响实参值。而变量y在按钮事件过程和f过程中都是局部变量只在本过程中起作用。因此执行y＝f(x)后，x值在过程中被改变为20，而y被赋为过程返回值40。因此程序窗体上会显示20和40。34、以下关于数组的叙述中，错误的是A、Variant类型的数组中各数组元素的类型可以不同B、各数组元素可以是不同类型的控件C、各数组元素通过下标进行区别D、各数组元素具有相同的名称标准答案：B知识点解析：控件数组是由一组相同类型的控件组成。它们共用一个控件名，绝大部分的属性也相同，但有一个属性不同，即Index属性的值不同。当建立控件数组时，系统给每个元素赋一个唯一的索引号(Index)，通过属性窗口的Index属性，可以知道该控件的下标是多少，第1个元素下标是0。35、窗体上有一个名称为Command1的命令按钮。要求编写程序，把文件f1.txt的内容写到文件f2.txt中，然后将f1.txt删除。命令按钮的单击事件过程如下：PrivateSubCommand1_Click()Open"c:\f1.txt"ForInputAs#1Open"c:\f2.txt"ForOutputAs#2DoWhileNotEOF(2)LineInput#1,str1Print#2,str1LoopCloseKill"c:\f1.txt"EndSub该程序运行时发生错误，应该进行的修改是A、打开f1.txt应该使用Output方式，打开f2.txt应该使用Input方式B、NotEOF(2)应该改为NotEOF(1)C、LineInput应改为GetD、Close语句改为CloseAll标准答案：B知识点解析：Open打开文件时，可以用三种模式，即OutPut：打开一个文件，将对该文件进行写操作；Input：打开一个文件，将对该文件进行读操作；Append：打开一个文件，将在该文件末尾追加记录。DoWhile循环应该判断1#文件的结尾，即DoWhileNotEOF(1)，不是结尾的话把内容写到2#文件中。LineInput语句为从已打开的顺序文件中读出一行并将它分配给String变量。Close语句后面有文件号，就关闭这个文件，否则就关闭所有打开的文件。此题中应该关闭所有的文件。选B）。36、假定有如下程序：PrivateSubForm_Click()DimNAsInteger,JAsIntegerN=0J=1DoUntilN>2N=N+1J=J+N*(N+1)LoopPrintN;JEndSub运行程序，单击窗体，输出结果是A、321B、37C、01D、313标准答案：A知识点解析：DoUntil…Loop语句在条件满足的前提下会一直执行中间的循环语句。N的初值为0，因此循环会执行3次。在循环体内N每次被加1。因此结束时N=3。同样的方法可算出J=21。选A）。37、表达式12/2\4的值是()。A、1.5B、2C、4D、1标准答案：D知识点解析：运算符除/优先级高于整除、所以先计算/，再计算、结果是1，故选D。38、设有如下事件过程：PrivateSubCommand1_Click()Fori＝1To5j＝iDoPrint"*"j＝j－1LoopUntilj＝0NextiEndSub运行程序，输出"*"的个数是()。A、5B、15C、20D、25标准答案：B知识点解析：i＝1时，输出1个*，i＝2时，输出2个*，i＝3时，输出3个*，i＝4时输出4个*，i＝5时输出5个*，因此总共输出*的个数是1＋2＋3＋4＋5＝15。39、设有窗体的Form_MouseMove事件过程如下：PrivateSubForm_MouseMove(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)If(ButtonAnd3)＝3ThenPrint"检查按键"EndIfEndSub关于上述过程，以下叙述中正确的是()。A、按下鼠标左键时，在窗体上显示"检查按键"B、按下鼠标右键时，在窗体上显示"检查按键"C、同时按下鼠标左、右键时，在窗体上显示"检查按键"D、不论做何种操作，窗体上都不会显示标准答案：C知识点解析：40、有下面事件过程：PrivateSubCommand1_Click()a=5b=8Fork=1To30c=b－aa=bb=CNextkPrintCEndSub上面事件过程执行后产生的输出是()。A、3B、8C、－5D、－8标准答案：B知识点解析：程序开始时，变量a赋值为5，变量b赋值为8；For循环一共执行30次，循环执行过程中各变量的值如下表所示：根据循环执行特点可知：当循环执行完第6次时，变量a和b的值又回到起始值，根据这样的规律，循环是以6为执行单元，每执行6次后，变量的值会回到起始值，而本题循环一共会执行30次，30是6的倍数，所以第30次循环和第6次循环，各变量获得的值是相等的，故第30次循环中变量c的值为8，B选项正确。本题选择B选项。二、基本操作题(本题共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)在考生文件夹下有一个上程文件sjts．vbp。窗体上有名称为Timcr1的定时器，以及两条水平直线，名称分别为Line1和Line2。请用名称为Shape1的形状控件，在两条直线之问画一个宽和高都相等的形状，设置其形状为网。并设置适当属性使其满足以下要求：①圆的顶端距窗体Form1顶端的距离为360；②圆的颜色为红色(红色对应的值为：&H000000FF&或&IIFF&)，如图所示。程序运行时，Shape1将在Line1和Line2之间运行。当Shape1的底部到达Line2时，会自动改变方向向上运动；当Shape1的顶端到达Line1时，会自动改变方向下运动。文件中给出的程序不完整，清上掉程序中的注释符，把程序中的?改为正确内容，使其实现上述功能。注意：不能修改程序的其他部分和已给出控件的属性。最后将修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sjt4．vbp，包含了所有控件和部分程序，如图所示。其功能如下：①单击“读数据”按钮，可将考生文件夹下in4．dat文件中的100个整数读到数组a中。②单击“计算”按钮，则根据从组合框Combol中选中的项目．对数组a中的数据计算平均值．并将计算结果四舍五入取整后显示在文本框．rexll中。“读数据”按钮的Click事件过程已经给出，请为“计算”按钮编写适当的事件过程实现上述功能。注意：不得修改已经存在的控件和程序，在结束程序运行之前，必须进行一次计箅，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。标准答案：(1)步骤1：打开本题工程文件，新建一个形状控件，并按表3．51所示设置属性。步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。参考答案DimsAsInteger，hAsLongPrivateSubForm_Load()Timerl．Enabled=Trues=—40EndSubPrivateSubTimerl_Timer()Shape1．MoveShape1．Left，Shape1．Top+sIfShape1．Top<=Line1．Y1Thens=—sEndIfIfShape1．Top+Shape1．Heigeht>=Line2．Y1Then’圆的底端坐标加上圆的自身高度与Line2比较s=—sEndIfEndSub步骤3：调试并运行程序，关闭程序后按题目要求存盘。(2)步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，在代码编辑窗口指定位置编写以下代码。参考答案DimkAsLongDimmAsLongDimqAsLongDimpAsLongDimrAsLongDimnAsLongFork=1To100Ifa(k)Mod2=0Then’判断是否为偶数m=m+a(k)’偶数之和q=q+1’偶数个数加1Elsen=n+a(k)’奇数之和p=p+1’奇数个数加1EndIfNextkr=Int((m+n)／(p+q)+0．5)’平均值m=Int(m／q+0．5)’偶数平均值n=Int(n／p+0．5)’奇数平均值SelectCaseCombol．TextCase"所有偶数"Text1=mCase"所有奇数"Text1=nCase"所有数"Text1=rEndSelect步骤3：调试并运行程序，关闭程序后按题目要求存盘。知识点解析：(1)通过形状控件的Move方法，实现形状的移动，通过Shape1．Top的值和Line1．Y1的值进行比较来判定圆形是否越过上界，通过比较Shape1．Top+Shape1．Height的值和Line2．Y1的值来判定圆形是否越过下界。(2)通过文件操作，打开文件，把数值读入数组。通过循环语句遍历数组a(k)，用If语句和Mod()函数判断是奇数还是偶数，先求出数组中元素的所有奇数和和所有偶数和，计算出平均数，通过Int()函数实现对结果的四舍五入取整，所有奇数和和所有偶数和的加和，求出所有数的和，用同样的方法得出平均数。SelectCase语句判断组合框中选中的项目，实现函数的功能，在文本框中显示题目要求的平均值，并按题目要求存盘。四、综合应用题(本题共1题，每题1.0分，共1分。)44、在考生文件夹下有一个工程文件sjt5．vbp，其窗体上画有两个名称分别为Text1、Text2的文本框，其中Text1可多行显示。请画两个名称为Command1、Command2，标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下：①单击“产生数组”按钮，则用随机函数生成10个0～100之间(不含0和100)互不相同的数值，并将它们保存到一维数组a中，同时也将这10个数值显示在Text1文本框内；②单击“查找”按钮将弹出输入对话框，接收用户输入的任意一个数，并在一维数组a中查找该数，若查找失败，则在Text2文本框内显示该数“不存在于数组中”；否则显示该数在数组中的位置。要求：请去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改窗体文件中已经存在的控件和程序。最后把修改后的文件按原文件名存盘。标准答案：步骤l：打开考生文件夹中的本题工程文件sjt5．vbp，在窗体上画两个命令按钮，属性及其值如下表所示。步骤2：在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。a(i)=Fix(Rnd*99+1)Forj=lToi-1i=i-1Ifa(i)=numThenIfi>10Then步骤3：按要求将文件保存至考生文件夹中。知识点解析：本题在“生成数组”按钮的单击事件过程中，通过For循环生成10个0～100之间(不含0和100)互不相同的随机数，并存入数组a，其中生成函数的表达式应为：Fix(Rnd*99+1)。为防止生成相同的随机数值，每新生成一个随机数后，都通过For循环让其与之前生成的i．一个随机数逐一比较，若新生成的随机数已存在，则将当前循环变量i的值减1，重新为数组元素a(i)生成随机数。在“查找”按钮的单击事件过程中，通过For循环让数组a中的元素逐一与用户在输入对话框中输入的数相比较，若条件表达式a(i)=num成立，则表示找到相同的数，并在文本框Text2中显示相关信息。若没找到相同的数，循环结束后循环变量i>10，则在Text2文本框内显示该数“不存在于数组中”。国家二级（VB）机试模拟试卷第2套一、选择题(本题共40题，每题1.0分，共40分。)1、在窗体上有一个名称为Commandl的命令按钮，并有如下程序：PrivateSubCommand1Click()StaticXAsIntegerStaticYAsIntegerClsY=1：Y=Y+5：X=5+X：PrintX．YEndSub程序执行时，单击命令按钮Commandl三次后，窗体上显示的结果为()。A、1516B、56C、1515D、156标准答案：D知识点解析：本题考查静态变量。静态变量的值有继承性，上一次调用的结果在下一次调用时还是有效的。题目中每次调用Y的值都被重新赋值了，因此单击3次以后Y的值仍然是6，而X每次调用的结果都保留，因此调用3次以后，结果为15。2、窗体上有名称为Command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1(Simple)，并有如下事件过程：PrivateSubCommand1_Click()Fori＝0ToList1.ListCount－1IfList1.Selected(i)＝TrueThenList2.AddItemTextEndIfNextEndSub上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是()。A、将For循环的终值改为List1.ListCountB、将List1.Selected(i)＝True改为List1.List(i).Selected＝TrueC、将List2.AddItemText改为List2.AddItemList1.List(i)D、将List2.AddItemText改为List2.AddItemList1.ListIndex标准答案：C知识点解析：题目程序不能将List1中的选中项添加到List2中，List2.AddItemText一行有误，应该改为List2.AddItemList1.List(i)才能使List1中每个选中的行添加到List2中。列表框控件的List属性保存了列表框中所有值的数组，可以通过下标访问数组中的值。3、对关系S和关系R进行集合运算，结果中既包含关系S中的所有元组也包含关系R中的所有元组，这样的集合运算称为()。A、并运算B、交运算C、差运算D、除运算标准答案：A知识点解析：关系的并运算是指，由结构相同的两个关系合并，形成一个新的关系，其中包含两个关系中的所有元组。4、下面的数写成普通十进制数是()。8．6787E+8A、86787000B、867870000C、8678700D、8678700000标准答案：B知识点解析：浮点数也称为实型数或实数，是带有小数部分的数值。他由3部分组成：符号、指数及尾数。例如123．456E3或123．456E+3的单精度数，这其中的”123．456”部分为尾数部分、”E3”为指数部分(E为符号，3为指数)，相当于123．456乘以10的3次幂。中是”E+8”，那么应该是乘以10的8次幂，所以选项B正确。5、在用Open语句打开文件时，如果省略“For方式”，则打开的文件的存取方式是()。A、顺序输入方式B、顺序输出方式C、随机存取方式D、二进制方式标准答案：C知识点解析：Open语句打开文件时的格式为：Open文件说明[For方式][Access存取类型][锁定]As[#]文件号[Len=记录长度]其中，“方式”可以是：Output指定顺序输出方式、Input指定顺序输入方式、Append指定顺序输出方式，它与Output不同的是，当用Append方式打开文件时，文件指针被定位在文件末尾，如果文件执行写操作，则写入的数据附加在原来文件的后面。Random指定随机存取方式，也是默认方式。6、在程序运行时，下面的叙述中正确的是()。A、用鼠标右键单击窗体中无控件的部分，会执行窗体的FormLoad事件过程B、用鼠标左键单击窗体的标题栏，会执行窗体的FormClick事件过程C、只装入而不显示窗体，也会执行窗体的FormLoad事件过程D、装入窗体后，每次显示该窗体时，都会执行窗体的FormClick事件过程标准答案：C知识点解析：窗体的Click(单击)事件在程序运行时单击窗体内的某个无其它控件的部位时发生；窗体的Load(装载)事件在一个窗体被装载时发生，常用于在程序启动时对属性和变量进行初始化，该条件与窗体是否显示无关。7、当用()方式打开文件时，如果对文件进行写操作，则写入的数据附加到原文件的后面。A、OutputB、AppendC、InputD、Random标准答案：B知识点解析：本题考查文件的打开方式。以追加的方式打开文件时，每次写入的记录存放在文件的末尾。8、设窗体中有一个文本框Text1，若在程序中执行了Text1．SetFocus，则触发()。A、Text1的SetFocus事件B、Text1的GotFocus事件C、Text1的LostFoCUS事件D、窗体的GotFocus事件标准答案：B知识点解析：setFocus是控件获得焦点的方法，GotFoCU$是控件获得焦点后触发的事件，I~ostFocus是控件失去焦点后触发的事件。本题中程序执行Text1．SetFocus后，Text1就获得焦点，进而触发Text1的GotFocus事件。故B选项正确。9、下列表达式的值为2123的是()。A、Val("123asd")&2000B、Val("123asd")+2000C、Str(123)&"2000"D、Str(123)+"2000"标准答案：B知识点解析：本题考查系统函数和字符串连接运算符。Val的功能是把从头开始的连续数字串转化成数字。而Str的功能是把数字转化为字符。当操作数为字符串时，运算符“+”表示对字符串进行连接运算，否则为加法运算。因此选项A)为1232000，选项B)为2123，选项C)和D)全部为1232000。10、有下列程序，运行后的结果为()X=2．4：Y=3：Z=5Print”A(“；X+Y*Z；”)”A、A(17)B、A(17．4)C、A(18)D、A(2．4+3*5)标准答案：B知识点解析：考查Print方法的输出。使用Print方法可以在窗体或图片框上输出文本，方法的参数为输出的内容，各个输出项之间可以使用逗号或分号隔开，如果用”，”隔开，则表示输出项分区输出，否则表示连续输出。因此题目中的输出项”A(“；X+Y*Z；”)”之间用分号分隔是连续输出。11、要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目，则应把该列表框的MultiSelect属性设置为()。A、0B、1C、2D、其他标准答案：B知识点解析：考查列表框的MultiSelect属性。默认状况下列表框仅可以选择一项，通过设置MultiSelect可改变多选设置，该属性有3种值：0表示禁止多选；1表示简单多选，在选项上单击可以选定多项；2为借助Ctrl和Shift键进行的多项选择。12、某人编写了下面的程序：PrivateSubCommandl_Click()DimaAsInteger，bAsIntegera=InputBox(”请输入整数”)b=InputBox(”请输入整数”)proaprobCallpro(a+b)EndSubPrivateSubpro(nAsInteger)While(n＞0)PrintnMod10；n=n＼10WendPrintEndSub此程序功能是：输入2个正整数，反序输出这2个数的每一位数字，再反序输出这2个数之和的每一位数字。例如：若输入123和234，则应该输出：321432753但调试时发现只输出了前2行(即2个数的反序)，而未输出第3行(即2个数之和的反序)，程序需要修改。下面的修改方案中正确的是()。A、把过程pro的形式参数nAsInteger改为ByValnAsIntegerB、把Callpro(a+b)改为proa+bC、把n=n＼10改为n=n／10D、在prob语句之后增加语句c％=a+b，再把Callpro(a+b)改为proc标准答案：A知识点解析：在过程定义中过程的形式参数定义时如果没有ByVal指明参数的传递方式，那么默认为地址传递，这样过程中对形参的改变将影响到实参的值。本程序中过程定义语句Privatesubpm(nAsInteger)说明形参n为按地址传递的，而在过程内语句n=n＼10改变了形参的值，因此，a、b的值就不再是最初输入的值了，表达式a+b就不是期望的两个输入数的和。因此得不到正确结果。只要把PrivateSubpro(nAsInteger)改为PrivateSubpro(ByValnAsInteger)，程序即可得到正确结果，因此A选项正确。13、在黑盒测试方法中，设计测试用例的主要根据是()。A、程序内部逻辑B、程序外部功能C、程序数据结构D、程序流程图标准答案：B知识点解析：黑盒测试是对软件已经实现的功能是否满足需求进行测试和验证，黑盒测试完全不考虑程序内部的逻辑结构和内部特性，只根据程序的需求和功能规格说明，检查程序的功能是否符合它的功能说明，所以本题选择B。14、为了使文本框只具有垂直滚动条，应先把MultiLine属性设置为True，然后再把ScrollBars属性设置为()。A、0B、1C、2D、3标准答案：C知识点解析：文本框的ScrollBars属性值：0表示无滚动条，1表示只有水平滚动条，2表示只有垂直滚动条，3表示水平和垂直滚动条都有。本题文本框只具有垂直滚动条，则ScrollBal属性值就设置为2，故C选项正确。15、窗体上有一个名称为Text1的文本框；一个名称为Timer1的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下：PrirateSubTimer1_Jimer()SmileflagAsIntegerIfnag=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选项正确。16、Fibonaeei数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即：1，1，2，3，5，8，13，21，34，55，89，…。某人编写了下面的函数，判断大于1的整数X是否是Fibonacci数列中的某个数，若是，则返回True，否则返回False。FunctionIsfab(xAsInteger)AsBooleanDimaAsInteger,bAsInteger,cAsInteger,tlagAsBooleanflag＝Falsea＝1：b＝1DoWhilex＜bC＝a＋b：a＝b：b＝cIfx＝bThenflag＝TrueLoopIsfab＝flagEndFunction测试时发现对于所有正整数x，函数都返回False，程序需要修改。下面的修改方案中正确的是()。A、把a＝b与b＝c的位置互换B、把c＝a＋b移到b＝c之后C、把DoWhilex＜b改为DoWhilex＞bD、把Ifx＝bThenflag＝True改为Ifx＝aThenflag＝True标准答案：C知识点解析：在本题中通过分析题干中的程序可以看出，函数的返回值就是变量flag的值。错误现象是无论输入哪个正整数均会返回False，这就代表着没有执行循环，直接输出的就是变量flag的初值False。进一步分析可以看出，由于b的初值为1，而任何正整数均不会小于1，所以永远无法满足循环条件从而进入循环，因此需要将条件x＜b改为x＞b。17、在窗体上画一个命令按钮和一个文本框，其名称分别为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选项正确。另外，使用字符连接运算符"＋"时，如果连接的是字符串和数值，可根据返回值类型判断，若返回值类型为字符串，则它将数值转换成字符串后与另一字符串连接成新字符串返回；若返回值类型为数值，则它要求字符串中只能包含数字，而不能有其他字符，否则报"类型不匹配"的错误。18、在窗体上画一个组合框，一个命令按钮和一个文本框，其名称分别为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选项错误。19、假定Picturel和Textl分别为图片框和文本框的名称，则下列错误的语句是()。A、Print25B、Picturel．Print25C、Textl．．Print25D、Debug．Print25标准答案：C知识点解析：Ptint方法可以在窗体上显示文本字符串和表达式的值，并可在其他图形对象或打印机上输出信息。其一般格式为：[对象名称．]Print[表达式表][，l；]其中对象名称可以是窗体(Fonn)、图片框(PietureBox)或打印机(Printer)，也可以是立即窗口(Debug)。如果省略对象名称，则在当前窗体上输出。20、在窗体上画一个名称为Combol的组合框，名称为Textt的文本框，以及名称为Command1的命令按钮，如图所示。运行程序，单击命令按钮，将文本框中被选中的文本添加到组合框中，若文本框中没有选中的文本，则将文本框中的文本全部添加到组合框中。命令按钮的事件过程如下：PrivateSubCommandl—Click()IfTextl．SelLength<>0ThenElseCornbol．AddltemText1EndIfEndSub程序中横线处应该填写的是()。A、Combol．AddItemText1．TextB、Combol．AddItemText1．SdStartC、Combol．AddhemText1．SelTextD、Combol．AddhemText1．SelLen舢标准答案：C知识点解析：根据题意可知，横线处应该是将文本框中选中文本添加到组合框中。文本框Text属性返回整个文本框中的文本，故A选项错误；SelStart属性返回选中文本的起始位置，故B选项错误；SelLength属性返回选中文本的长度，故D选项错误；SelText属性返回选中的文本，故C选项正确。21、下列关于计时器控件的描述中，正确的是()。A、计时器只有1个事件，即Timer事件B、Interval属性以微秒为单位设置计时器事件产生的间隔C、可以根据需要在窗体上调整计时器的大小D、可以通过属性设置决定计时器是否在窗体上可见标准答案：A知识点解析：计时器的Interval属性以毫秒为单位，B选项叙述错误；计时器控件的位置和大小无关紧要，因为它只是在设计阶段出现在窗体上，程序运行时会自动消失，故C选项和D选项叙述均错误，本题A选项叙述正确。本题选择A选项。22、在窗体上厕一个名称为Command1的命令按钮，然后编写如下程序：PrivateSubCommand1_Click()DimaAsIntegera=2s=0Fori=1To3s=s+Fun(a)NextiPrintsEndSubFunctionFun(aAsInteger)StaticCb=0b=b+1c=c+1Fun=a+b+CEndFunction程序运行后，单击命令按钮，输出结果是()。A、6B、9C、11D、15标准答案：D知识点解析：Function过程和Sub过程有一个很重要的区别，Function过程可以带返回值，而Sub过程不可以。本题的Command1_Click()过程中，使用。For循环结构调用函数过程Fun，并将Fun带回的计算结果进行累加，Command1_Click()事件过程中For循环共执行3次，循环执行情况及各变量的值如下表所示。本题中Fun函数过程中定义的变量c是静态局部变量，可以保留上次程序执行后的结果，最后输出变量s的值为15，所以D选项正确。23、设已经在菜单编辑器中设计了弹出式菜单mnuStyle，要求程序运行时，当用户在文本框Text1上单击鼠标右键时，能够弹出该菜单，则应使用的事件过程是()。A、PrivateSubText1_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)IfButton=2ThenPopupMenumnuStyleEndIfEndSubB、PrivateSubText1_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)IfButton=1ThenPopupMenumnuStyleEndIfEndSubC、PrivateSubText1_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)IfButton=2ThenmnuStyle．ShowEndIfEndSubD、PrivateSubText1_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)IfButton=1ThenmnuStyle．PopupEndIfEndSub标准答案：A知识点解析：为了显示弹出式菜单，通常把PopupMenu方法放在MouseDown事件中，该事件响应所有的鼠标单击操作。按照惯例，一般通过单击鼠标右键显示弹出式菜单，这可以用Button参数来实现。对于鼠标来说，左键的。Button参数值为1，右键的Button参数设置为2，因此，可以使用“IfButton=2ThenPopupMenu菜单名”语句可以通过单击鼠标右键来响应MouseDown事件、显示弹出式菜单，故本题A选项正确。本题选择A选项。24、软件设计中模块划分应遵循的准则是A、低内聚低耦合B、高耦合高内聚C、高内聚低耦合D、以上说法均错误标准答案：C知识点解析：根据软件设计原理提出如下优化准则：①划分模块时，尽量做到高内聚、低耦合，保持模块相对独立