计算机二级重点与习题.doc

二级VB程序设计考试大纲2007-11-28 基本要求1掌握VB集成开发环境中开发应用程序的基本方法；2掌握面向对象程序设计的基本概念；3熟练掌握VB常用数据类型、运算符与表达式及常用函数；4熟练掌握结构化程序设计的三种基本结构；5掌握SUB过程、函数过程的设计；6掌握常用控件的属性与方法；7掌握文本文件的基本操作；8了解在VB程序中访问数据库的基本方法。考试范围一、VB基础 VB开发环境：菜单、工具箱、工具栏、窗体、工程窗口和属性窗口的使用； 应用程序开发：添加窗体、模块，保存工程； 面向对象程序设计、可视化编程、事件驱动等基本概念。二、数据表示与运算 基本数据类型：字节、整数、长整数、实数、双精度、字符串、变体和布尔等数据类型的数据表示及其相互关系，货币、日期数据类型的表示和使用； 构造数据类型：数组的定义、表示与使用； 运算对象、运算符、函数和表达式 常量、变量和函数的定义和使用； 算术运算（加、减、乘、除、取负、指数、整除和取模）及其运算优先级，关系运算，逻辑运算（NOT、AND、OR）及其运算优先级；常用内部函数：三角函数Sin、Cos、Tan和Atn，算术函数Abs、Sqr、Log、Exp和Sgn，取整与类型转换函数Int和Fix，随机函数Rnd，字符串处理函数Trim、Left、Right、Len、Mid、Ucase、Lcase、Space、String、Ltrim和Rtrim，日期与时间函数Date、Time和Timer，转换函数Chr、Asc、Str和Val，QBColor和Rgb函数，InputBox函数，MsgBox函数等。三、程序设计基础 基本语句：Print语句，赋值语句，Dim语句和结束语句，注释语句； 选择结构：行If语句，块If结构，Select Case结构； 循环结构：For/Next结构及Exit For语句，Do/Loop结构及Exit Do语句，While/Wend结构； 程序结构：Sub过程的定义与调用，Function函数过程的定义与调用，参数传递规则，变量和常量的作用域及生存期，包括相关的声明语句或关键字。四、常见算法程序设计计数、求和、比较大小等简单算法，穷举法，循环控制的迭代法，数组的选择排序（分类）或冒泡法，字符串的一般处理。五、面向对象程序设计 面向对象程序程序设计的基本概念； 窗体及多重窗体的概念、建立和使用窗体的Caption、Height、Left，Name、Top、Visible、Width、Picture等属性，窗体的Click和Load等事件的功能和触发时机；窗体的其它常用事件如Dblclick、KeyDown、KeyPress、KeyUp，MouseDown、MouseMove、MouseUp、Unload等事件；窗体的常用方法如Cls、Show、Print、Hide、Move、Pset、Line、Circle等方法。 基本控件命令按钮、标签、文本框、复选框、单选按钮、框架、列表框、组合框、滚动条和定时器等；以上控件所构造的控件数组。 基本图形的绘制VB坐标系及其改变，RGB函数，Point、Pset方法，绘制点、线（矩形）、圆（扇形、弧与椭圆）的方法。 图片框、影像框、直线控件和形状控件的常用属性、方法 菜单和对话框建立和使用通用对话框控件，用菜单编辑器创建菜单，菜单的常用属性，菜单的Click事件。 文件、文件操作控件文件的概念，驱动器列表框、目录列表框和文件列表框的功能和综合作用，顺序文件的基本操作。 数据库操作数据库的基本概念，利用数据控件Data访问数据库。度有阶梯，阅读题请注意规律。笔试题型： 试题1-3 程序填空 （123） 容易试题4-6 程序阅读 （123） 较难试题7 编程题 （28） 拿满分很难笔试中常见的知识点： 1. While.Wend2. 图形知识 （颜色，点，线，圆, fillstyle）scaleheight 和ScaleWidth3. On Error4. Picture(图片框)5. Form_activate() 事件6. KeyPress 事件 （K as integer）必考7. Timer8. Current X, Current Y9. RGB 颜色格式10. 算法 数组排序 ， 最大公约数和最小公倍数11. 文件操作12. 通用对话框（编程题里出现较多）13. static 变量14. 表达式的计算 必考15. MouseDown和MouseUp16. 数组之Redim语句17. 列表框 List 18. 整除 取余， 必考的笔试编程题 常见考点：计算多项表达式 文件操作（最大值等） print write利用数组 求最大值和最小值以及平均值等 利用函数进行计算。机试常见考点：Msgbox Isnumeric 质数判断 实验指导手册里的内容 焦点 剪贴板VB程序设计语言复习提纲VB语言内容 VB的基本概念对象、属性、方法、事件、事件过程工程 工程的组成（工程文件、窗体文件、模块文件、类模块文件）VB程序的运行机制VB集成开发环境（三种运行模式、各种窗口的特点）基本数据类型 关键字类型符占字节数前 缀大小范围字节Byte无1B0255逻辑类型Boolean无2FTrue或False（-1或0）整型Integer%2i-32,76832,767长整型Long&4L-2,147,483,6482,147,483,647单精度实数Single！4S-3.402823E+383.402823E+38双精度实数Double#8Dbl-1.79769313486E+3081.79769313486E+308字符型String$与串长有关Str065535个字符日期类型Date无8Dt1/1/10012/31/9999对象类型Object无4Obj任何对象变体内型Variant无Vnt上述有效范围之一运算符 算术运算符 +（加）、-（减）、*（乘）、/（除）、（幂方）、（整除）、Mod（求余）关系运算符 小于、大于、=大于或等于、=等于、不等于逻辑运算符NOT（逻辑非，单目运算符）、AND（逻辑与）、OR（逻辑或）字符串运算符+（连接运算），&（连接运算），注意两者的区别。表达式算术表达式（要注意正确书写VB表达式）关系表达式，逻辑表达式，字符串表达式，VB语言内容语句赋值语句 = 定义常数/变量Const / Dim, Static, Public, Private分支语句IfElseEnd If Select Case. End Select 循环语句 ForNext ，Do while/Until LoopDo Loop while/Until WhileWend跳转语句 Goto, Exit For/Do/Sub/Funtion/调用语句Call 装入/删除窗体Load /UnLoad 文件操作语句Open,Close,Print,Write,Input,Line InputFilecopy,Kill,Name,Chdrive,Mkdir,Chdir,Rmdir其它Option Base, Option Explicit, Randomize, Rem ,End数组定长数组Dim A(20) As Integer变长数组Dim a() As Integer ReDim A(10)过程子过程Sub 子过程名（参数表）/ End Sub函数子过程 Function 函数名（参数表）As 数据类型/ End Function参数的传递传递数值, 传递地址, 数组作函数参数过程、变量的作用域过程模块级，全局级变量局部变量、窗体/模块变量、全局变量静态变量用Static定义的局部变量常用内部函数 数学函数Sin、Cos、Abs、Sqr、Log、Exp、Sgn、Int、Fix、Rnd、Tan字符串函数Trim、Left、Right、Len、Mid、Ucase、Lcase、Space、String、Ltrim、Rtrim、Instr日期/时间函数Date、Time、Year、Hour转换函数Chr、Asc、Str、Val、Hex、Oct输入输出函数InputBox、MsgBox测试函数Eof、IsNumeric、Ubound、Lbound文件操作函数Shell、LoadPicture、Lof、Input其它函数Array 、RGB、QbColor、Format、Tab、spcVB语言内容窗体及控件常用属性常用事件常用方法窗体Name，Height，Width，Left， Top，Visible，Enabled，Font（基本属性，以下大多数对象都有的）Click、LoadDbclickKeyDownKeyPressMouseDownMouseMoveUnload, PaintActivateKeyUpMouseUpClsShowHideMove PrintScaleLine Circle,PsetCaption，AutoRedraw CurrentX，CurrentY，MaxButton，MinButton，Picture，Backcolor，FillColor， ScaleLeft，ScaeMode，ScaleTop，ScaleWidth，WindowState，StartUpPositionFillStyle、ForeColor命令按钮Caption，Default，StyleCancel,Index,TabIndex,TabStop,ValueClickMove标签框Caption，Alignment, BackStyle， AutosizeClickDblclickRefresh文本框Text,Alignment, MaxLength, PasswordCharMultiline,ScrollBarsSelText,SelStart,SelLengthBackColor ,ForeColorChangeClickKeyPressGotFocusLostFocusSetFocusRefresh单选框Caption，Value，Alignment,Click复选框Caption，Value，Alignment,Click框架CaptionClick列表框Text, List,ListCount,ListIndex,Sorted,MultiSelect,Selected,NewIndexClickDblclickAddItemClearRemoveItem组合框Text,Style，List,ListCount,ListIndex,Sorted,NewIndexClickDblclickChange滚动条Max,min,Value,LareChange,SmallChangeChange,Scroll图形框AutoRedraw， Autosize，CurrentX,，CurrentYPicture，Backcolor，FillColor， ScaleLeft，ScaeMode，ScaleTop，ScaleWidth，ClickDblclickClsMove PrintScaleLine Circle,Pset影像框Picture，StretchClickDblclickMoveVB语言内容窗体及控件直线控件DrawMode,BorderStyle,BorderWidth形状控件Shape,DrawMode, ForeColor，FillColor，FillStyle驱动器列表框Dirve,Index, List,ListCount,ListIndexChange目录列表框Path,Index, List,ListCount,ListIndex,MultiSelectChangeClick文件列表框Path, Patern, Index, List,ListCount,ListIndex, Selected, MultiSelectClick DblClick计时器Enabled, Interval, IndexTimer通用对话框DialogTitleShowOpen打开Action（=1）,FileName,FileTitle,Filter, FilterIndex ,InitDir另存为Action（=2）,FileName,FileTitle,Filter, IilterIndex ,InitDir,DefaultExtShowSave 颜色Action（=3），ColorShowColor字体Action（=4）, Color, Flags,Max,minFontName,FontSize,FontBoldShowFont打印Action（=5）, Copies,ShowPrinter帮助Action（=6）,HelpCommandShowHelp菜单Caption,Checked,Enabled,Index,VisibleClick文件操作顺序文件 打开操作（读/写）关闭随机文件 打开操作（读/写）关闭二进制文件 打开操作（读/写）关闭绘图缺省坐标系统、用户自定义坐标系统（Scale方法）绘图方法Line, Circle, Pset数据库概念数据库结构，关系数据库、数据表、记录、字段、关键字、索引控件Data控件属性：Caption、Connect、DatabaseName、DataSource、DataField Recordset、RecordsetType(Table、Dynaset、Snapsort)方法：MoveFirst、MoveLast、MoveNext、MovePrevious、Delete AddNew、Refresh、UpdateRecord、UpdateControls二级上机测试中VB程序设计及程序调试样题浙江省计算机等级考试（二级VB）上机测试的程序设计题，从2002年秋季开始，其题型及考试要求都有较大变化。要求考生在老考生目录中，按照题目要求，自己新建一工程文件Design.Vbp，按题目要求完成界面设计和编写相应事件代码。程序设计题的操作步骤如下：1考生在单击“回答”按钮后，便可启动Visual Basic6.0系统，同时运行考生目录中的Design.exe文件，以便考生设计时随时同程序设计要求最终效果比较。2程序界面设计，要求考生设置窗体指定的一些属性，在窗体添加控件，并设置控件的某些属性。3编写程序代码，根据题目的要求，在代码窗口中编写相应事件的程序代码，调试运行程序使其程序的运行效果与运行Design.exe的效果相同。4将工程以文件名“Design.Vbp”，窗体以文件名“Design.Frm”保存在考生文件夹中。注意：界面设计中，以默认方式命名控件，从左至右，从上向下的顺序拖放控件。在调试过程中，考生可通过运行考生目录下的Design.exe文件来查看程序的最终效果。把自己完成的程序运行效果同它比较，若有不同，再次检查你的界面设计和程序代码是否正确，使程序运行效果与Design.exe运行结果相同。下面是计算机等级考试（二级Visual Basic程序设计）上机测试的程序设计样题。如果学生要上机做这些试题，由于你的计算机中没有Design.EXE文件，你可自己启动Visual Basic6.0系统，新建一标准EXE工程，按题目的要求设计界面、添加所需控件并设置相关属性，编写相应事件代码，使其程序运行结果能实现题目的要求。（一）程序设计题1请参考Design.exe程序的运行结果，新建一个工程，完成“添加与删除”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“添加与删除”，固定边框。（2）在窗体中引入一个文本框Text1，再在文本框的下面引入一个列表框List1，列表框内容中有四项，分别为“Word、Excel、PowerPoint、Outlook”。（3）单击“添加”按钮（Command1），将文本框中的内容加到列表框中的第一题，如果文本框中没有内容，则给出提示“没有内容，不予添加”。（4）单击“删除”按钮（Command2），将选中表项删除，如果没有选择要删除的表项，则给出提示“请选择删除的项目”。（5）其他界面设计参考Design.exe程序运行效果，如图2-1所示。图2-1 “添加与删除”程序运行结果2请参考Design.exe程序的运行结果，新建一个工程，完成“加法器”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“加法器”，固定边框。（2）在窗体上从到下依次引入Text1、Text2、Text3三个文本框，三个文本框的对齐方式均为右对齐。（3）上面两个文本框用于输入加数，要求不接受非数字键（4）下面一个文本框用于显示和，它不能进行编辑操作。（5）单击“=”按钮（Command1），将两个加数的和显示在下面一个文本框中。（6）单击“清空”按钮（Command2），三个文本框内容都被清空，同时第一个文本框获得焦点。（7）其他界面设计参考Design.exe程序运行效果，如图2-2所示。图2-2 “加法器”程序运行效果3请参考Design.exe程序的运行结果，新建一个工程，完成“字幕滚动”程序设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“字幕滚动”，固定边框。（2）在属性窗口中将标签(Label1)的标题设为“祝您考试成功”，字体设置为“宋体”、字形为“粗体”、大小为“二号”、文字颜色为“红色”。（3）单击“开始”按钮，标签文字在定时器控制下自动地从左向右移动，移动速度为每个时间间隔右移100缇，当标签移动到窗体外时，再从窗体的左边进入，同时“开始”按钮变为“停止”按钮。（4）单击“停止”按钮，标签“祝您考试成功”文字停止滚动。同时，“停止”按钮变为“开始”按钮。（5）定时器（Timer1）的时间间隔为0.1秒。（6）其他界面设计参考Design.exe程序运行效果，如图2-3所示。图2-3 “字幕滚动”程序运行效果4请参考Design.exe程序的运行结果，新建一个工程，完成“改变字号”程序设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“改变字号”，固定边框。（2）窗体的下部有一个水平滚动条Hscroll1，它的取值范围为12，72。（3）窗体的上部有一个标签Label1,标题为“心想事成”，格式设置为在窗体中水平居中对齐。（4）水平滚动条的上有一个标签Label2,标题为“字号”，标签的旁边有一个文本框Text1,文字内容为“12”，Text1最多接受两个字符。（5）改变滚动条可以控制标签文字的大小，并同时在文本框Text1中显示标签文字的大小改变后的字号。（6）在文本框Text1中输入一个属于12，72的两位整数后，也可以改变标签文字的大小，并同时调整水平滚动条的滚动框位置；如果输入的数据不在上述范围内，则不起作用（要求用Text1的Change事件实现）。（7）要求以上两种改变字号的操作要保持标签Label1在窗体中水平居中。（8）其他界面设计参考Design.exe程序运行效果，如图2-4所示。图2-4 “改变字号”程序运行效果5请参考Design.exe程序的运行结果，新建一个工程，完成“字幕闪烁”程序设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“字幕闪烁”，固定边框。（2）在属性窗口中将标签(Label1)的标题设为“祝您考试成功”，字体设置为“宋体”、字形为“粗体”、大小为“二号”、文字颜色为“红色”。格式设置为在窗体中水平居中对齐。（3）单击“开始”按钮，标签文字在定时器控制下自动交替以红兰两种颜色显示。同时“开始”按钮变为“停止”按钮。（4）单击“停止”按钮，标签文字停止闪烁。同时，“停止”按钮变为“开始”按钮。（5）定时器（Timer1）的时间间隔为0.3秒。（6）其他界面设计参考Design.exe程序运行效果，如图2-5所示。图2-5 “字幕闪烁”程序运行效果6请参考Design.exe程序的运行结果，新建一个工程，完成“图片欣赏”程序设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“图片欣赏”，固定边框。（2）窗体上有驱动器列表框（Drive1）、目录列表框（Dir1）和文件列表框（File1）三个控件，要求三个控件能够联动。（3）窗体的右半部有一个图像框Image1，将它的Stretch属性设置为True。（4）设置文件列表框只显示*.bmp和*.jpg类型的图片文件。（5）单击文件列表框上的图片文件名时，图片显示在图像框中。（6）其他界面设计参考Design.exe程序运行效果，如图2-6所示。图2-6 “图片欣赏”程序运行效果 7请参考Design.exe程序的运行结果，新建一个工程，完成“拨号盘”程序设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“拨号盘”，固定边框。（2）窗体的上边有一个文本框Text1，设置为最多接受10个字符；Font；宋体、粗体、三号；文字颜色为兰色。（3）用命令按钮数组Command1(0)Command1(9)构成数字键，数字键标题正好和命令按钮数组的下标一致。单击数字键按钮，将拨号的内容显示在文本框中。（4）单击“重拨”按钮（Command2），再现原来的拨号过程；（提示：再现过程由定时器实现）。（5）定时器（Timer1）的时间间隔为0.5秒。（6）其他界面设计参考Design.exe程序运行效果，如图2-7所示。图2-7 “拨号盘”程序运行效果 8请参考Design.exe程序的运行结果，新建一个工程，完成“作图”程序设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“作图”，固定边框。（2）窗体的右边是一个图片框Picture1，用于显示图形。（3）单击“坐标系”按钮（Command1），将图片框的坐标系统设置为原点在中央，X轴-10，10，Y轴-10，10，并在图片框中画出该坐标系统示意图。（4）单击“扇形”按钮（Command2），在图片框中画一个圆心在原点，半径为5，圆周为红色，线宽为2，内部为绿色，起始角为/6，终止角为5/6的扇形。（5）单击“结束”按钮（Command3），程序结束运行，（6）其他界面设计参考Design.exe程序运行效果，如图2-8所示。图2-8 “作图”程序运行效果 9请参考Design.exe程序的运行结果，新建一个工程，完成“反弹球”程序的设计。将工程文件以Design.vbp、窗体文件以Design.frn保存到考生目录下，具体要求如下：（1）窗体的标题为“反弹球”，固定边框。（2）设计两个菜单项，nnustart的标题为“启动”，nnustop的标题为“停止”。（3）在窗体中引入一个形状控件Shapel，形状为圆，贺半径为500Twios,填充色为红色。（4）第一次单击菜单“启动”，圆球先向右上角方向运动，碰壁后改变方向。每年时间间隔水平方向改变量bx和垂直方向改变量by都是100Twips。（5）单击菜单“停止”，圆球停止运动。再单击菜单“启动”，圆球继续运动。（6）定时器（timerl）的时间间隔为0.1秒。（7）其他界面设计参考Design.exe程序运行效果，如图2-9所示。图2-9 “反弹球”程序运行效果10请参考Design.exe程序的运行结果，新建一个工程，完成“健康称”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“健康称”，固定边框。（2）窗体的左边有两个标签，Label1的标题为“身高”、Label2的标题为“体重”；它们的旁边分别有两个文本框，Text1用于输入身高、Text2用于输入体重；在文本框的右边有两个标签，Label3的标题为“cm”，Label4的标题为“kg”。（3）将两个文本框文字对齐方式均设置为右对齐，最多接受3个字符。（4）两个文本框均不接受非数字键。（5）单击“健康状况”按钮(Command1)，根据计算公式将相应的提示信息显示在标签Label5中。计算公式为：标准体重=身高-105；体重高于标准体重*1.1为偏胖，提示“偏胖，注意节食”；体重低于标准体重*0.9为偏瘦，提示“偏瘦，增加营养”；其他为正常，提示“正常，继续保持”。（6）其他界面设计参考Design.exe程序运行效果，如图2-10所示。图2-10 “健康称”程序运行效果 11请参考Design.exe程序的运行结果，新建一个工程，完成“电子钟”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“电子钟”，固定边框。（2）设计两个定时器，Timer1用于显示系统时间，时间间隔为一秒；Timer2用于判断闹钟时间，时间间隔为0.5秒，Timer2设置为不可用。（3）窗体的上半部是标签Label1，用于显示时间，设置Label1的Font为：宋体、粗体、二号，背景白色，文字居中对齐，固定边框。（4）窗体的下半部有一个标签Label2，标题为“闹钟时间：”；Label2的右边是文本框Text1。（5）在文本框中输入闹钟时间并按回车后，启动判断闹钟时间的定时器Timer2，如果Label1显示的时间超过那种时间，则标签Label1的背景色按红白两色交替变换。（6）其他界面设计参考Design.exe程序运行效果，如图2-11所示。图2-11 “电子钟”程序运行效果 12请参考Design.exe程序的运行结果，新建一个工程，完成“改变大小”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“改变大小”，固定边框。（2）窗体上引入一个红色的圆形形状控件（Shape1），圆的直径为3400Twips。（3）窗体的下面有一个水平滚动条Hscroll1，将它的最大值设置为与圆的直径相同，初始值为最大值，SmallChange和LargeChange均为100Twips。（4）水平滚动条的下面有两个标签控件，Label1的标题为“圆直径为：”，Label2的标题为“3400”，两个标签均为固定边框。（5）改变滚动条的值可以控制圆形的直径，同时在标签Label2中动态显示圆形的直径。（6）要求圆形直径在变化时要保持圆心位置不变。（7）其他界面设计参考Design.exe程序运行效果，如图2-12所示。图2-12 “改变大小”程序运行效果 13请参考Design.exe程序的运行结果，新建一个工程，完成“点餐”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“点餐”，固定边框。（2）窗体上有一个框架Frame1，标题为“菜单”。框架内有复选框数组提供选择三种套餐，Check1(0)的标题为“儿童套餐13元”，Check1(1)的标题为“标准套餐18元”，Check1(2)的标题为“商务套餐25元”。框架的右边有一个标签Label1，标题为“份数”，标签的下面是文本框控件数组，从上到下依次为Text1(0)、Text1(1)和Text1(2)，文本框中都没有内容，并且都不能使用。（3）在复选框中进行了选择操作后，相应的文本框才能输入并自动获得焦点；如果取消选择，那么相应的文本框内容立即清空并且不能使用了。（4）要求文本框在输入时只接受数字键。（5）单击“确定”按钮(Command1)，统计点餐的金额，并用消息框显示出来。（6）其他界面设计参考Design.exe程序运行效果，如图2-13所示。图2-13 “点餐”程序运行效果 14请参考Design.exe程序的运行结果，新建一个工程，完成“编辑”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“编辑”，固定边框。（2）窗体是上半部是一个文本框Text1，可以多行显示文字。（3）文本框的下面从左到右依次排列4个命令按钮（Command1、Command2、Command3和Command4），标题分别为“复制”、“剪切”、“粘贴”和“删除”。（4）编写各命令按钮的单击事件，分别实现“复制”、“剪切”、“粘贴”和“删除”功能。（5）其他界面设计参考Design.exe程序运行效果，如图2-14所示。图2-14 “编辑”程序运行效果 15请参考Design.exe程序的运行结果，新建一个工程，完成“字体设置”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“字体设置”，固定边框。（2）窗体的上边有一个文本框Text1，文字内容为“心想事成”。（3）文本框下面的左边有一个标签Label1，标题为“字体：”，标签下面是一个简单组合框Combo1，有三项内容，分别是“宋体、黑体、楷体-GB2313”，单击时文本框的字体进行设置。（4）文本框下面的右边有一个标签Label2，标题为“大小：”，标签下面是一个简单组合框combo2，有八项内容，分别是“10、12、16、20、24、36、48、72”，单击时对文本框的文字大小进行设置。（5）其他界面设计参考Design.exe程序运行效果，如图2-15所示。图2-15 “字体设置”程序运行效果 16请参考Design.exe程序的运行结果，新建一个工程，完成“倒计时”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“倒计时”，固定边框。（2）窗体的左边有一个框架Frame1，标题为“选择时间”；框架内有一组单选钮控件数组，从上到下为Option1(0)、Option1(1)和Option1(2)，标题分别为“1分钟”、“5分钟”和“10分钟，默认选择为1分钟。（3）窗体的右边有一个标签Label1，用于显示倒计时的剩余的时间，标签Label1设置为：宋体、粗体、三号，文字居中对齐，固定边框。（4）单击“开始计时”按钮(Command1)后，程序根据选择的时间开始倒计时，同时命令按钮变为不可使用，框架也不可使用。（5）但当剩余时间到0分0秒时，改为显示“时间到！”。（6）定时器Timer1的时间间隔为1秒。（7）其他界面设计参考Design.exe程序运行效果，如图2-16所示。图2-16 “倒计时”程序运行效果 17请参考Design.exe程序的运行结果，新建一个工程，完成“替换”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“替换”，固定边框。（2）窗体的上半部是一个文本框Text1，可以多行显示文字。（3）文本框Text1的下面有一个标签Label1，标题为“查找：”，标签Label1的右边是一个文本框Text2，可以在Text2中输入查找内容。（4）标签Label1的下面有一个标签Label2，标题为“替换为：”，标签Label2的右边是一个文本框Text3，可以在Text3中输入替换为的内容。（5）单击“替换”按钮(Command1)，对文本框Text1中与查找内容匹配的文字进行替换操作。（6）其他界面设计参考Design.exe程序运行效果，如图2-17所示。图2-17 “替换”程序运行效果18请参考Design.exe程序的运行结果，新建一个工程，完成“偶数迁移”程序的设计。将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“偶数迁移”，固定边框。（2）窗体的左边有一个标签Label1，标题为“两位正整数：”，标签的下面是一个列表框List1。（3）窗体的右边有一个标签Label2，标题为“偶数：”，标签的下面是一个列表框List2。（4）单击“产生”按钮（Command1），计算机产生10个两位正整数放入列表框List1中。同时清空列表框List2中的内容。（5）单击“-”按钮（Command2），将列表框List1中所有偶数迁移到列表框List2中。（6）其他界面设计参考Design.exe程序运行效果，如图2-18所示。图2-18 “偶数迁移”程序运行效果（二） 程序调试程序调试题的操作步骤是：（1）建立一标准EXE工程，将这一模块程序添加到工程中。如果你是通过双击标准模块程序Model1.BAS进入Visual Basic系统的，则首先需要添加一个窗体模块。（2）将该标准模块程序Model1.BAS中代码的指定的错误修改正确或在指定的空位填上适当的语句，并在窗体模块中编写代码（常常写在窗体的Click()事件中）调用标准模块中的Sub过程或用户自定义函数（如果在标准模块程序Model1.BAS有多个过程或函数，要注意调用的先后顺序，否则得不到正确结果），调试运行程序，使其能输出正确结果。（3）按试题要求保存工程。如果你的计算机中没有模块程序Model1.BAS，你必需先自己新建一工程，再添加一个默认标准模块，将题目所附的参考程序输入（可复制粘贴），将其中用-n-（n为1，2，3，4，5）部分删除后改为合适的内容或将用* 错误n * 标示的下一语句中的错误改正，然后调试运行程序使其达到该题目的要求。1已有一模块文件Modify.Bas。该模块中的Summary过程是用于计算1!+2!+.+20!，并打印出计算结果，但不完整，请在横线上填入必要的内容，使其完整。Modify.Bas模块中的nFactor函数过程用于计算n!。 程序如下：Public Function nFactor(ByVal n As Integer) As Double Dim i As Integer Dim temp As Double -1- For i = 1 To n temp = temp * i Next i nFactor = -2-End FunctionPublic Sub summary() Dim sum As Double Dim i As Integer Dim n As Integer n = 20 For i = 1 To n sum = sum + -3- Next i Form1.Print sum= & -4-End Sub2已有一模块文件Modify.Bas。该模块中的Calculate过程是产生100个0，99范围内的随机整数，统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数并打印出来。 程序如下：Public Sub calculate() Dim a(1 To 100) As Integer Dim x(1 To 10) As Integer Dim i As Integer, p As Integer 产生100个0，99范围内的随机整数 每行10个打印出来 For i = 1 To 100 * 错误1 * a(i) = Rnd * 100 If a(i) 10 Then Form1.Print Space(2); a(i); Else Form1.Print Space(1); a(i); End If If i Mod 10 = 0 Then Form1.Print Next i 统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数 并将统计结果保存在数组x(1),x(2),.,x(10)中，将统计结果打印出来 For i = 1 To 100 * 错误2 * p = In