20.变量的作用域 变量作用域是指变量可作用范围。按作用域分变量有以下几种类型： (1)局部变量 窗体上的控件建立事件过程的内部用Dim声明，或不说明而直接使用的变量是局部变 量。 局部变量仅仅在这个过程内部有效，在过程之外使用是没有作用的。局部变量的作用域 为定义变量的过程内部使用。 局部变量是在过程执行时，才会在内存中为变量开辟存储单元，过程结束时局部变量所 占用的内存单元将被释放，每次调用过程时局部变量都会重新分配空间。 (2)窗体级变量 在程序代码窗口的通用声明段中用Dim语句声明的变量称为窗体级变量。 窗体级变量可以被本窗体的任何过程访问。窗体级变量随着窗体的加载而生成，只要窗 体不被卸载就一直占用内存的单元。 (3)全局变量 全局变量必须在工程公共标准模块中用Public语句声明。 格式：Public变量名[As类型 全局变量在执行工程时就己经在内存中形成，并一直保存到工程结束为止。全局变量的 作用域为整个工程。 (4)静态变量 局部变量会随着过程的结束而消失，如果希望下次执行这个过程时能够找到原来执行时 生成的值，就要使用静态变量。 静态变量一般在过程内定义。 格式：Static变量名[As类型 静态变量在第一次使用过程时生成，而过程结束时静态变量不释放一直保存，再次调用 过程时静态变量保持原来的值。 静态变量只能被定义的过程所使用，不会被其他过程所使用，所以其作用域也是在定义 变量的过程内部使用。 21.过程作用域 过程作用域是指过程可作用的范围。按作用域，过程有以下几种类型： (1)窗体/模块级过程 窗体模块级过程是在由Private方式定义的过程。窗体/模块级过程仅仅在本身的窗体/ 模块内部有效，在窗体/模块级之外是没有作用的。 (2)全局级过程 全局级过程是由Public方式定义的过程。全局级过程在工程内的所有窗体和模块中都 有效。 所以其作用域是整个工程。 22.过程、函数 过程就是完成某一特定功能的程序，可供事件过程或其它过程所调用。有两大类过程： 系统提供的内部函数和事件过程、用户自定义函数和过程。 (1)用户自定义函数和过程的特点
' *+278 $*sI$G$*tu>Ù$*sYHmB £¦vk -²¿'(hµø( ðk* *&1 4 VRf _Æ@)*Ivk > vkww^ÌK ðkYxV^ aù)*I5Y$*>vk$*s Ó ðk)*> vkI^ v?·V3Å^ðTÓyzV ;·vkÁ <*ð{=>,V o|* ·vk}Å 8ib> £¦-²} ^®~- *4 T* *&1 DE4 ÒÓ-²}> -²}GH="-² ì>-²} -²/_ VØh- ²f=ÜJÆ<*ð> £¦üv üv[\^i5` /.kT* 456& DE4 > @AB456& ú üv^v?i·Üàj^ðT V,Jƶi;ÓÏ>üv $*sÓ°Ki> £¦2 vkÅ ;_VWXSTov?ÌK ·:¶Av?· 3VÜh)*2> 2JU^ ð > @AB & ú 2^Jo)* · V_ ;·2f>,JÆV{o|* ·2A3> 2Ø= Á)*VfÅ=y Á)*VÁHy$*sI^ ðk)*> 95278 $*sI$ G$*tu>Ù$*sV YHmB £¦-²=.k} -².k} I^¼ 4'&8 A >-²=.k} ww^"-²= .kðkYxV^-²=.k}aùI5Y$*> £¦üv} üv} I¼ 456& A >üv} ^iðÁY-²ë.kT} Yx> ÁHy$*sI°Ki> 95- ÜIû sJ 7VGø( Ry Á|*>Y2 B Mïðk© ëø( *& © ë > £¦*& © ë Â
这类函数和过程是用户根据自己的需要定义的，可在工程中被调用执行。 (2)VB提供的自定义过程有4种：Sub子过程、Function函数过程、Property属性过 程、Event事件过程 (3)子过程和函数过程的异同点 共同点：都是为完成某个功能而编写的一段程序，使用时被其他过程调用。 不同点：子过程考虑更多的是执行的过程，结果体现在执行过程中，不带有返回值，调 用时使用Cl语句：函数过程强调的是返回的结果，因此具有类型，调用时需要使用相同 类型的变量接收函数的返回值或在表达式中应用函数，函数过程不能单独作为一条语句执 行。 23.子过程和函数过程的形式 (1)子过程形式 [Private Public[Static]Sub<过程名>L(参数表)] <语句序列小 [Exit Sub] <语句序列> End Sub 说明： 子过程以Sub开头，以End Sub结束。其中的语句序列称为过程体。 过程名：命名规则与变量名相同，由用户指定 参数表：过程被调用时传送给该过程的形式参数表。 Exit Sub语句：表示从过程中退出，并返回主调过程。 (2)函数过程形式 [Private Public[Static]Function<函数名>[（参数表）][As类型] <语句序列> [Exit Function] [函数名=表达式] End Function 说明： 函数过程以Function开头，以End Function结束，其它含义与子过程中相似。 As类型：是函数过程返回值的数据类型。 由函数过程返回的值放在<表达式>中，再将它赋给函数名。 Exit Function语句：表示从函数过程中退出，并返回主调过程。 24.子过程和函数过程的调用方法 (1)子过程的调用方法 方法l:用Call语句调用Sub过程，格式为： Call过程名[（参数表）] 方法2：把过程名作为一个语句来使用，格式为： 过程名「参数表] (2)函数过程的调用方法 函数名（「参数表]）
Ì© ë I*+&gh VG^iT=|*v?> £¦2( ï& Y B56 ~ .5 &# © 4'#,' 9 [\ 8 ø( £¦~ ë© `B}IÓû sK7_]JV)*·=y |*> fB~ Iv? VX²^v? TVf YÀ¸3V| *·)* DE© |IÀ¸XVYV|*·gh)*w @© À¸3R^NOATx*© V© f $ÓJCDEv ?> :95;95<= £¦~ A 4'&8 >456& &56 ú £¡ N¦ DEF 0& 56 DEF 56 B ~ H 56 yUVH 56 ;>yTDEFÒÓ ²> úBú¢ZúwV¼*$ ¡ NB =|*·£¤ A¡ N> 0& 56 DEBN1½ TßV,À¸l| > £¦© A 4'&8 >456& &.5 &# © ú £¡ N¦ DEF 0& .5 &# © úâNOA .5 &# B © H .5 &# yUVH .5 &# ;Vyñ ~ Tw¥> BI© À¸3 > ¼© À¸3,^ NOA TV{{E© ú> 0& .5 &# DEBN1½© TßV,À¸l| > :95;95>7?@ £¦~ |* B* DE|* 56 V@AÓB ú £¡ N¦ BL ú$ÓJKDE)*V@AÓB ú ¡ N £¦ © |* © ú£¡ N¦
说明：在Cl语句中，参数表必须在括号内，在第二种方法中则必须省略参数表两边 的括号。调用中的参数称为实参。若调用的过程有参数表则调用时也必须有参数，若调用的 过程无参数，则调用时也不能有参数。调用Sb过程必须是一个独立的语句，不能在表达 式中调用Sub过程。如果在定义Function过程时有（参数表），那么在调用时也必须有参数 表。Function过程调用必须放在表达式中。 25.参数的传递 定义过程时如果有（参数表），那么在调用时也必须有（参数表），这就是参数传递。 过程定义中的参数称为形式参数，过程调用时给出的参数称为实际参数。 在定义过程时，形参为实参预留位置，而在调用过程时，实参则按位依次传给形参。 形参与实参对应的变量名可以不同，但变量个数必须相等，类型必须相同。 传递参数有两种方法： (1)按值传递：就是只把实参的值传递给形参，在过程中如果形参的值发生变化不会 影响实参的值。 (2)按址传递：就是把实参的地址传递给形参，即形参与实参共用一个地址。在过程 中如果形参的值发生变化将引起实参的值也发生变化。 两者的区别：在定义过程时如果形参前面带有ByVal则是按值传递，没有加By Val或者 加ByRef则表示按址传递。 4.3疑难解析 1.f语句书写问题 在多行式的If块语句中，书写要求严格，即关键字Then、Else后面的语句块必须换行 书写：单行式的If语句：If<条件>Then<语句l>Else<语句2>，必须在一行上书写，若要 分行，要用续行符。 2.在选择结构中缺少配对的结束语句 在多行式的If语句块中，应有配对的Edf语句结束。否则，在运行时系统会显示“块 If没有End If”"的编译错误，如图4-1所示。 icrosoft Visual Basic X A 编译错误 块If没有End If 确定同帮助 图4-1编译错误提示框 同样，对Select Case语句也应有与其相对应的End Select语句。 3.多边选择Elself子句的关键字的书写和条件表达式的表示 多边选择Elself子句的关键字ElseIf之间不能写有空格，即不能写成Else If。 有多个条件表达式要表示时，应从最小或最大的条件依次表示，以避免条件的过滤。例如， 己知输入某课程的百分制成绩mark,要求显示对应五级制的评定，评定条件如下：
B^ DETV¡ N[\^¥ðV^KTZ[\ ¡ N¦ ¥>|*T¡ ÒÓJ¡>||* Y¡ NZ|*·[\Y¡ V||* Í¡ VZ|*·fY¡ >|* 56 [\IJK µDEVf^NO AT|* 56 >WX^ .5 &# ·Y£¡ N¦V§^|*·[\Y¡ N> .5 &# |*[\,^NOAT> ABC ·WXY£¡ N¦V§^|*·[\Y£¡ N¦VÌÜI¡ £¨> T¡ ÒÓA¡ V |*·¡ ÒÓJ©¡ > ^ ·V¡ÓJ¡?ª#V_^|* ·VJ¡ZÙ#no£¡> ¡J¡jxúGHfVK [\w;V[\w> £¨¡ YB £¦Ù3£¨BÜIØLJ¡3£¨¡V^ TWX¡3cfÅ «¬J¡3> £¦Ù£¨BÜILJ¡Ð£¨¡VÉ¡J¡`*JKÐ>^ TWX¡3c{_J¡3c> ®¯ÃB^ ·WX¡ Y (92 ZIÙ3£¨V5Y/ (92 R® / (97 ZN1Ù£¨> DEFG ^ ?A kDETV°]h-±@VÉLÚ DEk[\P? °]?A DEB C( DE DE V[\^J?¿°]V|h ?Vh*»?> HIJKLMN ^ ?A DEkTVxYij DE;>ZV^?·MŲ1ck 5Y d³´µVW¶ ? Á1> ¶ ? ³´µï1H WVj DExYywjx DE> O : PQRDE;ST=SU ¦ ~ELÚ abf]Y@VÉf] > Y KC(NOAhN1·Vx½14R12C(noN1VHÖ×C( ·>WV àáIÞs¸¹é º 1 ')Vh-²1jx»}é¼ V¼ C(WB
优， matk≥90 良， 80≤mak<90 等级= 中， 70≤matk<80 及格， 60≤mark<70 不及格， mark <60 根据上述评定条件可以写成以下几个程序段，它们在语法上都没有错，但只有程序段一、 程序段二、程序段五能够实现所要求的功能，其余都有逻辑错误，请分析其中的原因。 程序段一： If mark >=90 Then Print"优" Elself mark>=80 Then Print"良" Elself mark>=70 Then Print"中" Elself mark>=60 Then Print"及格” Else Print"不及格” End If 程序段二： If mark <60 Then Print"不及格" Elself mark 70 Then Print"及格" Elself mark <80 Then Print"中" Elself mark <90 Then Print"良" Else Print"优" End If 程序段三： If mark>=60 Then Print"及格" Elself mark >=70 Then Print"及格” Elself mark>=80 Then Print"中
+¿ò¼ C(GH] HmKV½^D¿}5Y´VØYJ K»JÁh-7Vyz}YPQ´µV¾¿yTA> JB 1 ') @A$ 4'& À 1 ') @"$ 4'& Á 1 ') @B$ 4'& T 1 ') @$ 4'& @ 4'& f @ KB 1 ') $ 4'& f @ 1 ') B$ 4'& @ 1 ') "$ 4'& T 1 ') A$ 4'& Á 4'& À óB 1 ') @$ 4'& @ 1 ') @B$ 4'& @ 1 ') @"$ 4'& T
Elself mark>=90 Then Print"良" Else Print"不及格" End If 程序段四： If mark>=90 Then Print"优" ElseIf 80<=mark 90 Then Print"良" ElseIf 70<=mark 80 Then Print"中" Elself 60<=mark 70 Then Print"及格” Else Print"不及格” End If 程序段五： If mark>=90 Then Print"优" Elself 80<=mark And mark <90 Then Print"良" Elself 70<=mark And mark 80 Then Print"中" Elself 60<=mark And mark 70 Then Print"及格"” Else Print"不及格" End If 4.Select Case语句的使用 Select Case语句格式如下： Select Case<变量或表达式> Case<表达式列表l> <语句序列1> Case<表达式列表2> <语句序列2> 。，，+ Case<表达式列表n> <语句序列n> [Case Else
1 ') @A$ 4'& Á 4'& f @ B 1 ') @A$ 4'& À "$ @1 ') A$ 4'& Á B$ @1 ') "$ 4'& T $ @1 ') B$ 4'& @ 4'& f @ »B 1 ') @A$ 4'& À "$ @1 ') 1 ') A$ 4'& Á B$ @1 ') 1 ') "$ 4'& T $ @1 ') 1 ') B$ 4'& @ 4'& f @ V7 DE@AWB RNOA NOAFN DEF NOAFN DEF NOAFN DEF