a我考网

 找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 74|回复: 0

[Visual Basic] 2011年计算机等级考试二级VB基础教程(24)

[复制链接]
发表于 2012-7-31 22:10:12 | 显示全部楼层 |阅读模式
  6.1VB的过程设计及子过程(Sub)的定义与调用4 w/ h$ r6 N" D$ b! q/ n$ U% M
  1.什么是过程
5 n5 }1 l2 [# c  在程序设计中,为各个相对独立的功能模块所编写的一段程序称之为过程。
; z3 V" s1 X- x' G8 s9 y  2.VB中的自定义过程分类
$ m7 ]  A/ ^: ~& L  g  (1)以“Sub”保留字开始的子程序过程 (包括事件过程和通用过程),不返回值;1 t( I# X6 m- E7 W
  (2)以“Function” 保留字开始的函数过程,返回一个值;
4 `8 F/ }2 f* ?  (3)以“Property” 保留字开始的属性过程,可以返回和设置窗体、标准模块以及类模块的属性值,也可以设置对象的值。
! E* p7 X3 X8 S4 U+ Z+ f  3. 事件过程6 V3 G- r8 G9 ]: I
  (1)窗体事件过程: A0 f4 I4 @9 N' g) e5 v
  语法:Private Sub Form_事件名([参数列表])! Y- J: ^4 Z2 A5 i* X
  [局部变量和常数声明]- S+ {4 `5 }. g
  语句块
% G* g" A4 g* H$ H( _$ D9 u  Y  End Sub
4 Q. a: W$ }& Y$ ?* X( T# d  注意:# t3 W  t: N! b% S
  1)窗体事件过程名由Form_事件名组成,多文档窗体用MDIForm_事件名;
- }7 V0 `: U8 p6 G% X9 |  2)每个窗体事件过程名前都有一个Private的前缀,表示该事件过程不能在它自己的窗体模块之外被调用;
* m( M4 W2 d* e$ W1 @4 i! ~  3)事件过程有无参数,完全由VB提供的具体事件本身决定,用户不可以随意添加。
5 n  |% e4 t8 @5 `6 [$ H2 R# a+ m  (2)控件事件过程
% L8 }5 d2 s6 K  语法:Private Sub 控件名_事件名([参数列表])
% v& n2 D; A5 U% s' t% k  [局部变量和常数声明]
8 _* a  C* ~. T/ H# z# S( N  语句块. Q3 S7 J$ M) z9 K! r( M
  End Sub
0 w0 Y# m& {9 k6 f/ V5 _; Y& C% y  注意:其中的控件名必须与窗体中某控件相匹配,否则VB将认为它是一个通用过程。/ z" P$ W, E% Y- }) r& H! y; g/ `. G
  (3)建立事件过程的方法
! m5 D& b. S4 F, Y4 |5 c  1)打开代码编辑器窗口(两种方法:双击对象或从工程管理器中单击“查看代码”按钮)% D+ `* ]# C- u, n6 R5 g. p
  2)在代码编辑器窗口中,选择所需要的“对象”和“事件过程”+ |! i9 }" f' Q9 T( y
  3)在Private Sub …… End Sub之间键入代码
- A8 ~) F, s4 d7 o6 w  g1 L  4)保存工程和窗体
( f: F& U3 B9 l0 f0 E! H6 k" T3 V  (4)事件过程的调用
/ V  @& j  p" h: F  事件过程由一个发生在VB中的事件来自动调用或者由同一模块中的其他过程显示调用。" n* {2 _+ p+ I7 h  {
  2.通用过程
4 s" X3 M+ ~/ c" V! R  通用过程是一个必须从另一个过程显示调用的程序段,通用过程有助于将复杂的应用程序分解成多个易于管理的逻辑单元,使应用程序更简洁、更易于维护。
" O& ^, |2 K1 x* J3 h. q( |0 X8 O; F  通用过程分为公有(Public)过程和私有( Private)过程两种,公有过程可以被应用程序中的任一过程调用,而私有过程只能被同一模块中的过程调用。
  Z9 [3 }2 H) `  (1)定义方法:2 l+ I( @1 D+ L4 g/ e
  [ Private | Public ] [ Static] Sub 过程名([参数列表])8 y3 r8 d  _, |. B
  [局部变量和常数声明] ‘用Dim 或Static声明
4 {' [5 D7 o& L( T  c  语句块) g3 C% s2 h5 z1 H  P  d
  [Exit Sub]# Q( k* j" ]! |/ l& o% v, v( B
  语句块
# Q7 w. U2 e% n. y  End Sub
& R9 f! I) i2 T6 V  u  注意:+ N. _( b9 ^9 w! ?' k- Q
  1)缺省[ Private | Public ]时,系统默认为 Public ;+ N4 @6 s3 T, h1 z0 L
  2)Static 表示过程中的局部变量为“静态”变量;
% U# O9 G! ?6 g. |5 C& s( I  3)过程名的命名规则与变量命名规则相同,在同一个模块中,同一符号名不得既用作Sub过程名,又用作Function过程名。% L; U2 B6 X( a3 g  m3 ?/ ~
  4)参数列表中的参数称为形式参数,它可以是变量名或数组名,只能是简单变量,不能是常量、数组元素、表达式;若有多个参数时,各参数之间用逗号分隔,形参没有具体的值。VB的过程可以没有参数,但一对圆括号不可以省略。不含参数的过程称为无参过程。1 i2 x& m; r# ?& j  j  J: Z# _
  形参格式为:1 `7 x! g  }0 j6 D
  [ ByVal ] 变量名[()] [As 数据类型]
' W- L7 L& N" {8 ?  式中:
8 G3 ?$ m  y, ^% ^  变量名[()]:变量名为合法的VB变量名或数组名,无括号表示变量,有括号表示数组。
# V# J& l$ n$ P0 ^- \  ByVal :表明其后的形参是按值传递参数(传值参数 Passed By Value),若缺省或用ByRef,则表明参数是按地址传递的(传址参数)或称“引用”(Passed By Reference)。0 E, X/ N2 `: ?
  As: 数据类型:缺省表明该形参是变体型变量,若形参变量的类型声明为String,则只能是不定长的。而在调用该过程时,对应的实在参数可以是定长的字符串或字符串数组,若形参是数组则无限制。
; f7 y7 O& j5 [9 \7 f  5)Sub 过程不能嵌套定义,但可以嵌套调用。. z6 @- H& P9 y
  6) End Sub 标志该过程的结束,系统返回并调用该过程语句的下一条语句。8 \4 ^) j- V2 f6 X& t
  7) 过程中可以用Exit Sub提前结束过程,并返回到下调用该过程语句的下一条语句。, |0 n8 m! m6 \& s2 S8 \1 W
  (2)建立Sub过程的方法0 }$ o, s) G2 t, l
  方法一:
& l1 e( g3 Z# h; t9 K7 ]& m  1)打开代码编辑器窗口1 _9 Q3 ?* e1 J) a7 O0 W; A9 R% u% r
  2)选择“工具”菜单中的“添加过程”
8 k, b. l* J" G' y1 \  3)从对话框中输入过程名,并选择类型和范围( o8 u7 l8 i) D' b' B/ s9 a( }
  4)在新创建的过程中输入内容: i) o" |  ?8 b! ?% P' N& f  f
  方法二:: M- t" B# \! ~' I! `2 ^
  1)在代码编辑器窗口的对象中选择“通用”,在文本编辑区输入 Private Sub 过程名# S5 W# E: x  g7 [" w- c3 t( G( @4 {3 E
  2)按回车键,即可创建一个Sub过程样板( F: y! N* G5 S! p
  3)在新创建的过程中输入内容$ C, ]$ R& U7 A9 ?4 U* p
  3.Sub子过程的调用: @9 q/ L8 f0 Y7 |# C
  (1) 用Call语句调用Sub过程
! d* [1 Y+ W# ~6 p% L; e( B  语法:Call 过程名(实在参数表)
4 d* Q, l; @- n' E$ i2 b( t  实在参数的个数、类型和顺序,应该与被调用过程的形式参数相匹配,有多个参数时,用逗号分隔。
6 D" U4 q+ l9 U, Y$ A  (2)把过程名作为一个语句来用& y, B* M" {+ [
  语法:过程名 [实参1[,实参2……]]( J3 q, p' S' h; P' l
  它与(1)的不同点是:去掉了关键字和实参列表的括号
# \$ r6 ^, v) m3 C  如上例中可以改成:area a,b,c,w
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|Woexam.Com ( 湘ICP备18023104号 )

GMT+8, 2024-5-18 11:29 , Processed in 0.156085 second(s), 21 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表