全国计算机等级考试二级vb上机题库题型总结

这些题型是本套全国计算机等级考试VB所常见的。便将此整理一下，以供大学考前使用。祝大家能顺利通过二级。谢谢。上机第1套一、基本操作题（1）在名为FORM1的窗体上绘制一个名为FRA1的框架，标题为“框架示例“，高度为2000，宽度为3500；在框架中绘制一个文本框。名为TXT1，高度为600，宽度为2000，其位置距框架的左边框和上边框均为800，文本框中的初始内容设置为“文本框示例“二、简单应用题（1）在考生文件夹中有一个工程文件VBSJ3VBP及其窗体文件VBSJ3FRM。在名为FORM1的窗体上有一个单选按钮数组，含3个单选按钮，均没有标题。程序功能在运行时，如果选中一个单选按钮后，单击“显示“按钮，则根据单选按钮的选中情况，在窗体上显示“你所在的城市是北京“、“你所在的城市是上海“或“你所在的城市是天津“。要求请利用属性窗口，为单选按钮依次添加标题“北京“、“上海“和“天津“，设初始选取中的是“北京“，再添加一个标题为“显示“的命令按钮，如图13所示。删除程序中语句前面的注释符“，把程序中的问号“改为正确的内容，使其实现上述功能，但不得修改程序的其他部分，也不得修改控件的其他属性。最后，将修改后的文件按原文件名保存在原文件夹中。程序源码PRIVATESUBCMD1_CLICKFORI0TO2IFOPT1IVALUETRUETHENPRINT“你所在的城市是“OPT1ICAPTIONENDIFNEXTENDSUB上机第2套题二、简单应用题（1）在考生文件夹中有一个工程文件VBSJ3VBP及其窗体文件VBSJ3FRM。请在名为FORM1的窗体上建立一个菜单，主菜单项为“项目“（名称为MNUITEM），它有两个子菜单项，其名称分别为MNUITEMADD和MNUITEMDEL，标题分别为“添加“和“删除“，然后绘制一个名为LST1的列表框和一个名为TXT1的文本框。编写适当的事件过程。程序运行后，如果单击“添加“命令，则从键盘上输入要添加到列表框中的项目（内容任意，不少于3个）；如果单击“删除“命令，则从键盘上输入要删除的项目，将其从列表框中删除。程序的运行结果如图18所示。在考生文件夹中的工程文件VBSJ3VBP（相应的窗体文件名为VBSJ3FRM），可以实现上述功能。但程序不完整，请补充完整。程序源码PRIVATESUBMNUITEMADD_CLICKTXT1TEXTINPUTBOX“_请输入要添加的项目“LST1ADDITEMENDSUBPRIVATESUBMNUITEMDEL_CLICKTXT1TEXTINPUTBOX“_请输入要删除的项目“FORI0TOIFLST1LISTITHENLST1REMOVEITEMENDIFNEXTIENDSUBLST1ADDITEMTXT1TEXTFORI0TOLST1LISTCOUNT1IFLST1LISTITXT1TEXTTHENLST1REMOVEITEMI（2）在考生文件夹中有工程文件VBSJ4VBP及其窗体文件VBSJ4FRM。在名为FORM1的窗体上有一个名称为LST1的列表框，一个名称为TXT1的文本框，以及一个名为CMD1的命令按钮（标题为“复制“）。要求程序运行后，在列表框中自动建立4个列表项，分别为“项目1“、“项目2“、“项目3“和“项目4“。如果选择列表框中的一项，则单击“复制“按钮时，可以把该项复制到文本框中，如图19所示。图18图19程序源码OPTIONEXPLICITPRIVATESUBCMD1_CLICKDIMIASINTEGERFORITO_LST1LISTCOUNT1IFLST1SELECTEDITRUETHENLST1LISTIENDIFNEXTIENDSUBPRIVATESUBFORM_LOADLST1ADDITEM“ITEM1“LST1ADDITEM“ITEM2“LST1ADDITEM“ITEM3“LST1ADDITEM“ITEM4“ENDSUBFORI0TOLST1LISTCOUNT1TXT1TEXTLST1LISTI要求删除程序中语句前面的注释符“，把程序中的问号“改为正确的内容，使其实现上述功能，但不得修改程序的其他部分，也不得修改控件的其他属性。最后，将修改后的文件按原文件名保存在原文件夹中。三、综合应用题在名为FORM1的窗体上建立一个名为TXT1的文本框（其MULTILINE属性为TRUE，SCROLLBARS属性为2）和两个名称分别为CMD1和CMD2的命令按钮（它们的标题分别为“读取“和“保存“），如图110所示。图110要求程序运行后，如果单击“读取“按钮则读入DR021DAT文件中的100个整数，放一个数组中（数组下界为1）；如果单击“保存“按钮，则筛选出100个整数中的所有偶数，在文本框TXT1中显示出来，并把所有偶数之和存入考生文件夹中的文件DW021DAT。在考生文件夹下有标准模块MODELBAS，其中WRITEDATA过程可以把一个整数存入DW021DAT文件，考生可以把该模块文件添加到自己的工程中。注意程序中对文件的操作统一使用相对路径；文件必须存放在考生文件夹中，窗体文件名为VBSJ5FRM，工程文件名为VBSJ5VBP，结果存入DW021DAT文件，否则没有成绩。OPTIONEXPLICITSUBWRITEDATABYVALAASINTEGERDIMSFILEASSTRINGSFILE“DW021DAT“OPENAPPPATHCLOSE1ENDSUBDIMA100ASINTEGERPRIVATESUBCMD1_CLICKOPENAPPPATHPERSTELPERSPOSNEXTICLOSE1ENDSUB参考代码RECNUMRECNUM1PUT1,RECNUM,PERSLOOPWHILEUCASEASP“Y“RECNUMLOF1/LENPERSGET1,I,PERS上机第52套题一、基本操作题（1）在名为FORM1的窗体上绘制一个名称为TXT1的文本框，TEXT属性为“人民“，FONT属性为“楷体“；一个名称为HSB1的水平滚动条，其MIN属性设置为10，MAX属性设置为50，LARGECHANGE属性设置为5，SMALLCHANGE属性设置为2。编写适当的事件过程，使程序运行后，若移动滚动条上的滚动框，则可扩大或缩小文本框中的“人民“二字。程序运行效果如图1260所示。注意程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为VBSJ1VBP，窗体文件名为VBSJ1FRM。图1260参考代码PRIVATESUBHSB1_CHANGETXT1FONTSIZEHSB1VALUEENDSUB三、综合应用题在考生文件夹下有一个工程文件VBSJ5VBP（其窗体文件为VBSJ5FRM）。在名为FORM1的窗体上有3个LABE1控件和2个名称分别为CMD1和CMD2、标题分别为“开始“和“退出“的命令按钮。编写函数ITEMA,N，其功能是由数字A组成的不多于N位数的整数，利用该函数计算表达式555555555555555的值，并把结果写入考生文件夹下的DW521DAT文件中。执行完毕，“开始“按钮变成“完成“按钮，且无效。如图1264所示。图1264要求该程序不完整，请在有问号“的地方填入正确内容，然后删除问号“及所有注释符“，但不能修改其他部分。存盘时不得改变文件名和文件夹，相应的数据文件也保存到考生文件夹下，否则没有成绩。程序源码OPTIONEXPLICITPRIVATESUBCMD2_CLICKENDENDSUBPRIVATESUBCMD1_CLICKDIMAASINTEGER,NASINTEGER,JASINTEGER,SUMASSINGLEA8N4FORJNTO1STEP1IFJNTHENSUMITEMA,JELSESUMSUMITEMA,JENDIFNEXTPRINT“SUM“SUMOPENAPPPATH“DW521DAT“FOROUTPUTAS1PRINT1,SUMCLOSE1CAPTION“完成“CMD1FALSEENDSUBFUNCTIONITEMA,KDIMPASSTRING,QASSTRING,SASSINGLEDIMIASINTEGER,HASSINGLEP“FORI1TOKQSTRAPPQNEXTIVALPITEMHENDFUNCTION【一起来审题】在本题中自定义函数ITEMA,N要完成的功能是返回一个完全由数字A组成且具有N位数的整数，题目源程序这样来实现这一功能通过FOR循环语句（循环变量取值为1K），将K个数字字符“A“（用STR函数来转换并赋值给字符串变量Q）逐个连入字符变量P。循环结束后，通过VAL函数将P的值转换为数值数据后赋值给变量H，并以H为函数返值。题目源程序在“开始“按钮的单击事件过程中，先令A、N的初值分别为5和5，然后在FOR循环语句（循环变量J的初值为N，终值为1，步长为1）中通过调用自定义函数ITEMA,N，依次得到整数55555、5555、555、55和5，并在第一次执行循环体（即JN）时，将函数ITEMA,N的返回值赋值给变量SUM，在之后的循环中则用SUM的值减去函数ITEMA,N，从而得到555555555555555的值。最后将SUM的值写入数据文件DW521DAT，并通过设置CAPTION属性使“开始“按钮变成“完成“按钮，通过设置ENABLED属性值为FALSE使其无效。参考代码CMD1CAPTION“完成“CMD1ENABLEDFALSEHVALP上机第53套题二、简单应用题（2）在考生文件夹中有一个工程文件VBSJ4VBP及窗体文件VBSJ4FRM。在名为FORM1的窗体上有一个圆和一条直线（直线的名称为LIN1）构成一个钟表的图标；有两个名称分别为CMD1和CMD2的命令按钮，标题分别为“开始“和“停止“；还有一个名为TMR1的计时器。程序运行时，钟表指针不动，单击“开始“按钮，则钟表上的指针（即LIN1）开始顺时针旋转（每秒转6，一分钟转一圈）；单击“停止“按钮，则指针暂停旋转。运行时的窗体如图1268所示。请设置计时器的适当属性，使得每秒激活计时器的TIMER事件一次；编写两个按钮的CLICK事件过程。文件中已给出了所有控件和部分程序，不得修改已有程序和其他控件的属性；编写的事件过程中不得使用变量，且只能写一条语句。最后，按原文件名并在原文件夹中保存修改后的文件。程序源码DIMLENTHASINTEGER,QASINTEGERCONSTPI314159PRIVATESUBFORM_LOADLENTHLIN1Y2LIN1Y1Q90ENDSUBPRIVATESUBTMR1_TIMERQQ6LIN1Y1LIN1Y2LENTHSINQPI/180LIN1X1LIN1X2LENTHCOSQPI/180ENDSUB图1268参考代码PRIVATESUBCMD1_CLICKTMR1ENABLEDTRUEENDSUBPRIVATESUBCMD2_CLICKTMR1ENABLEDFALSEENDSUB三、综合应用题数列1，1，3，5，9，15，25，41的规律是从第3个数开始，每个数是它前面两个数的和加1。在考生文件夹中有一个工程文件VBSJ5VBP（相应的窗体文件为VBSJ5FRM）。窗体FORM1中已经给出了所有控件。编写适当的事件过程实现以下功能在TXT1中输入整数30，单击“计算“按钮，则在TXT2中显示该数列第30项的值，如图1269所示。如果单击“保存“按钮，则将计算的第30项的值存到考生目录下的DW531DAT文件中提示因数据较大，应使用LONG型变量。图1269注意在结束程序运行之前，必须单击“保存“按钮，把结果存入DW531DAT文件，否则无成绩。最后把修改后的文件按原文件名保存。程序源码DIMA30ASLONGPRIVATESUBCMD2_CLICKOPENAPPPATH“DW531DAT“FOROUTPUTAS1PRINT1,TXT2TEXTCLOSE1ENDSUB参考代码PRIVATESUBCMD1_CLICKDIMIASINTEGERDIMNASINTEGERNCINTTXT1TEXTA11A21FORI3TONAIAI1AI21NEXTTXT2TEXTANENDSUB上机第54套题二、简单应用题（1）在考生文件夹中有工程文件VBSJ3VBP及窗体文件VBSJ3FRM。在名为FORM1的窗体上有2个框架、7个标签和7个文本框，所有控件已经画好。该程序的功能是根据给定的图形的三边的边长来判断图形的类型。若为三角形则同时计算出为何种三角形、三角形的周长和面积。要求完成“判断并计算“按钮的如下功能判断输入的条件是否为三角形，若是三角形则在TXT1中显示“是三角形“；在TXT2中显示是何种三角形。单击“清除再来“按钮可以将所有显示框清空，且按钮本身变为不可选取状态。当单击“判断并计算“按钮之后重新恢复为可选状态。附加信息三角形存在的条件为任一边不为0且任两边之和大于第三边。若一边具有A2B2C2，则为直角三角形；若所有边具有A2B2C2，则为锐角三角形；若一边具有A2B20ANDB0ANDC0ANDABCANDACBANDBCATHENIFA2B2C2ORB2A2C2ORC2A2B2THENIFA2“Z“ORC“Z“ANDC“A“THENCSTRING1,ASCC26ENDIFACNEXTKTXT2TEXTAENDSUB图1298NVALOPT1KCAPTIONFORK1TOMCMIDTXT1TEXT,K,1AAC三、综合应用题在考生文件夹中有一个工程文件VBSJ5VBP及窗体文件VBSJ5FRM。在名为FORM1的窗体中已经给出了所有控件。编写适当的事件过程完成以下功能单击“读入“按钮，则把考生目录下的DR591DAT文件中的一个整数放入TXT1中；单击“计算“按钮，则计算出大于该数的第1个素数，并显示在TXT2中，如图1299所示；单击“保存“按钮，则把要找到的素数存到考生目录下的DW592DAT文件中。注意在结束程序运行之前，必须单击“保存“按钮，把结果存入DW