access过程调用与参数传递

《access过程调用与参数传递》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第15讲VBA的过程调用与变量作用域：复习：标准模块与类模块模块由过程组成：一个模块有1到多个过程组成：所有模块都有一个声明区(过程)，在模块的最前面，用来定义下面过程要用到的变量和字符比较方式等：P257OptionBase0

2、1声明模块中数组下标的初始值，默认为0OptionCompareDatabase声明模块中字符串比较的方法。用数据库的区域ID确定排序级别进行比较。OptionExplicit强制显示声明模块中的所有变量。2009年1Access数据库（第10章）第15讲子过程与函数过程Sub（子程序）过程S

3、ub过程也称为子程序，它一般执行某种操作或一系列运算，但没有返回值。用户可以自己创建Sub过程或使用Access已经创建好的事件过程模块。数据库的每一个窗体和报表都有内置的窗体模块或报表模块。这些模块包含事件过程模板，用户可以在其中添加自己的代码。当窗体、报表或在其上的控件中发生相应的事件时，Access将自动运行这些代码。例如，可以在“学生信息登记”窗体上添加一个“添加记录”的按钮，并在该按钮的单击事件中写上相应的代码，就可以为“学生信息”表增加记录。2009年2Access数据库（第10章）Sub质数1to100(

4、)DimiAsInteger,jAsInteger,kAsIntegerk=1Fori=1To100Forj=2Toi-1If(i/j)=(ij)ThenExitForNextjIfj>=iThenDebug.Printi,k=k+1EndIfIfk=7Thenk=1Debug.Print""EndIfNextiEndSub2009年3Access数据库（第10章）Sub三角形()DimiAsInteger,jAsIntegerDebug.PrintFori=1To9Debug.PrintSpace(15-i);Fo

5、rj=1Toi*2-1Debug.Print"*";NextjDebug.PrintNextiEndSub2009年4Access数据库（第10章）Sub循环()DimxAsInteger,aAsInteger,bAsIntegerx=8Fora=0To1DoWhileb<25b=b+a+xLoopNextDebug.Print"b="&bMsgBox"b="&bEndSub2009年5Access数据库（第10章）第15讲子过程与函数过程Function（函数）过程Function过程能够返回一个计算结果。Acces

6、s提供了许多内置的标准函数以供程序直接调用。例如，Date()函数返回当前机器的系统日期。除了系统提供的内置函数以外，用户也可以自定义函数。编辑一个Function过程的过程就是用户自己定义一个函数的过程。Function过程的优点就是程序可以利用函数的返回值在表达式中，以便对语句或方法中的一些属性进行设置，或在筛选、查询的准则表达式中使用。2009年6Access数据库（第10章）第13讲Access数据库的模块设计函数过程:格式1：Function<函数名>(<参数表>)[As<返回值类型>]<语句序列>[<函数名

7、>=<返回值>]EndFunctionFunctionA(x)DimiAsIntegerA=1Fori=2ToxA=A*iNextEndFunction计算阶乘的函数过程FunctionFac(xAsInteger)AsLong'函数Fac的参数x接受i传递过来的值DimiAsInteger,mAsLongm=1Fori=1Toxm=m*iNextFac=m'将阶乘m的值赋给Fac,用来返回计算结果EndFunction2009年7Access数据库（第10章）Subaa()Debug.PrintFac(4)EndSu

8、b__________________________________________FunctionFac(xAsInteger)AsLong'函数Fac的参数x接受4传递过来的值DimiAsInteger,mAsLongm=1Fori=1Toxm=m*iNextFac=m'将阶乘m的值赋给Fac,用来返回计算结果EndFunction2009年8Access数据库（第10章）第15讲VBA的过程调用过程分类与过程调用:格式1：(无参标准过程)Sub<过程名>()<语句序列1>EndSub调用语句：Call<过程名>

9、说明：可在子过程的语句序列中，用Call语句调用另一个子过程；子过程已定义的变量，可在另一个子过程中引用或修改。2009年9Access数据库（第10章）在过程中，用Dim或Static来声明的局部变量其作用域只限在本过程。两者不同之处在于用Dim语句声明的变量在退出过程时变量的值被清除，而用Static声明的变量其值在退出过程时