📄 6.htm
字号:
<td width=168 valign=top style='width:126.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>窗体 </p>
</td>
<td width=204 colspan=2 valign=top style='width:153.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>标准模块 </p>
</td>
</tr>
<tr>
<td width=108 style='width:81.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p><strong>定义方式 </strong></p>
</td>
<td width=192 colspan=2 valign=top style='width:144.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p>过程名前加 <strong><span lang=EN-US>Private </span></strong></p>
<p>例:<span lang=EN-US> Private Sub my1 (形参表) </span></p>
</td>
<td width=372 colspan=3 valign=top style='width:279.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p>过程名前加 <strong><span lang=EN-US>Pubilc </span></strong>或默认 </p>
<p>例:<span lang=EN-US> [ Pubilc ] Sub my2 (形参表) </span></p>
</td>
</tr>
<tr>
<td width=108 style='width:81.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p><strong>能否被本模块其他过程调用 </strong></p>
</td>
<td width=98 valign=top style='width:73.5pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>能 </p>
</td>
<td width=94 valign=top style='width:70.5pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>能 </p>
</td>
<td width=180 colspan=2 valign=top style='width:135.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>能 </p>
</td>
<td width=192 valign=top style='width:144.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>能 </p>
</td>
</tr>
<tr>
<td width=108 style='width:81.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p><strong>能否被本应用程序其他模块调用 </strong></p>
</td>
<td width=98 valign=top style='width:73.5pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>不能 </p>
</td>
<td width=94 valign=top style='width:70.5pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>不能 </p>
</td>
<td width=180 colspan=2 valign=top style='width:135.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p>能,但必须在过程名前加窗体名。例: </p>
<p><span lang=EN-US>Call 窗体名 <strong>. </strong>My1 (实参表) </span></p>
</td>
<td width=192 valign=top style='width:144.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p>能,但过程名必须唯一,否则需要加标准模块名。例: </p>
<p><span lang=EN-US>Call 标准模块名 <strong>. </strong>My2 (实参表) </span></p>
</td>
</tr>
<tr>
<td width=108 style='width:81.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p class=MsoNormal><![if !supportEmptyParas]> <![endif]><span
lang=EN-US><o:p></o:p></span></p>
</td>
<td width=98 style='width:73.5pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p class=MsoNormal><![if !supportEmptyParas]> <![endif]><span
lang=EN-US><o:p></o:p></span></p>
</td>
<td width=94 style='width:70.5pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p class=MsoNormal><![if !supportEmptyParas]> <![endif]><span
lang=EN-US><o:p></o:p></span></p>
</td>
<td width=168 style='width:126.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p class=MsoNormal><![if !supportEmptyParas]> <![endif]><span
lang=EN-US><o:p></o:p></span></p>
</td>
<td width=12 style='width:9.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p class=MsoNormal><![if !supportEmptyParas]> <![endif]><span
lang=EN-US><o:p></o:p></span></p>
</td>
<td width=192 style='width:144.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p class=MsoNormal><![if !supportEmptyParas]> <![endif]><span
lang=EN-US><o:p></o:p></span></p>
</td>
</tr>
</table>
<p><strong><span lang=EN-US>3 . 变量的作用域 </span></strong></p>
<table border=1 cellspacing=0 cellpadding=0 style='mso-cellspacing:0cm;
border:solid windowtext .5pt;mso-padding-alt:0cm 0cm 0cm 0cm'>
<tr>
<td width=125 valign=top style='width:93.75pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p><strong>作用范围 </strong></p>
</td>
<td width=86 style='width:64.5pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'><strong>局部变量 </strong></p>
</td>
<td width=192 style='width:144.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'><strong>窗体<span lang=EN-US> / 模块级变量
</span></strong></p>
</td>
<td width=204 colspan=2 style='width:153.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'><strong>全局变量 </strong></p>
</td>
</tr>
<tr>
<td width=125 valign=top style='width:93.75pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p class=MsoNormal><![if !supportEmptyParas]> <![endif]><span
lang=EN-US><o:p></o:p></span></p>
</td>
<td width=86 valign=top style='width:64.5pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p class=MsoNormal><![if !supportEmptyParas]> <![endif]><span
lang=EN-US><o:p></o:p></span></p>
</td>
<td width=192 valign=top style='width:144.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p class=MsoNormal><![if !supportEmptyParas]> <![endif]><span
lang=EN-US><o:p></o:p></span></p>
</td>
<td width=120 valign=top style='width:90.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>窗体 </p>
</td>
<td width=84 valign=top style='width:63.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>标准模块 </p>
</td>
</tr>
<tr>
<td width=125 valign=top style='width:93.75pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p><strong>声明方式 </strong></p>
</td>
<td width=86 valign=top style='width:64.5pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p><span lang=EN-US>Dim 、 Static </span></p>
</td>
<td width=192 valign=top style='width:144.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p><span lang=EN-US>Dim 、 Private </span></p>
</td>
<td width=204 colspan=2 valign=top style='width:153.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'><span lang=EN-US>Public </span></p>
</td>
</tr>
<tr>
<td width=125 valign=top style='width:93.75pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p><strong>声明位置 </strong></p>
</td>
<td width=86 valign=top style='width:64.5pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p>在过程中 </p>
</td>
<td width=192 valign=top style='width:144.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p>窗体<span lang=EN-US> / 模块的“通用声明”段 </span></p>
</td>
<td width=204 colspan=2 valign=top style='width:153.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p>窗体<span lang=EN-US> / 模块的“通用声明”段 </span></p>
</td>
</tr>
<tr>
<td width=125 style='width:93.75pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p><strong>能否被本模块其他过程存取 </strong></p>
</td>
<td width=86 style='width:64.5pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>不能 </p>
</td>
<td width=192 style='width:144.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>能 </p>
</td>
<td width=204 colspan=2 style='width:153.0pt;border:solid windowtext .5pt;
padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>能 </p>
</td>
</tr>
<tr>
<td width=125 style='width:93.75pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p><strong>能否被其他模块存取 </strong></p>
</td>
<td width=86 style='width:64.5pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>不能 </p>
</td>
<td width=192 style='width:144.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>不能 </p>
</td>
<td width=120 style='width:90.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>能,但在变量名前加窗体名 </p>
</td>
<td width=84 style='width:63.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
<p align=center style='text-align:center'>能 </p>
</td>
</tr>
</table>
<p><strong><span lang=EN-US>4. 静态变量 </span></strong></p>
<p>用<span lang=EN-US> Static 声明的静态变量,在每次调用过程时保持原来的值,不重新初始化。而用 Dim 声明的变量,每次调用过程时,重新初始化
<br>
<br>
例:显示 1 到 5 个数。 </span></p>
<p><strong><span lang=EN-US>5. 同名变量 </span></strong></p>
<p>对不同范围内出现的同名变量,可以用模块名加以区别。一般情况下,当变量名相同而作用域不同时,优先访问局限性大的变量。 </p>
<p align=center style='text-align:center'><strong><span lang=EN-US>6.5 递归过程 </span></strong></p>
<p><strong><span lang=EN-US>1. 递归的概念 </span></strong></p>
<p>通俗的讲,用自身的结构来描述自身就称为<span lang=EN-US>“递归”。如对阶乘运算的定义就是递归的: <br>
<br>
n!=n(n-1)! (n-1)!=(n-1)(n-2)! </span></p>
<p><strong><span lang=EN-US>2. 递归子过程和递归函数 </span></strong></p>
<p> <span lang=EN-US>VB 允许一个自定义子过程或函数过程在过程体的内部调用自己,这样的子过程或函数就叫递归子过程和递归函数。递归过程包含了递推和回归两个过程。构成递归的条件是:
</span></p>
<p>(<span lang=EN-US> 1 )递归结束条件和结束时的值 <br>
<br>
( 2 )能用递归形式表示,并且递归向结束条件发展。 <br>
<br>
例:编制程序求 fac ( n ) =n !的函数 </span></p>
<p><strong><span lang=EN-US>3. 注意事项 </span></strong></p>
<p>(<span lang=EN-US>1) 递归算法设计简单,但消耗的上机时间和占据的内存空间比非递归大 <br>
<br>
(2) 设计一个正确的递归过程或函数过程必须具备两点: 1 )具备递归条件; 2 )具备递归结束条件 <br>
<br>
(3) 一般而言,递归函数过程对于计算阶乘、级数、指数运算有特殊效果。 </span></p>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -