VisualBasic教案-程序设计基础.ppt

第二章 VB程序设计基础,面向对象程序设计基础 VB 语言基础 基本控制结构 常用函数 过程 常用算法,夯实基础,乘胜前进,一.面向对象程序设计基础,2.对象 3.类 4.VB中的类和对象及其应用 1）窗体和常用控件 2）VB中对象的属性设置 3）VB中对象的事件 4）VB中对象的方法,1.程序设计方法概述,面向过程,面向对象,HOW TO DO,WHAT TO DO,1.程序设计方法概述,功能,数据,2.对象的概念,型号颜色功率,启动加速停止,对象是具有某些特征的具体事物(实体)。是代码和数据的集合,计算机技术基础 IVisual Basic 6.0,*对象的建立和编辑,建立 选定 复制 删除 命名,对象的属性、事件和方法,属性(Property)事件(Event)事件过程（程序）和事件驱动 方法(Method),-对象的三要素,属性用于描述对象，方法让对象做一些动作，而对象动作时常会引起事件,3.类的概念,类是创建对象实例的模板，是同种对象的集合与抽象。,实际上，类是一种新的数据类型；类的一组属性和方法定义了类的界面，它封装了用于类的全部信息。,计算机技术基础 IVisual Basic 6.0,*对象和类的关系,帐户上的顾客想做什么？,类是对多个对象的抽象，对象是类的一个实例。,存款、取款、转帐,4.VB中的类和对象,标准控件类,控件对象,计算机技术基础 IVisual Basic 6.0,窗体和常用控件,窗 体 Form：窗体是个特例，它即是类也是对象。常用控件：标签 Label 文本框 Textbox 命令按钮 Command Button,1)窗体和常用控件,A.窗体（Form）,Name 名称属性 Caption 标题属性 Height、Width、Top 和Left 大小位置属性 BackColor ForeColor 属性 Pictrue 属性 MaxButton MinButton 属性 Enabled 属性,常用属性：常用事件：Click Dbclick Load主要方法：Cls Move Print,不能作为输入信息的界面；一般不需要编写事件过程；常用属性：Caption，Font，Left，Top等。,B.标签（Label）,在窗体中显示某些文本,C.文本框（Text Box）,常用属性：Text(无Caption)常用事件：Change，KeyPress，LostFocus,GotFocus主要方法：SetFocus 形式：对象.SetFocus(将焦点移到文本框),文本的输入、编辑和显示,D.命令按钮（Command Button）,常用属性：Caption,Style(0标准 1图形),Picture,ToolTipText（设置当鼠标在控件上停留时显示的文本）常用事件：Click,建立实现命令的按钮,E.基本属性,控件的属性和设置是学习VB的主要内容之一,Name 名称属性 Caption 标题属性 Height、Width、Top 和Left 大小位置属性 Enabled 属性 Visible 属性 控件默认属性,2）VB中对象的属性设置,属性是用来描述和反映对象特征的参数。对象中的数据就保存在属性中。属性设置方法：（1）利用属性框直接设置；（2）在程序代码中通过赋值实现，格式为：对象.属性属性值 例：label1.caption=“education for all-around development”,例：Caption素质教育,3）VB中对象的事件,事件就是发生在对象上的事情。在VB中，系统为每个对象预先定义好了一系列的事件。VB应用程序设计的主要工作就是为对象编写事件过程中的程序代码。形式如下：Sub 对象名_事件（参数表）事件过程代码 End Sub 控件是代表一定功能的对象，代码是实现应用程序功能的具体过程和说明。,*事件驱动程序设计（1）,在传统的面向过程的应用程序中，代码的执行是从第一行开始，随着程序流执行代码的不同部分。程序执行的先后次序由设计人员编写的代码决定，用户无法改变。在VB中，程序等待某个事件的发生，然后执行该事件过程，之后再等待新事件的发生。这就是事件驱动程序设计方式。因此，应用程序每次运行时的代码路径可能都不同。,无头无尾,*事件驱动程序设计（2）,VB程序的执行步骤如下：启动应用程序，装载和显示窗体；窗体（或控件）等待事件的发生；事件发生时，执行对应的事件过程；重复执行步骤 2）和 3），直至End语句。,VB是以事件驱动作为运行机制的新一代可视化程序设计语言,4）VB中对象的方法,当某个行为作用在对象时，称对象执行了一个方法。方法定义了一系列的计算步骤。在VB中，已将一些通用的过程和函数编写好并封装起来，作为方法供用户直接调用。对象方法的调用格式：对象.方法 参数名表其中，若省略了对象，表示为当前对象，一般指窗体。,方法是面向对象的，调用时一定要用对象。,方法（Method）是在对象上执行指定操作的过程和函数,常用方法Print,对象.Print Spc(n)|Tab(n)表达式列表;|,其中：对象：可以是窗体(Form)、图形框(PictureBox)或 打印机(Printer)，若省略则为窗体。Spc(n)函数：输出n个空格，可重复使用。Tab(n)函数：定位于第n列。表达式列表：若省略则输出空行，多个表达式之间用 空格、逗号、分号分隔，也可出现Spc和Tab函数。,标准格式与;紧凑格式 行尾符号(有，；不换行),常用方法Cls,Cls方法用于清除运行时 在窗体或图形框中显示的内容：对象.Cls 注意：1）Cls方法只在运行时起作用，设计时不清除；2）Cls方法使用后，CurrentX,CurrentY属性被设置为0。,常用方法Move,Move方法用于移动窗体或控件，并可改变其大小：对象.Move 左边距离,上边距离,宽度,高度 其中：对象：除时钟、菜单外的所有控件，省略时为窗体。移动量：以twip为单位，1twip=1/20点=1/567厘米。,二.VB程序设计语言基础,1.VB语言基本概念 2.数据类型 3.常量和变量 4.表达式 5.编码规则,1.VB语言基本概念,1)标识符,2)运算符,1)标识符,标识符是为变量、常量、数据类型、过程、函数和类定义的名字。规则如下：必须以字母或汉字开头，后跟字母、数字、下划 线，中间不能空格；VB中不区分大小写；长度不能超过255个字符；不能和VB中已有的关键字相同。例如：3xy；y-z;wang ping;Dim等都不可；Cos；sin等也不好，易混淆。,2)运算符,Visual Basic中运算符包括:赋值运算符 数学运算符 关系运算符 逻辑运算符。,A.赋值运算符：,格式：variable=value variable可以是变量、数组的元素、变长数组或运行时可写的对象的属性；（不能是数值、常量和表达式）value可以是 常量、变量、表达式或函数调用；赋值号两端数据类型应匹配。sin(x)=x+y x=y=z=1（错误）sum=sum+1（常用）,算术运算符：,-(负),*,/（除）,（整除）,Mod（取余）,+,（减）结合顺序都是从左到右；可以通过圆括号改变运算优先级和结合顺序。将数字字符或逻辑型自动转换为数值型。例：30True（31）（true-1,false 0）,B.数学运算符,字符串运算符：&和“”：两边操作数应均为字符型。（能计算则计算）“&”：先将操作数转换为字符型再连接。例：“12000”+12345(=24345),“abc”&123(=abc123)“120”+“123”(=120123),“120”&”123”(=120123)“abc”+123(=出错),120&123”(=120123),“123”+120&100(=243100),优先级低于数学运算符；各个关系运算符的优先级相同，结合顺序从左到右；双目运算，结果为True（1）或False（0）；若操作数是字符型，则按字符的ASCII码值(A 65)比较；汉字字符大于西文字符。Like与通配符？、*、等结合使用，用于模糊查询。常用于条件语句和循环语句。,C.关系运算符,=,=,=,Like（字符串匹配）,Is（对象应用比较）,D.逻辑运算符,逻辑运算用于判断操作数之间的逻辑关系，结果为True或False。逻辑运算符的优先级低于数学运算符和关系运算符；优先顺序为：Not、And、Or、Xor（异或）、Eqv（等价）、Imp（蕴含）。Not、And、Or 常用于将多个关系表达式进行逻辑判断。用逻辑运算符对数值进行运算时，以数字的二进制值逐 位进行逻辑运算。例：12 And 7（=100）1100 0111,2.数据类型(Data Type),数值数据类型：Integer（）、Long（&）、Single（！）、Double（#）、Currency（）和 Byte（字节型）字符数据类型（String）：表示空字符串，表示有一个空格；用连续两个双引号表示字符串中的双引号。变体数据类型（Variant）：未定义变量的默认数据类型。对象数据类型（Object）日期数据类型（Date）逻辑数据类型（Boolean）,3.变量与常量(Variable and Constant),变量是被命名的内存单元，即保存数据的内存区域。命名：遵从标识符命名原则，采用易读、易懂的方式。声明：用Dim语句显式声明 Dim 变量名 As 类型 类型声明不能共用，例如：Dim a,b,c,As Integer；可以在变量名后加类型符代替 As 类型；对于Boolean型变量，缺省值为False；用Type语句声明自定义变量类型不鼓励隐式声明,常量程序运行时，不变的数值和字符串。自定义常量：Const 符号常量名 As 类型=表达式 1)已声明常量，只能引用，不能改变；2)常量声明的同时被赋值 3)可以指定数据类型；,4.表达式,由变量、常量、运算符、函数和圆括号按一定规则组 成，运算结果的类型由数据和运算符共同决定。书写规则：1）乘号不能省略；2）括号必须成对出现；3）表达式从左到右在同一基准上书写，无高低、大小之分；不同数据类型的转换：数据精度采用精度高的数据类型，即：Integer 字符运算符关系运算符逻辑运算符,5.编码规则,VB代码不区分字母的大小写语句书写自由同一行多条语句之间用“:”分隔；在行尾加入续行符“下划线_和空格”后，单条语句可分为若干行书写;一行最多写255个字符。注释有利于程序的维护和调试注释行以Rem开头，或用“”开始直接写在语言后；也可使用“编辑”工具栏中的“设置注释块”等命令。尽量少用行号与标号,三.基本控制结构,顺序结构 选择结构 循环结构 其它辅助控制语句,1.顺序结构,赋值语句 人机交互函数和过程,A.表达式类型与变量类型不同时的处理(1)表达式为数值型而与变量精度不同时，强制转换成左边 变量的精度；n%=3.5(4)(2)表达式是数字字符串，左边变量是数值类型，自动转换 成数值类型再赋值，但表达式有非数字字符或空串时，则出错；n%=“123”(123)n%=“1a23”(出错)(3)当逻辑型赋值給数值型时，Ture转换成-1，False转换成 0。反之数值型赋值給逻辑型时，非0转换成True,0转换成False。(4)任何非字符类型赋值給字符类型，自动转换成字符类型,以左边变量类型为准,1)赋值语句,(1)赋值号和关系运算符等于号相同，在条件表达式中出现的是等号，否则是赋值号；(2)赋值号左边只能是变量，不能是常量 常数 符号或表达式；(3)不能在一条语句中，同时給多个变量赋值；Dim x%,y%,z%x=y=z=1(4)常用：Sum=Sum+x n=n+1,B.应用注意事项,2)人机交互函数和过程,InputBox()函数：InputBox(提示,标题,默认,x坐标位置,y坐标位置),例：Dim strName As String*40,strs1 As String*40 strs1=请输入您的姓名+Chr(13)+Chr(10)+然后单击确定 strName=InputBox$(strs1,输入框,100,100),提示：不能省，为字符串表达式。默认：字符串表达式，无输入时以此为输入内容,MsgBox()函数和MsgBox过程：变量%=MsgBox(提示,按钮,标题)MsgBox 提示,按钮,标题,例：MsgBox(“脚数小于头数的倍数，重新输入”),“按钮”设置值及意义：,0 只显示“确定”按钮1 显示“确定”“取消”按钮2 显示“终止”“重试”“忽略”按钮3 显示“是”“否”“取消”按钮4 显示“是”“否”按钮5 显示“重试”“取消”按钮,16 关键信息图标 红色STOP标志32 询问信息图标？48 警告信息图标！64 信息图标i,1确定 2取消 3终止 4 重试 5忽略 6是 7否,MsgBox函数返回所选按钮整数值的意义：,资料,2.选择结构,Select Case 语句 条件函数,If 条件语句,1)If条件语句,If Then 语句(单分支结构):1)IfThen End If,2)IfThen,1）IfThen Else End If,If Then Else 语句(双分支结构)：,2)IfThen Else,If Then ElseIf 语句(多分支结构),If 语句的嵌套,IfThen ElseIfThen Else End If,2)Select Case 语句,Select Case 变量或表达式 Case 表达式列表 1 Case 表达式列表 2 Case Else End Select,“变量或表达式”：可以是数值型或字符串表达式,“表达式列表I”：与“变量或表达式”的类型必须相同，可以是以下四者之一：1.表达式 2.一组用逗号分隔的枚 举值 3.表达式1 to 表达式2 4.Is关系运算符表达式,3)条件函数,#I I f()函数:I I f(表达式，当条件为True时的值，当条件为False时的值)如：求x、y中大的数，放在Tmax变量中，语句为，Tmax=I I f(xy,x,y),#Choose()函数：Choose(整数表达式，选项列表)如：根据Nop是14的值，转换成 运算符的语句为，Op=Choose(Nop,),3.循环结构,For 循环语句：For 循环变量 初值 to 终值 Step 步长 Exit For Next 循环变量,循环体,Do Loop 循环语句：,Do While/Until Exit Do Loop Do Exit Do Loop While/Until,循环的嵌套,While-条件为真时执行循环体；Until-条件为假时执行循环体,前测型,后测型,4.其它辅助控制语句,Go To 语句：形式：GO To 标号/行号,Exit 语句：Exit For(Do/Sub/Function)End 语句:End If(Select/While/Type/)With 语句:With 对象 语句块 End With,With MyLabel.Height=2000.Width=2000.FontSize=22.Caption=“This is MyLabel”End With,四.常用函数,数学函数 字符串函数 转换函数 日期函数 其他函数,Sin(x),Cos(x),Tan(x),Atan(x),Log(x),Exp(x),Sqr(x),Abs(x)Hex$(x),Oct$(x),Rnd(x),Int(x),Fix(x),注意：1)Sin(x),Cos(x),Tan(x)的自变量及Atan(x)的返回值为弧度；2)Hex$(x),Oct$(x)分别以字符串的形式返回x的十六和八 进制值，x的值带小数时采取四舍五入的方法先变为整数；3)凡函数名后有$符号的，表示函数返回值为字符串数；4)取整函数Int(x),Fix(x)的异同：去掉小数返回整数，当x为负数时，Int(x)返回小于负数的负整数，Fix(x)返回大于负数的负整数。,1.数学函数,5)随机函数Rnd(x),产生一个大于或等于0小于1的单精度数。常用形式：Int(Rnd*范围+基数）-产生一定范围的随机整数 例如：A.产生30，50之间的随机整数（包括30，50）x=Int(Rnd*21+30)B.产生=1且=6的随机整数 Myvalue=Int(Rnd*6+1)也可写成：Int(upper-lower+1)*Rnd+lower)upper:为随机整数上限 lower：为随机整数下限 注意：包含上下限的值。为什么？,1).InStr(起始位置，字符串1，字符串2，比较类型)查找，返回字符串2在字符串1中第一次出现的位置；比较类型：0或缺省区分大小写，1不区分 2).LTrim$(字符串)3).RTrim$(字符串)4).Trim(字符串)去掉字符穿左、右、左右空格 5).Left$(字符串，个数)6).Right$(字符串，个数)取出字符串左边、右边指定个数的字符 7).Mid$(字符串，起始位置,个数)-取出指定个数的字符 8).Len(字符串和字符串变量)-一个汉字和一个字母一样为1,2.字符串函数,举例：表4-8P88,9).Ucase$(字符串)-小写转大写，其它字符不变 10).Lcase$(字符串)-大写转小写，其它字符不变 11).Space$(个数)-返回指定个数的空字符串 12).String(个数，字符)-返回重复字符的字符串 当“字符”为串时，用其第一个字符,Str$(数值表达式)Val(字符串),Chr(66)B Asc(B)66 Asc(Chr(99)99 Chr(Asc(K)K Ucase$(abcdefg)ABCDEFG,Chr$(N)ASCII码值转换成字符 Asc(C)字符转换成ASCII码值,例如：,3.转换函数,4.日期函数,Time返回系统时间、Date返回系统日期、Now返回系统日期和时间 Hour 返回时间值、Day返回日期值、DateAdd（要增减日期形式，增减量，要增减的日期变量）如：DateAdd(“ww”,2,#2/14/2000#)结果为：#2/28/2000#DateDiff（要间隔日期形式，日期1，日期2）如 求离你毕业还有多少天：DateDiff（“d”,date,#07/01/2007#）假定2007年毕业,日期形式：,yyyy 年、q 季、m 月、y 一年的天数、d 日、w 一周的日数、ww 星期、h 时、n 分、s 秒,1)判断函数：Iff(表达式，真部分，假部分)2)格式输出函数 Format$(表达式,格式字符串)数值格式化；日期和时间格式化；字符串格式化 3)Shell()函数 调用应用程序 Shell(命令字符串,窗口类型),窗口类型值为1表示正常窗口，缺省窗口最小化为图标,5.其它函数,Shell函数举例:,i=Shell(c:windowscalc.exe“，1),j=Shell(c:,1),五.过程,Sub 子过程：定义方法：代码窗口，添加过程对话框；调用方式：过程名 参数1，参数2;Call 过程名(参数1，参数2)Function 函数过程 看成一个数，放在赋值号右端；直接作为参数出现在调用过程或函数中 Property 属性过程 Event 事件过程,过程是构成程序的一个模块，完成一个相对独立的功能，使程序更清晰，更具结构性。,六.常用算法,累加 连乘:累加性赋值语句，Sum=Sum+I;连乘性赋值语句，t=t*I 循环变量应在循环体外赋初值，t=1 sum=0 求素数:对于m从I=2,3,4,m-1判别m能否被I整除，只要有一个能 整除，m就不是素数，否则m是素数。,穷举法：也称为“枚举法”，即用循环实现一 一测试各种情况，判断是否满足条件 递推法：又称为“迭代法”，即把一个复杂的 计算过程转化为简单过程的多次重复。每次重复都从旧值的基础上递推 出新值，并由新值替代旧值。求最大值或最小值：假设一个数为极值的初值，然后逐一比较，若非极值，替换极值，依次逐一比较。,1.累加：求1至100的5的倍数或7的倍数的和。2.连乘：计算3到10的乘积。3.求素数：求100以内的素数。4.穷举法：百元买百鸡问题。假定小鸡每只5角，公鸡每只2元，母鸡每只3元。现在有100元钱要求买100只鸡，编程列出所有的购鸡方案。5.递推法：猴子吃桃子。小猴在一天摘了若干个桃子，当天吃掉一半多一个；第二天接着吃了剩下的桃子的 一半多一个；以后每天都吃尚存桃子的一半多一个，到第7天早上要吃时只剩下一个了，问小猴那天共 摘下了多少个桃子？6.求极值：有一根长度为321m的钢材料，要将它截取成两种规格的短料，规格a、b的长度分别为17m和27m，每种至少1段，分割成a、b各多少段后，剩余的残料r最少？,算法练习,VB程序设计基础(小节),过程 常用函数 常用算法,基本控制结构 顺序 条件 循环,面向对象程序设计基础 VB语言基础,标识符 运算符 数据类型 常量和变量 表达式 编码规则,