【文档说明】VisualBasic教案-程序设计基础课件.ppt，共(67)页，1.167 MB，由小橙橙上传

转载请保留链接：https://www.ichengzhen.cn/view-44916.html

以下为本文档部分文字说明：

计算机技术基础I——VisualBasic6.0第二章VB程序设计基础※面向对象程序设计基础※VB语言基础※基本控制结构※常用函数※过程※常用算法夯实基础乘胜前进计算机技术基础I——VisualBasic6.0一.面向对象

程序设计基础2.对象3.类4.VB中的类和对象及其应用1）窗体和常用控件2）VB中对象的属性设置3）VB中对象的事件4）VB中对象的方法1.程序设计方法概述计算机技术基础I——VisualBasic6.01.程序设计方法概述2.对象的概念属性＋行为对象=型号颜

色功率启动加速停止对象是具有某些特征的具体事物(实体)。是代码和数据的集合计算机技术基础I——VisualBasic6.0计算机技术基础I——VisualBasic6.0*对象的建立和编辑建立选定复制删除命名计算机技术基础I——VisualBasic6.0对象的属性、事件和方法

属性(Property)事件(Event)事件过程（程序）和事件驱动方法(Method)------对象的三要素属性用于描述对象，方法让对象做一些动作，而对象动作时常会引起事件3.类的概念类是创建对象实例的模板，是同种对象的集合与抽象。抽象对象1对象2对象

n类汽车类实际上，类是一种新的数据类型；类的一组属性和方法定义了类的界面，它封装了用于类的全部信息。计算机技术基础I——VisualBasic6.0计算机技术基础I——VisualBasic6.0*对象和类的关

系数据＋操作帐户类类是对多个对象的抽象，对象是类的一个实例。存款、取款、转帐4.VB中的类和对象标准控件类控件对象计算机技术基础I——VisualBasic6.0窗体和常用控件计算机技术基础I——VisualBasic6.0◇窗体Form：窗体是个特例，它即是类也是对

象。◇常用控件：标签Label文本框Textbox命令按钮CommandButton1)窗体和常用控件计算机技术基础I——VisualBasic6.0A.窗体（Form）Name名称属性Caption标题属性Height、

Width、Top和Left大小位置属性BackColorForeColor属性Pictrue属性MaxButtonMinButton属性Enabled属性☆常用属性：☆常用事件：ClickDbclickLoad☆主要方法：C

lsMovePrint计算机技术基础I——VisualBasic6.0不能作为输入信息的界面；一般不需要编写事件过程；常用属性：Caption，Font，Left，Top等。B.标签（Label）在窗体中显示某些文本计算机技术基础I

——VisualBasic6.0C.文本框（TextBox）☆常用属性：Text(无Caption)☆常用事件：Change，KeyPress，LostFocus,GotFocus☆主要方法：SetFocus形式：[对象.]SetFocus(将

焦点移到文本框)文本的输入、编辑和显示计算机技术基础I——VisualBasic6.0D.命令按钮（CommandButton）常用属性：Caption,Style(0标准1图形),Picture,ToolTipText（设置当鼠标在控件上停留时显示的文本）常用事件：Click建立实现命令的

按钮计算机技术基础I——VisualBasic6.0E.基本属性控件的属性和设置是学习VB的主要内容之一Name名称属性Caption标题属性Height、Width、Top和Left大小位置属性Enabled属性Visible属性控件默认属性计算机技术基

础I——VisualBasic6.02）VB中对象的属性设置属性是用来描述和反映对象特征的参数。对象中的数据就保存在属性中。属性设置方法：（1）利用属性框直接设置；（2）在程序代码中通过赋值实现，格式为：对象.属性＝属性值例：label1.caption=“educati

onforall-arounddevelopment”例：Caption│素质教育计算机技术基础I——VisualBasic6.03）VB中对象的事件事件就是发生在对象上的事情。在VB中，系统为每个对象

预先定义好了一系列的事件。VB应用程序设计的主要工作就是为对象编写事件过程中的程序代码。形式如下：Sub对象名_事件（[参数表]）…事件过程代码EndSub控件是代表一定功能的对象，代码是实现应用程序功能的具体

过程和说明。计算机技术基础I——VisualBasic6.0*事件驱动程序设计（1）在传统的面向过程的应用程序中，代码的执行是从第一行开始，随着程序流执行代码的不同部分。程序执行的先后次序由设计人员编写的代码决定，用户无法改变。在VB中，程序等待某个事件的发生，然后执行该事

件过程，之后再等待新事件的发生。这就是事件驱动程序设计方式。因此，应用程序每次运行时的代码路径可能都不同。计算机技术基础I——VisualBasic6.0*事件驱动程序设计（2）VB程序的执行步骤如下：1)启动应用程序，装载和显示窗体；2)窗体（或控件）等待

事件的发生；3)事件发生时，执行对应的事件过程；4)重复执行步骤2）和3），直至End语句。VB是以事件驱动作为运行机制的新一代可视化程序设计语言计算机技术基础I——VisualBasic6.04）VB中对象的方法当某个行为作用在对象时，称对象执行了一个方法。方法定义了一系列的计

算步骤。在VB中，已将一些通用的过程和函数编写好并封装起来，作为方法供用户直接调用。对象方法的调用格式：[对象.]方法[参数名表]其中，若省略了对象，表示为当前对象，一般指窗体。方法是面向对象的，调用时一定要用对象。方法（Method）是在对象上执行指定操作的过程和函

数计算机技术基础I——VisualBasic6.0常用方法－Print[对象.]Print[{Spc(n)|Tab(n)}][表达式列表][;|,]其中：对象：可以是窗体(Form)、图形框(PictureBox)或打印机(Printer)，若省略则为窗体。S

pc(n)函数：输出n个空格，可重复使用。Tab(n)函数：定位于第n列。表达式列表：若省略则输出空行，多个表达式之间用空格、逗号、分号分隔，也可出现Spc和Tab函数。,标准格式与;紧凑格式行尾符号(有，

；不换行)计算机技术基础I——VisualBasic6.0常用方法－ClsCls方法用于清除运行时在窗体或图形框中显示的内容：[对象.]Cls注意：1）Cls方法只在运行时起作用，设计时不清除；2）Cls方法使用后，CurrentX,C

urrentY属性被设置为0。计算机技术基础I——VisualBasic6.0常用方法－MoveMove方法用于移动窗体或控件，并可改变其大小：[对象.]Move左边距离[,上边距离[,宽度[,高度]]]其中：对象：除时钟、菜单外的所有控件，省略时为窗体。移动量：以twip为

单位，1twip=1/20点=1/567厘米。计算机技术基础I——VisualBasic6.0二.VB程序设计语言基础1.VB语言基本概念2.数据类型3.常量和变量4.表达式5.编码规则计算机技术基础I——VisualBas

ic6.01.VB语言基本概念1)标识符2)运算符计算机技术基础I——VisualBasic6.01)标识符标识符是为变量、常量、数据类型、过程、函数和类定义的名字。规则如下：必须以字母或汉字开头，后跟字母、数字、下划线，中间不能空格；VB中不区

分大小写；长度不能超过255个字符；不能和VB中已有的关键字相同。例如：3xy；y-z;wangping;Dim等都不可；Cos；sin等也不好，易混淆。计算机技术基础I——VisualBasic6.02)运算符VisualBasic

中运算符包括:赋值运算符数学运算符关系运算符逻辑运算符。计算机技术基础I——VisualBasic6.0A.赋值运算符：格式：variable=valuevariable可以是变量、数组的元素、变长数组或

运行时可写的对象的属性；（不能是数值、常量和表达式）value可以是常量、变量、表达式或函数调用；赋值号两端数据类型应匹配。sin(x)=x+yx=y=z=1（错误）sum=sum+1（常用）计算机技术基础

I——VisualBasic6.0算术运算符：^,-(负),*,/（除）,\（整除）,Mod（取余）,+,—（减）结合顺序都是从左到右；可以通过圆括号改变运算优先级和结合顺序。将数字字符或逻辑型自动转换为数值型。例：30－True（＝31）（true-1,false0）B.数学运算

符计算机技术基础I——VisualBasic6.0字符串运算符：&和＋“＋”：两边操作数应均为字符型。（能计算则计算）“&”：先将操作数转换为字符型再连接。例：“12000”+12345(=24345),“abc”&123(=abc123)“120”+“12

3”(=120123),“120”&”123”(=120123)“abc”+123(=出错),120&123”(=120123)“123”+120&100(=243100)计算机技术基础I——VisualBasic6.0优先级低于数学运算符；

各个关系运算符的优先级相同，结合顺序从左到右；双目运算，结果为True（－1）或False（0）；若操作数是字符型，则按字符的ASCII码值(A65)比较；汉字字符大于西文字符。Like与通配符？、*、＃

等结合使用，用于模糊查询。常用于条件语句和循环语句。C.关系运算符=,<>,>,<,>=,<=,Like（字符串匹配）,Is（对象应用比较）计算机技术基础I——VisualBasic6.0D.逻辑运算符逻辑运算用于判断操作数之间的逻辑关系，结果为True或False。逻辑运算符的优先级低于数

学运算符和关系运算符；优先顺序为：Not、And、Or、Xor（异或）、Eqv（等价）、Imp（蕴含）。Not、And、Or常用于将多个关系表达式进行逻辑判断。用逻辑运算符对数值进行运算时，以数字的二进制值逐位进行逻辑运算。例：12And7（=100

）11000111计算机技术基础I——VisualBasic6.02.数据类型(DataType)数值数据类型：Integer（％）、Long（&）、Single（！）、Double（#）、Currency（@）和Byte（字节型）字符数据类型（String）：表示空字符串，表示有一个空

格；用连续两个双引号表示字符串中的双引号。变体数据类型（Variant）：未定义变量的默认数据类型。对象数据类型（Object）日期数据类型（Date）逻辑数据类型（Boolean）计算机技术基础I——VisualBasic6.03.变量与常量(Variabl

eandConstant)变量是被命名的内存单元，即保存数据的内存区域。命名：遵从标识符命名原则，采用易读、易懂的方式。声明：1)用Dim语句显式声明Dim变量名[As类型]类型声明不能共用，例如：Dima,b

,c,AsInteger；可以在变量名后加类型符代替[As类型]；对于Boolean型变量，缺省值为False；2)用Type语句声明自定义变量类型3)不鼓励隐式声明计算机技术基础I——VisualBasi

c6.0常量程序运行时，不变的数值和字符串。自定义常量：Const符号常量名[As类型]=表达式1)已声明常量，只能引用，不能改变；2)常量声明的同时被赋值3)可以指定数据类型；计算机技术基础I——VisualBasic6.04.表达式由变量、常量、运算符、函数和圆括号按一定规则组成，

运算结果的类型由数据和运算符共同决定。书写规则：1）乘号不能省略；2）括号必须成对出现；3）表达式从左到右在同一基准上书写，无高低、大小之分；不同数据类型的转换：数据精度采用精度高的数据类型，即：Inte

ger<Long<Single<Double<Currency优先级：算术运算符>字符运算符>关系运算符>逻辑运算符计算机技术基础I——VisualBasic6.05.编码规则1)VB代码不区分字母的大小写2)

语句书写自由同一行多条语句之间用“:”分隔；在行尾加入续行符“下划线_和空格”后，单条语句可分为若干行书写;一行最多写255个字符。3)注释有利于程序的维护和调试注释行以Rem开头，或用“‘”开始直接写在语言后；也可使用“编辑”工具栏中的“设置注释块”等命令。4)尽量少用行号与标号计算机

技术基础I——VisualBasic6.0三.基本控制结构☆顺序结构☆选择结构☆循环结构☆其它辅助控制语句计算机技术基础I——VisualBasic6.01.顺序结构※赋值语句※人机交互函数和过程计算机技术基础I——VisualBasic6.0A.表达式类型与变量

类型不同时的处理(1)表达式为数值型而与变量精度不同时，强制转换成左边变量的精度；n%=3.5(4)(2)表达式是数字字符串，左边变量是数值类型，自动转换成数值类型再赋值，但表达式有非数字字符或空串时

，则出错；n%=“123”(123)n%=“1a23”(出错)(3)当逻辑型赋值給数值型时，Ture转换成-1，False转换成0。反之数值型赋值給逻辑型时，非0转换成True,0转换成False。(4)任何非字符类型赋值給字符类型，自动转换成字符类型以左边变量类型为准1)赋值语句计

算机技术基础I——VisualBasic6.0(1)赋值号和关系运算符等于号相同，在条件表达式中出现的是等号，否则是赋值号；(2)赋值号左边只能是变量，不能是常量常数符号或表达式；(3)不能在一条语句中，同时給多个变量赋值；Dimx%,y%,z%x=y=z=1(4

)常用：Sum=Sum+xn=n+1B.应用注意事项计算机技术基础I——VisualBasic6.02)人机交互函数和过程InputBox()函数：InputBox(提示[,标题][,默认][,x坐标位置][,y

坐标位置])例：DimstrNameAsString*40,strs1AsString*40strs1="请输入您的姓名"+Chr(13)+Chr(10)+"然后单击确定"strName=InputBox$(strs1,

"输入框",,100,100)提示：不能省，为字符串表达式。默认：字符串表达式，无输入时以此为输入内容计算机技术基础I——VisualBasic6.0MsgBox()函数和MsgBox过程：变量[%]=MsgBox(提示[,按钮][,标题])MsgBox提示[,按钮][,标题]例：MsgBox(

“脚数小于头数的倍数，重新输入”)计算机技术基础I——VisualBasic6.0“按钮”设置值及意义：0只显示“确定”按钮1显示“确定”“取消”按钮2显示“终止”“重试”“忽略”按钮3显示“是”“否”“取消”按钮4显示“是”“否”按钮5显示“重试”“取消”

按钮16关键信息图标红色STOP标志32询问信息图标？48警告信息图标！64信息图标i1－确定2－取消3－终止4－重试5－忽略6－是7－否MsgBox函数返回所选按钮整数值的意义：资料计算机技术基础I——VisualBasic6.02.选择结

构※SelectCase语句※条件函数※If条件语句计算机技术基础I——VisualBasic6.01)If条件语句▲If…Then语句(单分支结构):1)If<表达式>Then<语句块>EndIf2)If<表达式>Then<语

句>计算机技术基础I——VisualBasic6.01）If<表达式>Then<语句块1>Else<语句块2>EndIf▲If…Then…Else语句(双分支结构)：2)If<表达式>Then<语句1>El

se<语句2>计算机技术基础I——VisualBasic6.0▲If…Then…ElseIf语句(多分支结构)▲If语句的嵌套If<表达式1>Then<语句块1>ElseIf<表达式2>Then<语句块2>…[Else<语句块n+1>]EndIf计算机技术基础I——Vi

sualBasic6.02)SelectCase语句SelectCase变量或表达式Case表达式列表1<语句块1>Case表达式列表2<语句块2>…[CaseElse<语句块n+1>]EndSelect“变量或表达式”：可以是数值型或字符串表达式“表达式列表

I”：与“变量或表达式”的类型必须相同，可以是以下四者之一：1.表达式2.一组用逗号分隔的枚举值3.表达式1to表达式24.Is关系运算符表达式计算机技术基础I——VisualBasic6.03)条件函数#IIf(

)函数:IIf(表达式，当条件为True时的值，当条件为False时的值)如：求x、y中大的数，放在Tmax变量中，语句为，Tmax=IIf(x>y,x,y)#Choose()函数：Choose(整数表达式，选项列表)如：根据Nop是1～4的值，转换成＋－×÷运算符的语句为，Op=Choose

(Nop,’’＋’’,’’－’’,’’×’’,’’÷’’)计算机技术基础I——VisualBasic6.03.循环结构◇For循环语句：For循环变量＝初值to终值[Step步长]<语句块>[ExitFor]<语句块>Next循环变量循环体}计算机技术基础I—

—VisualBasic6.0◇Do…Loop循环语句：Do[{While/Until}<条件>]<语句块>[ExitDo]<语句块>LoopDo<语句块>[ExitDo]<语句块>Loop[{Whil

e/Until}<条件>]◇循环的嵌套While-条件为真时执行循环体；Until-条件为假时执行循环体前测型后测型计算机技术基础I——VisualBasic6.0计算机技术基础I——VisualBasic6.04.其它辅助控制语句◇GoTo语句：形式：GOTo{标号/行号}◇Exit语句：E

xitFor(Do/Sub/Function)◇End语句:EndIf(Select/While/Type/…)◇With语句:With对象语句块EndWithWithMyLabel.Height=2000.Width=2000.FontSize=22

.Caption=“ThisisMyLabel”EndWith计算机技术基础I——VisualBasic6.0四.常用函数数学函数字符串函数转换函数日期函数其他函数计算机技术基础I——VisualBasic6.

0Sin(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),T

an(x)的自变量及Atan(x)的返回值为弧度；2)Hex$(x),Oct$(x)分别以字符串的形式返回x的十六和八进制值，x的值带小数时采取四舍五入的方法先变为整数；3)凡函数名后有$符号的，表示函数返回值为字符串

数；4)取整函数Int(x),Fix(x)的异同：去掉小数返回整数，当x为负数时，Int(x)返回小于负数的负整数，Fix(x)返回大于负数的负整数。1.数学函数计算机技术基础I——VisualBasic6.05)随机函数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：为随机整数下限注意：包含上下限的值。为什么？计算机技术基础I——V

isualBasic6.01).InStr([起始位置]，字符串1，字符串2，[，比较类型])查找，返回字符串2在字符串1中第一次出现的位置；比较类型：0或缺省—区分大小写，1—不区分2).LTrim$(字符串)3).RTrim$(字符串)4

).Trim(字符串)去掉字符穿左、右、左右空格5).Left$(字符串，个数)6).Right$(字符串，个数)取出字符串左边、右边指定个数的字符7).Mid$(字符串，起始位置[,个数])---取出指

定个数的字符8).Len(字符串和字符串变量)---一个汉字和一个字母一样为12.字符串函数计算机技术基础I——VisualBasic6.0举例：表4-8P889).Ucase$(字符串)---小写转大写，其它字符不变10).

Lcase$(字符串)---大写转小写，其它字符不变11).Space$(个数)---返回指定个数的空字符串12).String(个数，字符)---返回重复字符的字符串当“字符”为串时，用其第一个字符计算机技术基础I——Visual

Basic6.0Str$(数值表达式)Val(字符串)Chr(66)"B"Asc("B")66Asc(Chr(99))99Chr(Asc("K"))"K"Ucase$("abcdefg")"ABCDEFG"Chr$(N)ASCII码值转

换成字符Asc(C)字符转换成ASCII码值例如：3.转换函数计算机技术基础I——VisualBasic6.04.日期函数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秒计算机技术基础I——VisualBasic6.01)判断函数：Iff(表达式，真部分，假部分)2)格式输出函数Forma

t$(表达式[,格式字符串])数值格式化；日期和时间格式化；字符串格式化3)Shell()函数调用应用程序Shell(命令字符串[,窗口类型])窗口类型值为1表示正常窗口，缺省窗口最小化为图标5.其它函数

计算机技术基础I——VisualBasic6.0Shell函数举例:i=Shell("c:\windows\calc.exe“，1)j=Shell("c:\command.com",1)计算机技术基础I

——VisualBasic6.0五.过程◇Sub子过程：定义方法：代码窗口，添加过程对话框；调用方式：①过程名参数1，参数2…;②Call过程名(参数1，参数2…)◇Function函数过程①看成一个数，放在赋值号右端；②直接作为参数出现在调用过程或函数中◇Property属性过程◇Eve

nt事件过程过程是构成程序的一个模块，完成一个相对独立的功能，使程序更清晰，更具结构性。计算机技术基础I——VisualBasic6.0六.常用算法累加连乘:①累加性赋值语句，Sum=Sum+I;连乘性赋值语句，t=t*I②循环变量应在循环体外赋初值，t=1sum=0求素数:对于m从I=2,3,

4,…,m-1判别m能否被I整除，只要有一个能整除，m就不是素数，否则m是素数。穷举法：也称为“枚举法”，即用循环实现一一测试各种情况，判断是否满足条件递推法：又称为“迭代法”，即把一个复杂的计算过程转化为简

单过程的多次重复。每次重复都从旧值的基础上递推出新值，并由新值替代旧值。求最大值或最小值：假设一个数计算机技术基础I——VisualBasic6.01.累加：求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最少？算法练习计算机技术基础I——VisualBasic6.0VB程序设计基础(小节)※过程※常用函数※常用算法※基本控制结构顺序条件循环※面向对象程序设计基础※VB语言基础标识符运算符数据类型常量和变量表达式编码规则