VisualBasic程序设计及应用

1、visual basic 6.0程序设计及应用授课教案课程名称：visual bas i c程序设计及应用适用专业：非计算机专业编制人：葛丽芳2010年1月23日作业及成绩评定1、自学时间安排及作业见下表:周次自学内容练习题 （教材习题）测验作业 （教材习题）选择题操作题内容1第一章vb6. 0程序开发 环境rio1, 32, 3第二章对象及操作ri62, 44第三章数据类型及其 运算ri81, 35第四章数据输入输出rio1, 2, 3操作题：2,4, 56第五章控制结构广201, 2, 4操作题：2,3, 57, 8, 9第六章常用控件ri72, 4, 6, 8,10操作题5,7, 121

2、0第七章数组rs2, 4, 6, 8操作题3,5, 9, 1011, 12第八章过程rio2, 3, 4, 5操作题6, 813笫九章界面设计（教材的9, 10章）rio rs填空题填 空题14笫十章文件l20程序设计题：1填空题15第十一章图形的绘制ri7程序设计题：1, 2填空题程 序设计题：1, 32、成绩评定以参加福建省计算机等级考试（vb二级）成绩为期末成绩福建工程学院计算机与信息科学系教案课题： 第一章visual basic 6.0程序开发环境课型：采用教具：计算机+投影仪+电子演示文稿 教学目的：学生了解和熟悉vb的ide环境，各种窗口的打开和关闭内容纲要与时间分配：共2学时v

3、b功能和特点（20分钟）窗体设计器（10分钟）工程管理器（15分钟）属性窗口 （20分钟）工具箱和窗体布局窗口（15分钟） 立即窗口（10分钟）重点与难点：vb6.0的三种工作模式的区别 各窗口的作用及打开隐藏的方法 考纲的要求教学过程（包含课堂设计、教学方法和教学思路等）:vb有以下功能和特点：1. 有面向对象的可视化设计工具2. 事件驱动的编程机制3. 提供了易学易用的应用程序集成开发环境4. 结构化的程序设计语言5. 支持多种数据库系统的访问6. active 技术7. vb6在开发环境上、网络功能等的增强8. 完备的help联机帮助功能集成开发环境在vb6的集成开发环境屮，通常显示有标

4、题栏、控制菜单图标、窗口操作按钮、菜单栏、工 具栏、窗体设计器、工程管理器、属性窗口、工具箱和窗体布局窗口。此外，还可以根据需 要打开代码窗口、调色板、对象浏览器、菜单编辑器和三个用于程序调试的窗口：立即窗口、 本地窗口和监视窗口。教学小结：设计多媒体演示文稿通过计算机和投影仪演示本次课要讲授的内容，便于学生的理解和掌 握。启发学生主动思考，促进学生自主学习、讨论学习、合作学习和实践学习的过程和收获。 刚接触vb的ide环境，不容易区別各窗口的作用。例举简单例子结合课后作业加深学 生印象。福建工程学院计算机与信息科学系教案课题： 第二章对象及其操作课型：采用教具：计算机+投影仪+电子演示文稿教

5、学目的:让学生掌握类和对象的基本概念，事件和事件驱动了解应用程序建立的步骤内容纲要与时间分配：4学吋1. 对象的概念（45分钟） 类、对象对象的建立和编辑 对象的属性、事件和方法 事件、事件过稈和事件驱动2. 建立简单的应用程序（45分钟） 建立用户界面设置对彖的属性编写相关对彖事件过稈的代码 保存和运行程3. 窗体和控件基本属性（45分钟） 窗体标签 文本框 命令按钮4. 工程的管理及坏境的设置（25分钟） 工程的组成创建、打开和保存工程 添加、删除和保存文件 环境设置5. 程序调试（20分钟）错误类型调试和排错重点与难点：对象的三要素的作用与区别对程序代码的认识和程序调试对象属性的识记考纲

6、的要求教学过程(包含课堂设计、教学方法和教学思路等):基本概念1 类类是创建对象实例的模板，包含了创建对象的属性描述和行为特征的定义.2. 对象是类的一个实例，继承了类的属性、方法。vb屮常用的对象有:窗体、控件等。.对象的建立和命名(2) .对象的三要素(i) 属性：对象的性质，即用来描述和反映对彖特征的参数。(ii) 方法：对象的行为，即将一些通用的过程编写好并封装起来，作为方法供用户直接调用。(iii) 事件：响应对象的动作称为事件，它发牛在用户与应用程序交互时。如单击控件、鼠标移动、键盘按下等。事件过程：指附在该对象上的用户编写的程序代码,是事件的处理程序。事件驱动过程：是图形用户界面

7、的本质，山用户控制而代码作出响应。3. vb程序的执行步骤如下：1) 启动应用程序，装载和显示窗体2) 窗体(或窗体上的控件)等待事件的发生；3）事件发生时，执行对应的事件过程；4）重复执行步骤（2）和（3）;5）直到遇到“end”结朿语句结朿程序的运行或按'结朿”强行停止程序的运行基本控件及属性1用属性2. 窗体的属性、事件、方法3. 标签 label用于显示文本（输岀）信息，不能作为输入信息的界面。4. 文本框textbox是一个文本编辑区域，可在该区域输入，编辑和显示正文内容。5. 命令按钮 commandbutto n接受用户输入的命令输入命令可以有三种方式：鼠标单击，tab键

8、焦点到该按钮，快捷键6常用方法方法是面向对象的，故使用的形式为：对象j方法i. print 方法ii. cis方法iii. move 方法工程的管理及环境设置1、.工程的组成工程文件包含了一个应用程序的所有文件：窗体文件（.frm）:控件及属性、事件过程和自定义过程窗体的二进制数据文件（.frx），自动产生同名.frx文件。标准模块文件（.bas）类模块的文件（.cis）资源文件（.res）activex控件的文件（.ocx）2、.创建、打开和保存工程3、添加、删除和保存文件程序调试.（1）编辑错误（2）编译错误（3）运行错误（4）逻辑错误设置断点和逐语句跟踪常见错误i. 使用中文标点符号系统

9、产生“无效字符”，以红色显示ii. 字母和数字形状相似小写字母“i”和数字“1”形式相同、小写字母“o”与数字“0”。iii. 对象名称（name）属性写错textl、text2、command*!、txtlnput txtoutput> cmdokiiii.对象的属性名错误四、典型例题例2.1height> width、top和left属性（图）.inlxifop->iwidth>例2.2控件设置:效果:默认控件名name标题 caption有关属性设置forml颜色、对齐、鼠标属 性例mousepointer=99,mouseicon=key04.icolabel

10、1左对齐alignmcnt=o, bordcrstylc = 1label2居中alignment= 1, borderstyle = 1label3自动autosize=true ,wordwarp=false ,borderstyle =1label4背景白backcoloi- &hooffffff&, borderstyle =0label5前景红forccolor= & h000000ff&, borderstyle =0五、自检题教材课后习题1、选择题广162、操作题2, 4六、学习方法介绍1通过上机操作正确理解程序设计的基本概念2标准控件的基本操作、

11、属性的设置可通过实验和上机实践进行验证。3 理解事件驱动的编程机制教学小结：控件的属性设置，属性的功能容易混淆，要提醒学生注意。 比如文本框和标签控件在设置不同属性时会在外观上显示相似。福建工程学院计算机与信息科学系教案课题： 第三章数据类型及其运算课型：采用教具：计算机+投影仪+电子演示文稿教学目的:让学生掌握编写程序的基础知识：数据类型、表达式的书写、函数的应用、内容纲要与时间分配：4学时1. 数据类型（45分钟）数值型字符型fi期型逻辑型对象型可变（variant）类型 自定义类型2. 常量（15分钟）般常量数值常量字符串常量逻辑值常量日期常量符号常量：在程序中用符号表示的常量3. 变量

12、（30分钟）命名规则 变量声明4. 表达式（45分钟）算术表达式字符串表达式日期表达式关系运算符和关系表达式布尔运算符与布尔表达式5. 常用内部函数（35分钟）数学函数 字符串函数 fi期与时间函数类型转换函数条件函数格式函数shell函数6. 编写代码（10分钟）程序语句及语法代码书写规则重点与难点：数据类型变量的作用及命名 表达式的正确书写 函数的使用 代码的正确书写教学过程（包含课堂设计、教学方法和教学思路等）：数据类型vb的基本数据类型见p45表3.1,注意它们的类型名、类型符、占用字节数和表示范围。变量与常量仁变量和常量的命名规则变量:在程序运行中其存储的值可以改变。常量:在程序运行

13、中其值不可以改变。命名规则:1、以字母或汉字开头，后可跟汉字、字母、数字或下划线组成，长度小于等于255个字符;ii. 不要使用vb中的关键字；iii. vb屮不区分变量名的大小写.iiii.为了增加程序的可读性，可在变量名前加一个缩写的前缀来表明该变量的数据类型。2、.变量声明i. 用dim语句显式声明变量ii. 隐式声明3、常量i. 用户声明常量系统提供的常量4表达式i. 组成变量、常量、函数、运算符和圆括号ii. 书写规则（1）运算符不能相邻。例a+b是错误的。(2) 乘号不能省略。例x乘以y应写成：x*y(3) 括号必须成对出现，均使用圆括号。(4) 表达式从左到右在同一基准上书写，无

14、高低、大小。iii.不同数据类型的转换运算结果的数据类型向精度高的数据类型靠.lnteger<l on g<single<double<currencyiiii.优先级算术运算符 >=字符运算符关系运算符逻辑运算5常用内部函数(1).数学函数rnd函数返回0和1 (包括0但不包括1)之间的双精度随机数. 每次运行时，耍产生不同序列的随机数，执行randomize语句.(2).转换函数chr(66)-> “b“ asc (“b”)> 66asc(chr(99)-> 99chr(asc(“k”)> “k”ucase$(”abcdefg”) -&

15、gt;uabcdefg"日期函数time返回系统时间date返回系统日期dateadd (要增减日期形式，增减量，要增减的日期变量)datediff (要间隔日期形式，日期1,日期2)(4).字符串编码和函数i字符串编码ii字符串函数（5）.格式输出函数（6）shell函数代码的书写规则vb程序代码不区分大小写。vb程序代码的主要的书写规则： 可用续行符（一个空格后跟一个下划线）将一个长语句分成多行书写 当一行中有多条语句时，语句间用冒号“：”分隔 注释以注释符“”（单引号）引导，可放在一行语句的最后，或单独占据一行，但不能放在续行符的后面；注释也可以用关键字“rem”引导，但它必须

16、占据一行 vb中缺省数制是十进制数，也可以使用加前缀“&h”秋&0”分别表示的十六进制和八进 制数 标识符是为程序代码中的变量、常量、类型、过程、函数、类和其他对象的命名。vb 中标识符的命名有如下规则：3 标识符必须是字母开头，后跟字母、数字或下划线4 标识符长度不能超过255个字符，其中窗体、控件、类和模块的标识符长度不能超过40个字符5 不能与vb中受到限制的关键字同名四、典型例题例3.1：用人单位招聘秘书：年龄小于40岁，女性，学历专科或本科年龄40性别二“女”（学历二“专科”学历二“本科”）and and or考虑：若分别写成:年龄40 and性别二“女” and (

17、学历二“专科” and学历二“本科”)年龄40 or性别二“女” or (学历二“专科” or学历二“本科”)例3.2利用format函数显示有关的日期和时间。form_cllck()fontsize=12mytime = #9:21:30 pm#mydate = #7/21/97#print format(mydate, "m/d/yy")print format(mydatc, "mmmm-yy")print format(mytime, nh-m-s am/pm")print format(mytime, uhh:mm:ss a/p&qu

18、ot;)'显示系统当前口期和时间print format(now, uyyyy年m月 dd r hh： mmm)*以系统预定义的格式显示系统当前时间print format(date, ”dddd，mmmm,dd,yyyy”)end sub五、自检题教材课后习题1、选择题广182、操作题1, 3六、学习方法介绍1、本章内容是vb程序编码的基础，通过例题和课后习题掌握本章内容。2、通过编写简单的程序加深理解教学小结：书写正确的表达式是编写代码的基础数据类型和函数变量的作用对于初学来说比较难以理解福建工程学院计算机与信息科学系教案课题：第四章顺序结构程序设计课型：采用教具：计算机+投影仪+

19、电子演示文稿教学目的:掌握顺序程序设计的基本设计方法内容纲要与时间分配：2学吋1. 顺序结构（25分钟）一个完整的vb6.0的应用程序，一般包含三部分内容，即输入数据、计算处理、输出 结果，三者关系：输入一处理一输出2. 数据输入（30分钟）用赋值语句输入数据用输入框（inputbox）输入数据用文本框输入数据3. 输出数据（30分蚀）用标签（label）输出数据消息对话框：产生一对话框来显示信息用print方法输出数据4. 其他常用语句（15分钟）卸载语句unload结束语句end暂停语句stop重点与难点：顺序设计的要点inputbox与msgbox函数的使用数据的输入输出设计教学过程（包

20、含课堂设计、教学方法和教学思路等）：1. 赋值语句形式:let变量名=表达式2. 与用户交互函数和过程（1） . inputbox函数inputbox（提示,标题,缺省,x坐标位置,y坐标位置）其中:提示提示信息，标题对话框标题，缺省输入区缺省值函数返回字符类型.2.msgbox函数和msgbox过程函数形式变量二msgbox（提示，按钮,标题）过程形式:sgbox提示，按钮儿标题按钮值如下：分组内部常数按钮 值描述vbokonly0只显示ok按钮vbokcancel1显示ok,cancel按钮按钮数目vbaborlretrylgnore2显示 abort ,retry,ignore 按钮vb

21、yesnocancel3显示 yes,no,cancel 按钮vbyesno4显示yes,no按钮vbretrycancel5显示retry,cancel按钮vbcritical16关键信息图标，红色stop标志图标类型vbquestio n32询问信息图标，？vbexclamation48警告信息图标，！vbln formation64信息图标，i函数返回所选按钮整数值:内部常数返回值被按下的按钮vbok1okvbcancel2cancelvbabort3abortvbretry4retryvblgnore5ignorevbyes6yesvbno7 no标签控件主要用来显示文本。与文本框不同

22、的是，在标签中只能显示文本，而不能编辑文本。常用属性：name、caption、font、enabled、visible、backcolor forecolor> alignment>autosize wordwrap backstyle、borderstyle等四、典型例题例：srate!=0.1textl .text = ”欢迎使用visual basic 6.0m当表达式的类型打变量的类型不一致时，强制转换成左边的精度ia%= 10/3ia中的结果为3五、自检题教材课后习题1、选择题广102、操作题1, 2, 3六、学习方法介绍1、虽然赋值号与关系运算符等于号都用“二”表示，

23、vb系统会根据所处的位置自动判断是 何种意义的符号。2、通过编写程序加深理解教学小结：掌握顺序程序设计，并能够熟练掌握一般程序设计的步骤。设计多媒体演示文稿通过计算机和投影仪演示本次课要讲授的内容，便于学生的理解和 掌握。启发学生主动思考，促进学生自主学习、讨论学习、合作学习和实践学习的过程和收获。 合理安排课后作业。安排学生上机实践，即时掌握所学知识点。完成课后布置的操作题。福建工程学院计算机与信息科学系教案课题： 第五章控制结构程序设计课型：采用教具：计算机+投影仪+电子演示文稿教学目的:初步常握程序设计的选择结构和循环结构，能独立上机完成一些基本数学问题的计算机解决方法的设计内容纲要与时

24、间分配:6学吋1.2.3.选择结构单行结构条件语句（30分钟） 格式、功能、块结构条件语句格式、功能、多分支选择语句 格式、功能、选择结构的嵌套 格式、功能、循环结构for循环结构（45分钟）格式、功能、程序举例while循环结构（25分钟） 格式、功能、程序举例do循环（4种结构）（25分钟）格式、功能、程序举例循坏的嵌套（20分钟）格式、功能、程序举例综合应用举例（45分钟）各种算法的计算机编程实现程序举例 （30分钟） 程序举例（30分钟） 程序举例（20分钟） 程序举例重点与难点：选择和循环结构的正确书写如何用正确的结构设计来解决问题教学过程（包含课堂设计、教学方法和教学思路等）:分支

25、结构1 lf-then语句（单分支结构）if v表达式> then语句块end if或忏<表达式> then v语句2.lfthenelse语句（双分支结构）if v表达式thenv语句块1>elsev语句块2>end ifif v表达式> then v语句else v语句2>3.lfthenelself®句（多分支结构）形式：忏<表达式1> thenv语句块1>e/se/f v表达式2> thenv语句块2>else语句块n+1 end if4. ifig句的嵌套if语句的飲套是指if或else后面的语句块中又

26、包含if语句。形式如下：忏表达式1 then忏表达式门 then end if end if5. select case语句（情况语句）数值型或字符串表达式形式：select case变量或表达式case表达式列表1语句块1case表达式列表2语句块2 case else语句块n+1end select循环结构for循环语句（一般用于循环次数已知）形式for循环变量=初值to终值step步长语句块exit for语句块next循环变量2. do-loop循环语句（用于控制循环次数未知）形式1：do whileuntil 条件语句块exit do语句块loop形式2：do语句块exit do语句

27、块loop whileuntil）条件3. 循环的嵌套一个循环体内又包含了一个完整的循环结构称为循环的嵌套.四、典型例题例6.1：例:已知两个数x和y,比较它们的大小，使得x大于y.ifx<y thent=xx=yy=tend if或 lfx<y then t=x: x=y: y=t例62己知变量stc中存放了一个字符，判断该字符是字母字符、数字字符还是其他字符。用多分支结构实现：if ucase(strc) >=h a" and ucase (strc) <=h z" then print strc + ”是字母字符”elself strc >

28、;=" 0" and strc <=" 9" then print strc + ”是数字字符”else print strc + ”其他字符”end if用select case语句实现：select case strccase "a" to ,'zh, ha" to hz"print strc + ”是字母字符”case © to n9nprint strc + ”是数字字符”case elseprint strc + ”其他字符”end select例6.3：打印九九乘法表.for i

29、 = 1 to 9forj = 1 to 9forj = 1 to ipicturel.print tab(j -1)*9 +1); se;next jpicturel.printnext i五、自检题教材课后习题1、选择题广172、操作题2, 4, 6, 8, 10六、学习方法介绍1、对于循环的嵌套，要注意以下事项：(1) 内循环变量与外循环变量不能同名；(2) 外循环必须完全包含内循环，不能交叉；(3) 不能从循环体外转向循环体内，也不能从外循环转向内循环，反z则可以2 if语句的嵌套注意事项：书写锯齿型；if与end iffl对教学小结：本章节知识点掌握较其他章节而言较为困难，初学者难以

30、掌握设计思想 要求学生多看程序，上机实践。设计多媒体演示文稿通过计算机和投影仪演示本次课要讲授的内容，便于学生的理解和 掌握。启发学生主动思考，促进学生自主学习、讨论学习、合作学习和实践学习的过程和收获。 合理安排课后作业。安排学生上机实践，即时常握所学知识点。完成课后布置的操作题。福建工程学院计算机与信息科学系教案课题： 第六章常用控件课型：采用教具：计算机+投影仪+电子演示文稿教学目的:掌握常用控件的属性、事件和方法，并能在程序界面设计中熟练应用内容纲要与时间分配:6学吋控件的分类标准控件activex控件可插入对彖1. 单选按钮和复选框 属性（10分钟） 事件（20分钟） 方法（15分钟

31、） 程序示例2. 框架（15分钟） 属性事件3. 列表框和组合框 属性（15分钟）事件（15分钟） 方法（20分钟） 程序示例（25分钟）4. 滚动条和slider控件（25分钟）程序示例程序示例程序示例属性事件方法5. 时钟（20分钟）属性事件方法6. 图形控件（25分钟）picture 和 image 属性事件方法7. 鼠标器和键盘（20分钟）事件 焦点和tab键序重点与难点：控件较多，属性和事件容易混淆 界面设计的基础程序应用教学过程（包含课堂设计.教学方法和教学思路等）:1、复选框（checkbox）复选框是应用程序中允许用户进行多项选择的控件。forecolor> value等

32、常用属性：name、caption、font、enabled> visible> backcolor>主要事件：click等，不支持双击事件2、单选按钮（optionbutton）单选按钮通常以按钮组的形式出现,用户可从中选择一个选项。常用属性：name、captionfont、enabled、visible、backcolor>forecolor、value等主要事件:click等3. 框架(frame)框架控件用來对其他控件进行分组， 以便于用户识别和功能上分区。常用属性:name> caption、font>enabled visible> ba

33、ckcolor>forecolor 等4> 列表框(listbox) 列表框控件显示项h列表，用户可从中选择一个或多个项ho 常用属性:name> caption> fonts enabled、visible、backcolor. forecolor、list、listcount、listindex、selectedsorted> text等主要事件:click. dbclick等常用方法:add item x removeitem > clear等5. 组合框(combobox)组合框是将文本框和列表框结合在一起的控件，用户既可以在文本框屮输入文本，乂可以

34、在 列表框中选择需要的表项。组合框的常用属性、事件和方法与列表框相同。组合框有三种式样：卜拉式组合框、简单组合框和卜拉式列表框。6、滚动条(hscrollbar、vscrollbar)7、定时器(timer)定时器是应用程序控制定时发生事件的控件。常用属性：enabledx interval等主要事件：timer图形控件1. picture box(图形框)主要作用：显示图片、也可作为其他控件的容器。装入图形：图形框对象.picture = loadpicturefffl形文件名”)删除图形：图形框对象.picture = loadpicture()autosize属性设置为true时，图形框

35、能自动调幣大小与显示的图片匹配2.lmage(图像框)图像框比图形框占用更少的内存快。图像框内不能保存其他控件。stretch属性二false,图像框可自动改变大小以适应其中的图形。stretch属性二true,图形可自动调整尺寸以适应图像框的大小。鼠标器和键盘1. 鼠标器事件注总:：鼠标事件发生在什么对象上，是窗体上还是控件上。mousedow n 事件mouseup 事件mousemove 事件(1) button参数(2) shift参数(3) x,y：鼠标的当前位置2. 键盘事件keypress事件过程keydow n事件过程keyup和keydow n事件过程对输入的数据进行验证、限

36、制和修改四、典型例题例5.1：接收大写字符将keypreview设置为true时sub form_keypress(keyascii as integer)if keyascii >= asc(”a”) and keyascii <= asc("z") thenkeyascii = keyascii + asc("a") - asc(”a”)end ifend sub例5.2：文本框只能接收“0”“9”的数字字符。sub txtexample_keypress(keyascii as integer)if keyascii < 48 o

37、r keyascii > 57 thenkeyascii = 0end ifend sub五、自检题教材课后习题1、选择题1182、操作题1, 3六、学习方法介绍1、列表框控件的list属性包含一个数组，用于访问列表框中的项目。列表框中的每个项目都是数组的元素，每个项目以字符串形式表示。引用列表框的项冃时使用格式：列表框名称.list(index)第一个项目的index为0,最后一个项目的索引号为listcount-1 <>listcount属性只能在程序屮引用。listindex属性只能在程序中设置或引用，表示在列表框控件中当前所选项目的索引号。如果没有选择项目，其值为邛。

38、selected属性只能在程序中引用，反映列表框中的项冃是否被选中。例：若selected(o)为true,表示第一项被选中。sorted属性指定控件中的项冃是否自动按字母顺序排序。text属性只能在程序中引用，返回列表框中所选择的项目内容。其返回的内容与表达式list(listlndex)的返回内容相同。2、键盘事件的keypress事件过程、keydown事件过程、key up和keydown事件过程的区别：keypresskeydown 和 keyup事件发牛的时间输入一个ascii字符按任意一个键参数值keyascii接收到keycode接收到字符的ascii值键的扫描码按 shift

39、+a 时 事件发生的次数事件发生一次事件发生两次按shift+a时参数值97第一次是17(键盘处于大写状态)第二次是6565第一次是17按shift+a时参数值第二次是65福建工程学院计算机与信息科学系教案课题：第七章数组课型：采用教具：计算机+投影仪+电子演示文稿教学目的:让学生数组的申明、静态、动态数组的区别和应用，控件数组的建立和使用内容纲要与时间分配：讲课2学时1. 数组的概念：（30分钟）（1）数组的定义。（2）静态数组和动态数组。2. 数组的基本操作：（45分钟）（1）数组元素的输入、输出和复制。（2）foreach*next 语句。（3）数组的初始化。3. 控件数组。（15分钟）

40、重点与难点：重点：讲述数组这种特殊的数据结构的使用。排序算法难点：数组的理解数组的操作教学过程(包含课堂设计、教学方法和教学思路等):1>数组的声明根据声明的数组的有效范围不同，有三种方法声明大小固定的数组。 过程级数组，在该过程屮用dim语句声明，例：dim number(10) as integer或dim k(1to 5)或 static state(1o) as boolean 模块级数组，在模块的声明段中用private或dim语句声明，例：private a(10) as integer或 dim address(1 to 50) as string*30 全局级数组，在模块

41、的声明段中用public语句声明，例：public price(10) as double或public name(1 to 50) as string*202、数组的引用dim n as integerdim number(10) as integerfor n=0 to 10number(2)=2next n3、多维数组例：dim i as integer,j as integerstatic matrixa(1 to 10,1 to 10) as doublefor 1=1 to 10for j=1 to 10matrixa(l,j)=l*10+jnext jnext i1.1.2动态数

42、组1、动态数组的声明 过程级动态数组：dim dynarray()或 dim dynlist() as single 模块级动态数组：private dyna() as integer 或 dim dynarray() 全局级动态数组：public dynarray() as double 或 public dynlist()2、动态数组的定义动态数组声明后并不能立即使用，还必须在使用它的过程中，用redim语句对它的维数和上下界进行定义。例：redim dynarray(1 to 10)redim dynarray(2,1 to n)注意： redim语句通常是一个执行语句，只能在过程屮使用

43、可使用redim语句反复改变动态数组的维数和上下界，但一般不能修改它的数据类型控件数组一组相同类型的控件组成。它们共用一个控件名，具有相同的屈性，建立时系统给每个元素赋一个唯一的索引号(index)o控件数组共享同样的事件过程，通过返冋的下标值区分控件数组川的各个元素。例：private sub cmdname _click(lndex as integer) if lndex=3 then'处理第四个命令按钮的操作end if end sub1. 在设计时建立控件数组在窗体上画出控件，进行属性设置，这是建立的第一个元素选中该控件，进行“copy”进行若干次和“paste”操作建立了所

44、需个数的控件数组元 素。进行事件过程的编程。2.运行时添加控件数组建立的步骤如下：。在窗体上画出某控件，设置该控件的index值为0,表示该控件为数组，这是建立的第一 个元素。在编程时通过load方法添加其余的若干个元素，也可以通过unload方法删除某个添加 的元素。o每个新添加的控件数组通过left和top属性确定其在窗体的位置，并将visible属性设置为true。教学小结：在讲解数组的基本操作时要尽量使用实例在讲解算法吋，要主意学生的理解程度设计多媒体演示文稿通过计算机和投影仪演示本次课要讲授的内容，便于学生的理解和 掌握。启发学生主动思考，促进学生自主学习、讨论学习、合作学习和实践学

45、习的过程和收获。 要求学生多上机练习，掌握数据的基本操作，和相应的排序算法。福建工程学院计算机与信息科学系教案课题:第八章过程课型：采用教具：计算机+投影仪+电子演示文稿教学目的:本章讲述vb函数过程和sub过程的定义和使用方法内容纲要与时间分配:4学吋l.sub过程：（1）sub过程的建立。（15分钟）（2）调用sub过程。（15分钟）（3）调用过程和事件过程。（15分钟）2. funtion 过程：（1）funtion过程的定义。（20分钟）（2）调用funtion过程。（25分钟）3. 参数传送：（45分钟）（1）形参与实参。（2）引用。（3）传值。（4）数组参数的传送。4. 可选参数和

46、可变参数。（3（）分钟）5. 对彖参数：（15分钟）（1）窗体参数。（2）控件参数。重点与难点：重点：难点：过程的定义、调用，参数的传递，变量的作用范围 两种过程的特点和调用，参数传递，变量的作用域和生存期教学过程(包含课堂设计、教学方法和教学思路等):过程是构成程序的逻辑模块，一般能完成一个相对独立的功能。利用过程能使程序结构模块 化，以便于程序的开发、调试和维护；同时，利用过程还能实现多个程序对它的共亭，可降 低程序设计的工作量，提高软件开发的工作效率。在vb中有3种过程:sub过程、function过程和property il程。1、sub过程sub过程，亦称为子过程，是实现某一特定功能

47、的代码段。它或者由程序调用，或者由事件 触发，没有返回值。sub过程的语法是：private | public static sub procedurename (arguments)，过稈头statements，过程体end sub'过程尾子过程可出现在窗体模块、标准模块和类模块中。在vb中子过程被分为通用过程和事件过程 两类。通用过程出现在模块的通用段川，它必须在程序小通过语句来调用。例(见程序ex2) o事件过程主要出现在窗体模块的窗体段和各控件段中，也可以出现在类模块的类段中。事件 过程是由对象的事件所触发调用的。事件过程的过程名。2、unction 过程function过程，

48、亦称为函数过程，它是实现某-数据处理功能并返冋处理结果的代码段。function过程的语法：private|public static function functionname(arguments) as typestatemontsend function例：private function hypotenuse(a as tnteger, b as integer) as doublehypotenuse二sqr(a/2+b"2)end function调用function过程的方法和数学中使用函数的方法一样，即在表达式中可以通过使用函数 名，并在其后用圆括号给出相应的参数列表

49、来调用一个function it程。也能像调用sub过程 那样调用函数。例：y二hypotenuse (3, 4)call year(now)year now当用这种方法调用函数时，vb放弃该函数的返冋值。3、参数传递参数的按值传递和按地址传递在过程定义中，按值传递的形式参数前要带有关键字byvalo例如，下列过程中的参数x和y 都是被声明为调用时按值传递的参数。private sub changel(byvai x as tnteger,byvai y as integer)dim inttemp as integerinttemp=x:x=y:y二i nttempend sub要在过程定义

50、中声明按地址传递(缺省方式)的形式参数，应加上关键字byref,例如：private sub change2(byref m as integer, byref n as integer)dim inttemp as integerinttemp二m:m=n:n二i nttempend sub数组参数的传递vb的过程中允许以数组作为参数。在使用时应注意：数组参数只能按地址传递，而不能按值传递。在形式参数表和实在参数表中，数组参数要忽略维数声明。例：编写求一维数组中所有元素之和的程序。程序如下：private sub form_click()dini a(l to 5) as integer,

51、k as integerfor k = 1 to 5a(k) = k + 1next kprint "sum二"；arrsum(ao)end subprivate function arrsum(x() as integer) as integerdim i as tnteger, t as integert = 0for i = lbound (x, 1) to ubound(x, 1)t = t + x(i)next iarrsum = tend function这里，系统内部函数lbound和ubound分别求数组指定维数的下界和上界，其中维数可缺省 (指一维数组的唯

52、一的一维)。在vb过程的参数表中，可使用关键字optional建立可选参数，也可使用关键字 paramarray声明不定数量的参数。变量的作用域与生存期作用域：变量、过程随所处的位置不同，可被访问的范闱。1. 过程的作用域窗体/模块级：加private关键字的过程，只能被定义的窗体或模块中的过程调用。全局级：加public关键字(缺省)的过程，可供该应用程序的所有 窗体和所有标准模块中 的过程调用。作用范围模块级全局级窗体标准模块窗体标 准 模 块定义方式过程名前加private 例：private sub mysubl （形参表）过程名前加public或缺 省例 pub 1 i c sub

53、my2 （形 参表）能否被本模块 其他过程调用能能能能能杏被本应用 程序英他模块 调用不能不能能，但必须在过程名 前加窗体名，例：call窗体名.my2（实参表）能， 但 过 程 名 必 须 唯否 则 要 加 标 准 模 块 名， 例：cal1 标 准 模 块 名. my2 （实 参 表）2. 变量的作用域局部变量：在过程内用声明的变量，只能在本过程中使用。窗体/模块级变量：在“通用声明”段中用dim语句或用private语句 声明的变量，可被本窗 体/模块的任何过程访问。全局变量：在“通用声明”段中用public语句声明的变量，可被本应用程序的任何过程或 函数访问。作用范围局部变量窗体/模块级变量全体变量ij窗体1声明方式dim, staticdim, privatepublic声明位置在过程屮在窗体/模块的“通用声明”段在窗体/模块的“通用声明” 1被本模块的 其他过程存 取不能能能被其他模块