vb第一讲

第一讲：总体复习一、重点应复习的知识点1、Print语句2、Int函数和Rnd函数3、If语句（重点是多分支块IF语句的结构，详见例1）4、Do-Loop循环5、For循环（必考）6、多重循环（循环嵌套）（必考）7、数组的排序8、二维数组（必考）9、参数传递(必考)10、函数过程的编写(编程题)11、列表框和组合框12、定时器13、鼠标和键盘事件14、图形方法15、顺序文件的读写操作二、重点掌握的题型（设计题题型）1、分段函数（选择结构）2、累加和计算（如：）3、多重循环的使用（如金字塔图形的输出等）4、杨辉三角（用一维数组和二维数组分别实现，上机题）5、数组排序（结合到其它题目中去）6、函数与过程（程序阅读题、程序设计题）7、控件综合8、图形方法9、鼠标、键盘事件（例如KeyPress事件、MouseUp、MouseDown等）10、顺序文件的读写操作三、内容介绍（一）If语句主要格式：（其它格式、特别是嵌套形式要能看懂）If条件表达式1Then语句块1［ElseIf条件表达式2Then语句块2］┇［ElseIf条件表达式NThen语句块N］［Else语句块N+1］EndifIf部分ElseIf部分ElseIf部分Else部分例1：编程，用Inputbox输入X的值，在窗体上打印出下列分段函数Y值。5ln5552sin51232xxxxxxxxxyx注意：用嵌套格式和If-Elseif的格式分别实现。（二）For循环For循环控制变量＝初值To终值[Step步长]语句块[ExitFor]语句块Next循环控制变量例2：计算数学表达式PrivateSubFormClick()DimnAsInteger,pAsInteger,sAsSigle,qAsIntegerDimiAsIntegern=InputBox(请输入N的值:)s=0：p=-1：q=1‘设置初值Fori=1Tonp=-p:q=q*i‘设置分子和分母的通项式s=s+p/qNextiPrintsEndSub（三）DoLoop循环Do…Loop语句的使用格式有以下两种。1．形式1（当型循环）：DoWhile条件语句块[ExitDo]语句块Loop2．形式2（直到型循环）：DoUntil条件语句块[ExitDo]语句块Loop循环体!11!41!31!2111nn循环体循环体Do语句块[ExitDo]语句块LoopWhile条件循环体Do语句块[ExitDo]语句块LoopUntile条件循环体注意：只有当控制变量的初值和终值确定时，可以用For循环。NextI语句执行后，I会自动加上步长，Do循环中需要类似I=I+1的语句来反映控制变量的变化。例3：编程计算：S=1*2*3*…*10PrivateSubCommand1_Click()'I为循环变量，控制循环次数，同时取得各单项；累积变量S存放结果DimSAsSingle,IAsIntegerS=1'累积前变量S赋初值为1I=1'单项取得初值DoUntilI10S=S*I'累积单项I=I+1'取得下一个单项LoopPrintS=;SEndSub注：该道例题不要仔细讲了，直接让学生看程序代码，主要让学生理解Do循环的格式以及与For循环的区别。（四）多重循环常见题型：水仙花数、金字塔图形等（具体见书上）例4：打印由数字组成的如下所示金字塔图案。98887777766666665555555554444444333332221代码详见VB文件。注意：通过此题，进一步向学生提示如何解决图形问题。先找规律，找出每行空格数和字符个数规律，再通过两个循环来控制输出。（五）一维数组数组的解题步骤大致如下：数组的定义－赋初值－引用及输出例5：数组的排序格式（务必记住）：第一种：（选择排序）Fori=1Ton-1Forj=i+1TonIfa(i)a(j)Thent=a(i):a(i)=a(j):a(j)=tEndIfNexti,j第二种：（改进的选择排序法）循环体Fori=1Ton-1k=iForj=i+1TonIfa(k)a(j)Thenk=jNextjIfa(i)a(k)Thent=a(i):a(i)=a(k):a(k)=tEndIfNexti第三种：（冒泡排序）Fori=1Ton-1Forj=1Ton-iIfa(j)a(j+1)Thent=a(j):a(j)=a(j+1):a(j+1)=tEndIfNextj,I注意数组的应用（如数组元素的插入、删除、移动等）。（六）二维数组参看书上例6.4。（七）函数与过程（重点是参数传递）（1）Function过程的创建：[PrivatePublic][Static]Function函数名（[参数列表]）[As数据类型]）[局部变量和常数声明][语句块][函数名=表达式]EndFunction（2）Function过程的调用调用Function过程的语法如下：Function过程名（[实在参数表]）（3）Sub过程的创建：[PrivatePublic][Static]Sub函数名（[参数列表]）[As数据类型]）[局部变量和常数声明][语句块]EndFunction（4）Function过程的调用有以下两种方法：Call过程名(实在参数表)过程名[实参1[,[实参2---]]（5）参数的传递.按值传送参数参数格式：ByVal形参名as类型名特点：形参另行分配单元，形参值的改变不影响实参值。按地址传送参数参数格式：[ByRef]形参名as类型名特点：形实共用单元，形变实也变。（6）常量变量的作用域与生存周期：变量的作用域：全局变量（Public或者Global）、模块级变量（Private或者Dim）、局部变量（Dim，只能在模块内部自己使用）模块级变量和Static静态变量一样，都能保留上次运行后的结果例6：写出下列程序运行时，单击命令按钮控件Command1后窗体上的显示结果。PrivateFunctionf1(nAsInteger)AsIntegerStaticiAsIntegerWhilei=nf1=f1+i:i=i+1WendEndFunctionPrivateFunctionf2(ByValn1AsInteger,n2AsInteger)AsIntegerDimiAsIntegerDoWhilen2=n1f2=f2+n2:n2=n2-1LoopEndFunctionPrivateSubCommand1_Click()DimaAsInteger,bAsIntegerPrintf1(3)Printf1(5)a=5:b=8Printf2(a,b)Printf2(b,a)EndSub给学生仔细分析阅读流程。（八）文本框属性属性；Height，Left，Text，Name，Top，Visible，Width，Multiline，PasswordChar，ScrollBars，Selstart，SelLength，SelText等事件：KeyDown，KeyPress方法：SetFocus注：重点复习文本框的Keypress事件。（九）复选框和单选按钮的value属性和单击事件（十）列表框和组合框熟练掌握列表框和组合框的下列属性；Height，Index，Left，List，ListCount，ListIndex，Name，Style（组合框），Text，Top，Selected（列表框），Width，Sorted等。掌握列表框和组合框的其它常用属性；熟练掌握列表框和组合框的Click事件；掌握列表框和组合框的其它常用事件；熟练掌握列表框和组合框的AddItem，Clear和RemoveItem等方法。注：书上的列表框和组合框的例题需详细查看（十一）滚动条重点掌握滚动条的下列属性；Max，Min，Value，LargeChange，SmallChange等。掌握滚动条的Change和Scroll等事件；（十二）定时器（比较重要）掌握计时器的常用属性；Enabled，Interval，Left，Name，Top，Visible等。掌握计时器的Timer事件。熟练掌握定时器结合其它控件的综合应用（十三）鼠标和键盘事件（重在理解，不要硬记格式）（十四）对话框和菜单（主要会出现在上机题中）掌握通用对话框的Action属性和Show方法，如何添加对话框掌握菜单的设计（十五）图形（1）图形控件（自行复习）（2）坐标系：相对坐标：Left：左上角顶点的横坐标Top：左上角顶点的纵坐标Width：控件宽度Height：控件高度自定义坐标（只有Picture、Form等容器控件等有）：ScaleLeft、ScaleTop、ScaleWidth、ScaleTopScale方法：（只有容器控件有）格式：容器名.Scale（x1,y1）-(x2,y2)以（x1,y1）为左上角，以（x2,y2）为右下角，用户自定义坐标系（3）图形方法（非常重要，应记住各种方法的格式）1、Pset：画点语法：[object.]pset(x,y)[,color]2、Point：返回指定位置的颜色值。格式：Point(x,y)该函数的返回值为点(x,y)的颜色值。3、颜色函数RGB（r，g，b），三个参数的取值都为0-255QBColor(Color)；Color参数的取值为0-15注意红色、蓝色、绿色的多种表示方式。如红色：vbred，rgb(255,0,0)等。4、画线、矩形方法Line⑴画线①格式1：[容器名.]Line[(x1,y1)]-(x2,y2)[,Color]分别以两点作为起始点和终点画直线。②格式2：[容器名.]Line[(x1,y1)]-Step(x2,y2)[,Color]所绘制直线的两个端点位置为(x1,y1)和(x1+x2,y1+y2)。若省略（x1,y1）起始点，则从上一条直线的终点处开始画直线。（无上一条直线时，直接从原点处开始画直线）请在VB上演示画直线的几种不同形式。(2)矩形与填充矩形容器名.line[step](x1,y1)-[step](x2,y2),[color],b[f]B：表示将两个坐标点作为一对对角顶点坐标画出矩形。F：只有B出现后才能出现。Color参数为线条即边框的颜色。有B没有F：矩形用当前的fillcolor和fillstyle填充。有B也有F：矩形用边框的颜色填充。5、圆、圆弧与椭圆方法Circle画圆Object.circle(x,y),radius[,color]X,y：表示圆心的坐标Radius：表示圆的半径Color：圆的颜色画圆弧Object.circle(x,y),radius[,color],start,end如Start和end为正的弧度数，画出一段圆弧；如为负数，则画出一段扇形。画椭圆Object.circle(x,y),radius[,color],[start],[end],aspectAspect：纵横比。表示垂直长度和水平长度比。Aspext1时，radius表示的是水平方向的x半径。Aspect＝1时，radius表示的是垂直方向的y半径。注意如果想省掉参数，其逗号是不可以事略的。在VB上演示画圆、圆弧、扇形和椭圆的图形。例7：用图形绘制方法在图片框中画出一个坐标系和一个扇形，具体要求如下，效果如图所示。代码详见VB文件。（十六）顺序文件的读写对顺序文件操作的一般顺序是：打开文件——读写文件——关闭文件⒈打开、关闭文件⑴打开文件格式：OpenFilenameForMode[LockLock_level]As[#]File_numbInput：打开文件、只读，文件不存在则显示出错信息。Output：打开文件、只写，文件不存在则新建文件、否则刷新文件。Append：打开文件、在文件末尾追加数据，文件不存在则新建文件。⑵关闭文件结束访问文件后，应关