VB总复习(2011年).ppt

VB程序设计,总复习,考试说明,考试时间：2011-7-7星期四考试地点：考试形式：闭卷考试（150分钟）,考试题型（笔试闭卷60%）1.选择题(40分)2.填空题(20分)包括程序及结果填空3.判断题(10分)4.编程题(30分)编程题选自实验CF中的15题中，经过小变动而来.以4.常用算法内容为主,不考的章节:第5章：第5.4自定义类型及数组第6章：第6.4过程的嵌套和递归调用第7.210章,4.常用算法：(出现在填空题、判断题、编程题中)随机数的生成！累加、累乘、求平均值、排序求最大值、求最小值、以及它们的位置求素数、求水仙花数、菲波纳契数列求最大、最小公约数。统计字符个数等,1.VB应用程序（工程文件）的组织结构,VB应用程序由三种模块组成:窗体模块(Form)(文件扩展名.frm)标准模块(Module)(文件扩展名.bas)类模块(Class)(文件扩展名.cls),关系：,第一、二章,1.3VB集成开发环境,工具箱,窗体设计窗口,属性窗口,工程资源管理器窗口,代码窗口,菜单栏,工具栏,P5,1.3创建应用程序的过程,1、建立用户界面的对象。2、对象属性的设置。3、对象事件过程编程。4、运行与调试程序。5、保存程序。,P13P15,7保存一个VisualBasic的应用程序，应当保存工程文件以及与工程有关的窗体或标准模块等文件。（P16）,6.程序的运行及调试（P16）,5.Vb的工作状态（三种模式:设计、运行和break）（P）,8.生成可执行文件VB程序的执行方式有两种:解释方式和编译方式（P17）,2.1VB对象的概念,2.1.1对象和类对象指现实世界中的实体。每个对象有自己的特征(属性)、行为(方法)和发生在该对象上的活动(事件)。,类是对同一种对象的集合与抽象。类是创建对象实例的模板，对象则是类的一个实例。类包含所创建对象的属性数据，以及对这些数据进行操作的方法。封装和隐藏是类的重要特性，将数据结构和对数据的操作封装在一起，类的内部实现细节对用户来说是透明的。,VB中的类和对象,VB工具箱中的可视图标是VB系统设计好的标准控件类。通过将控件类实例化，得到真正的控件对象。实例化方法:在窗体上画一个控件，就将类转换为对象，即创建了一个控件对象。,VB是一种面向对象的可视化程序设计语言，采取了_的编程机制。P5特点(2)A)事件驱动B)按照过程顺序执行C)从主程序开始执行D)按模块顺序执行,练习,2.假如一个VisualBasic应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序，以下正确的操作是_。P1617A）只保存窗体模块文件。B）分别保存窗题模块、标准模块和工程文件。C）只保存窗体模块和标准模块文件。D）只保存工程文件。D)面向过程、顺序驱动,A,B,3.以下不属于VB工作模式的是_模式。A）设计B）编译C）运行D）中断,练习,4.对象的三要素为_、_、_,B,5.VB是一种面向对象的可视化程序设计语言，采取了_的编程机制.,事件驱动,6.运行程序时，程序中的所有语句都要运行一次或多次()。,练习,7.VB中的事件只能由用户引发()。,8.在VB中开发每个应用程序都被称为工程，工程是组成一个应用程序的文件集合()。,属性存放对象的数据(决定对象外观及功能)。对象属性的设置方法：设计阶段利用属性窗口直接设置属性值程序运行时通过语句：对象名.属性名=属性值例如：Command1.Caption=确定注意：若属性只能在设计阶段设置，在程序运行阶段不能改变，称为只读属性。,2.1.2对象的属性、事件和方法,事件：发生在对象上的事情.,VB为对象预先定义了一系列的事件。,事件过程：应用程序处理事件的步骤.应用程序设计的主要工作就是为对象编写事件过程的代码。事件过程的形式如下：Sub对象名_事件(参数)事件过程代码EndSub,方法,面向对象的程序设计语言，为程序设计人员提供了一种特殊的过程和函数，称为方法。方法是面向对象的，调用时一定要指明对象。对象方法的调用格式为：对象.方法参数名表若省略对象，表示当前对象，一般指窗体。例如：Text1.SetFocus此语句使Text1控件获得焦点，光标在本文框内闪烁。,通用属性Name名称属性创建的对象名称,有默认的名.在程序中，控件名是作为对象的标识而引用，不会显示在控件上。Caption标题属性该属性决定了控件上显示的内容。Enabled属性控件是否可操作.当设置为false时,呈暗淡色,禁止用户进行操作,Visible属性控件是否可见.当设置为false时,用户看不到，但控件本身存在。,7.窗体1属性:name，Caption,Picture,BoderStyle.,2事件:Load:窗体被装入时自动执行该事件，通常用于对属性和变量初始化Click:单击事件DblClick:双击事件，连续按两次鼠标键发生该事件。3方法:Print：用于在窗体或图形框中显示文本。Cls：在窗体或图形框中清除运行时产生的图形和文本。Move：移动一个窗体或控件。,8.标签用于显示文本(输出)信息，不能作为输入信息的界面。也就是说标签控件的内容只能由Caption属性来设置。1属性:Caption,Font,Left,Top,BoderStyle.2事件:Click:单击事件DblClick:双击事件，连续按两次鼠标键发生该事件3方法:Move:移动控件，或改变其大小。.Move,9.文本框文本编辑区域，可在该区域输入，编辑和显示正文内容。1属性:Text,Maxlength,MultiLine,ScrollBars,Locked,PasswordChar2事件:Change:当改变文本框的Text属性或者用户输入新内容时会引发该事件.KeyPress：KeyAscii参数是所按键的ASCII码。LostFocus:当控件失去焦点时发生.GotFocus:当控件获得焦点时发生.3方法:SetFocus:把光标移到指定的文本框对象中。格式：对象.SetFocus,6.命令按钮1属性:Name,Caption,Style,Picture.2事件:Click、KeyDown、KeyUp、MouseDown、MouseUpKeypress3方法:SetFocus:将焦点定位到命令按钮上。格式：对象.SetFocuseg:Command1.SetFocus,1.文本框没有_属性。P31识记表2.3A）EnabeldB）CaptionC）VisibleD）BackColor,练习,2.下列中不是属性的是：A.captionB.textC.ClickD.picture,B,C,3.以下叙述中正确的是_P24对象名称的作用A.窗体的Name属性指定窗体的名称，用来标识一个窗体B窗体的Name属性的值是显示在窗体标题栏中的文本C可以在运行期间改变对象的Name属性的值D对象的Name属性值可以为空,练习,4.要将用户在文本框Text1中所选择的文本赋值给变量a，应书写语句_,A,a=Text1,5.在VB中最基本的对象是_，它是应用程序的基石，是其他控件的容器.,Form窗体,练习,6.当对命令按钮picture属性装入.bmp图形文件后，命令按钮上并没有显示所需的图形，原因是没有将_属性设置为1（Graphical）P34,Style,7.如果要使命令按钮Command1上显示文字“退出(X)”，并以Alt+X为快捷键，则其Caption属性应设置为：_。,退出(“您上机”“您上机”NextEndSub,排序,PrivateSubCommand1_Click()Dima(),n%,i%,j%,t%,k%a=Array(8,6,9,3,2,7)n=UBound(a)Fori=0Ton-1双重循环找最小值下标k=iForj=i+1TonIfa(j)a(j)Then前项比后项大t=a(i):a(i)=a(j):a(j)=t交换值EndIfNextNextFori=0TonPrinta(i);NextEndSub,选择法排序,冒泡法排序,插入数据,插入数据基本思想是：1）首先查找待插入数据在数组中的位置k；2）申请一个位置空间，然后从最后一个元素开始往前直到下标为k的元素依次往后移动一个位置；3)第k个元素的位置腾出，将数据插入。,Dima(),i%,k%,x%,n%a=Array(1,4,7,9,12,23,56)n=UBound(a)x=14Fork=0TonIfxnThenMsgBox(找不到此数据):ExitSubFori=k+1Ton将x后的元素左移a(i-1)=a(i)比较与插入数据程序的差异Nextin=n1数组元素减少一个ReDimPreservea(n)Fori=0Ton显示删除后的各数组元素Printa(i);Nexti,1.在VB中把一组具有同一名字、不同下标的下标变量称为_。A）同类数据B）数组C）变量数组D）变量,练习,2.若用Dima(10)AsInteger语句声明了数组a，以下语句中错误的是_。P99下标的形式A）a(9)=a(-6)B）a(1)=56C）a(8)=a(1)+a(3)D）a(1)=a(8)-34,B,A,3.对于动态数组a，如果需要重新定义大小，并保留原有数据，可使用语句_。P101注意A）DimB）ReDimC）DimPreserveD）ReDimPreserve,D,4.1个二维数组可以存放1个矩阵。在程序开始有语句OptionBase0,则下面定义的数组中正好可以存放1个4X3矩阵。（即只有12个元素）的是（）。Dima(-2To0,2)AsIntegerDima(3,2)AsIntegerC)Dima(4,3)AsIntegerD)Dima(-1To-4,-1To-3)AsInteger,练习,B,练习,5.在窗体上面1个名称为Command1的命令按钮，然后编写下列事件过程OptionBase1PrivateSubCommand1_Click()Dima(5,5)AsIntegerFori=1To5Forj=1To5a(i,j)=(i+j)*510为数组元素赋值，如a(2,3)=(2+3)*510=2NextjNextis=0Fori=1To5s=s+a(i,i)求对角线之和NextiPrintsEndSub程序运行后，单击命令按钮，输出结果是()。A)15B)13C)11D)9注明：本题的关键是正确计算出各个数组元素值，求对角线之和,A,6.在任何情况下，数组下标总是从0开始()。P99下标的形式,练习,7.任何类型的动态数组都可以利用Array函数赋值()。P103Array函数,8.欲在数组a中删除某个元素，试完善下列程序。P108109例5.8PrivateSubCommand1_Click()Dima(),i%,k%,x%,n%a=Array(1,4,7,9,12,14,23,56)n=_x=Val(InputBox(输入要删除的数x:)Fork=0TonIf_NextkIfknThenMsgBox找不到此数据:ExitSubFori=k+1Ton_=a(i)NextiPrint删除后：;ReDimPreservea(n1)Fori=0ToUbound(a)Printa(i);Nexti,UBound(a),x=a(k)ThenExitFor,a(i-1),第六章过程,一.过程的概念VB的程序是由一个个过程构成的，除了VB系统提供的大量使用的内部函数过程(Function)和事件过程(Sub)外，VB系统还允许用户根据各自需要自定义过程。二.两类过程定义与调用函数过程Function()As=ExitFunction=EndFunction,调用形式:函数过程名(实参表)特点：函数过程名有值，有类型，在过程体内至少赋值一次。调用时不能独立存在，必须参加表达式的运算。子过程Sub子过程名(参数列表)局部变量或常数定义语句语句块1ExitSub语句块2EndSub调用形式:Call子过程名(实参表)或:子过程名实参表特点:子过程名无值，无类型。调用时可以是一句独立的语句。,三.参数传递值传递（ByVal）:将实参的具体值单向地传递给形参，调用结束后形参值的改变不会影响实参的值。相对应的实参可以是常数或表达式。2.地址传递（ByRef）将实参在内存的地址传递给形参，数据传递是双向的，即调用时实参将值传递给形参，调用结束后由形参将操作结果返回给实参。即形参值的改变会改变实参的值。当实参要得到返回结果时，实参只能是变量，不能是常量或表达式。,3数组参数的传递只能通过传址方式进行传递。注意：在实参和形参中写数组名(）被调过程可通过Lbound和Ubound函数确定实参数组的下、上界,6.1.3函数过程的调用,SubForm_ClickDimx%,y%,z%x=124:y=24z=gcd(x,y)Print最大公约数是;zEndSub,程序运行流程,Functiongcd(m%,n%)AsIntegerIfm0r=mModn：m=n：n=rLoopgcd=mEndFunction,在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimaAsSingle,bAsSinglea=15:b=12CallS(a,b)Printa,bEndSub,读程序,写运行结果,SubS(ByValx!,y!)Dimt!t=xx=t/yy=tModyPrintx,yEndSub,1.253153,注明：本题关键,x传值，y传地址，x的值不影响a，y的值影响b,必须重点关注的实例P127例6.2求最大公约数的函数过程P128例6.3的变形编一过程，统计字符串中汉字和字符的个数及长度,编一过程，实现下图中统计字符串中汉字和字符的个数及长度,PrivateSubCommand1_Click()Dimsum0AsString,sum1%,sum2%sum0=“”:sum1=0:sum2=0初始化sum0=UCase(Text1.Text)将字符串中小写字母转换成大写CallCountC(sum0,sum1,sum2)Printsum0,共&Len(sum0)&个字符输出Printsum1&“个字母”输出统计结果Printsum2&“个汉字EndSub,SubCountC(ByVals0AsString,s1%,s2%)Dimi%,j%Fori=1ToLen(s0)判断并统计字符个数IfAsc(Mid(s0,i,1)65AndAsc(Mid(s0,i,1)=0Then出错处理代码lstOptional.AddItemlstSelected.TextlstSelected.RemoveItemlstSelected.ListIndexElseMsgBox请先选择项目,友情提示EndIfEndSub,PrivateSubcmdToAllright_Click()Dimi%Fori=0TolstOptional.ListCount-1lstSelected.AddItemlstOptional.List(i)NextlstOptional.ClearEndSubPrivateSubcmdToAllLeft_Click()Dimi%Fori=0TolstSelected.ListCount-1lstOptional.AddItemlstSelected.List(i)NextlstSelected.ClearEndSub,PrivateSublstOptional_DblClick()lstSelected.AddItemlstOptional.TextlstOptional.RemoveItemEndSubPrivateSublstSelected_DblClick()lstOptional.AddItemlstSelected.TextlstSelected.RemoveItemEndSub,7.3.1滚动条,滚动条的属性,滚动条的事件,注意：1、通过代码改变Value属性的值，也会触发Change事件2、当拖动滑块时，会不停地触发Scroll事件，当拖动结束时，会触发一次Change事件,例7.3计算018之间某个数的阶乘，数据由滚动条获得。,滚动条举例,PrivateSubhslInteger_Change()Dimn%,s&,i%n=hslInteger.Values=1Fori=1Tons=s*iNextlblFactorial=n&！=&sEndSub,又称定时器控件。用于有规律地定时执行指定的工作，常常用于编写不需要与用户进行交互就可直接执行的代码，如计时、倒计时、动画等。在程序运行阶段，时钟控件不可见。,7.5计时器（Timer）,计时器的属性,计时器的事件,注意：1、常常将需要定时执行的操作放在Timer事件过程中2、计时器工作的必要条件：Interval0Enabled=True,1.利用水平滚动条的数字可以为某种基本颜色调出256种色彩，此时水平滚动条的Min和Max应该设置为_。A）0，255B）0，256C）1，255D）1，256,练习,2.在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timerl，要求每一秒钟在文本框中显示一次当前的时间。程序为：PrivateSubTimerl-()TxtTime.text=TimeEndSub在下划线上应填人的内容是()AEnabledBVisibleC.IntervalDTimer,A,D,3.在窗体上画两个单选按钮，名称分别为Optionl、Option2，标题分别为“宋体”和“黑体”；一个复选框，名称为Checkl，标题为“粗体”；一个文本框，名称为Textl，Text属性为“改变文字字体”。要求程序运行时，当“宋体”单选按钮和“粗体”复选框被选中，能够实现上述要求的语句序列是()AOptionl.Value=TrueBOptionl.Value=TrueCheckl.Value=FalseCheckl.Value=TrueC.Option2.Value=FalseDOptionl.Value=TrueCheckl.Value=TrueCheckl.Value=1,练习