CH2 Visual FoxPro程序设计基础

1、,Visual Foxpro,第二章 Visual FoxPro程序设计基础,学习要点：,2.1 常量与变量,2.1.1常 量 2.1.2变 量,2.2 函数,2.3 表达式,2.4 程序与程序文件,重点与难点：,数据类型 变 量,表达式,常用函数,程序：,作文：,造句 组词 识字 拼音,语句,语句格式、表达式,常量、变量、函数,2.1 常量与变量,常量,在程序中不变的量,掌握：A.组成 B.定界符 C.特别注意,2.1.1 常 量,常量是在数据处理过程中其值保持不变的数据。 常量在数据输入或命令表达式中可以被直接引,用。,在Visual FoxPro中定义了6种类型的常量：数,值型常量、字符

2、型常量、逻辑型常量、浮点型 常量、日期型常量、日期时间型常量。,1数值型常量(N),数值型常量是由正、负号数字（09）和小数,点组成。,Eg：123，-10,定界符：无,可以是整数、小数，但不可以用分数。,例如326、178.56、+3125.27都是合法的数值型常,量。,科学计数法的描述形式 3*105,2字符型常量（C）,A.组成：字母、符号、汉字、数字、空格。 B.字符型常量是由分界符（双引号、单引号、方,括号）括起来的一串汉字、字符组成。,C.定界符要配对使用,例如“FoxPro”、程序设计、Y=？都是合法,的字符型常量。,引入VFP命令 注意：命令在命令窗口输入，输入结束后以回 车结

3、束（Enter）。 退出vfp系统：quit。 清理主屏幕：clear。,输出命令： ? 隔行输出 ? 同行输出,注意：都是相对上一行来讲。 特别注意：在vfp用到的符号都是英文半角,?123 ?$124 ?”hello” ?123 ?”word”,3逻辑型常量（L）,逻辑型常量只有两个值，逻辑真和逻辑假。 A.一般是用字母.T.表示真，用.F. 表示假。,B.定界符：在书写时注意字母两边的黑点不能省,略。,4日期型常量（D）, 日期型常量用于表示日期，使用时必须用花,括号括起来。,A.0-9的数字,B. 年4-月2-日2,C.系统默认格式：月/日/年(主屏幕),4日期型常量（D）, 补充：关

4、于日期的几个命令 （1）设置日期分隔符（显示用） SET MARK TO 分隔符,注意：分隔符用引号。,Eg：date（）显示当前系统时间 （2）设置日期的年月日顺序（显示用） SET DATE TO （3）设置年份的显示位数（显示用） SET CENTURY ON:四位,OFF：两位,关于命令总结：必选,可选可不选 |必选其一,5日期时间型常量（T） A.0-9数字 B.年-月-日 时:分:秒。 12制/24制,AM：上午,PM：下午, 日期时间型常量是用于表示日期和时间，使 用时必须用花括号括起来。,8:25:30是合法的日期时间, 例如06/26/2002 型常量。,6货币型（Y）, 组

5、成：0-9，小数点 定界符：$, 自动保留四位小数（自动四舍五入）,学习要点：,2.1 常量与变量,2.1.1常 量 2.1.2变 量,2.2 函数,2.3 表达式,2.4 程序与程序文件,2.1.2 变 量 变量是一种在命令操作和程序运行中其值要 发生变化的量。 每一个变量都是用来存放数值的容器存储 常量的量。, 在Visual,FoxPro中，变量可以分为内存变量、,数组变量和字段变量。,内存变量, 内存：出口, 内存变量是数据库结构之外独立存在于内存 中的临时存储变量，它可以存放程序中的原 始数据、中间结果和最终结果，以及用于控 制程序执行的各种参数。, 内存变量一般随程序运行结束或退出

6、Visual,FoxPro系统时释放。,1内存变量名, 内存变量名是每一个内存变量都必须固有的,名称，以标识该内存单元的存储位置。, 用户可以通过内存变量名对内存变量中的数,据进行操作。, 内存变量名的命名规则是以字母、下划线开 头，由字母、数字、下划线组成，其长度可 以达到254个字符。,2内存变量类型, 内存变量的类型是指内存变量中存放的是什,么形式的数据。, 通常内存变量的类型是由变量当前值的类型 决定，在Visual FoxPro中，内存变量的常用,类型有数值型、浮点型、字符型、逻辑型、 日期型和日期时间型6种。,3创建内存变量, 创建内存变量一般是通过各种赋值命令来实现。 在完成内存

7、变量赋值时就产生了内存变量，同时也,自动将内存变量定义为相应赋值的数据类型。 对内存变量赋值的命令有多种，可以由STORE、 INPUT、WAIT、ACCEPT、COUNT和SUM 等命,令建立。,（1）内存变量赋值命令,【格式】,【功能】给内存变量赋值。,STORE TO 或 ,例如：,X=12.3, 若不同，与除数相加. 乘方表示,2字符表达式, 字符表达式是由字符运算符、字符型常量、 字符型内存变量、字符型字段变量、字符型 数组和函数组成。, 字符表达式的运算结果仍然是字符型数据。,字符运算符用于连接字符串。, +:两个字符串首尾相连。, -：先把前字符串尾部的空格移到整个字符,串的后面

8、，然后首尾相连。,Eg: a=hello B=world!,?a+b ?a-b ?a - b +a,& hello world! & helloworld! & helloworld! a,3关系表达式 关系表达式是由关系运算符、算术表达式、 字符表达式等组成。 关系表达式的运算结果是逻辑值真或假，当 关系成立，结果为.T.(真)；当关系不成立， 结果为.F.（假）。, ,=,/#(不等于) ,=/=(字符串设,置比较),$(子串测试),“=”用作字符串比较，与设置SET EXACT ON|OFF命令有关。,ON：首先在较短字符串后面补上空格，使之长度相等，然后比较。 OFF：如果右边字符串是

9、左边字符串的子串就返回T(以等号右边字 符结束为标识)。 Eg： set exact on,“ab”=“abc” “ab”=“ab ” set exact off “abc”=“abc” “abc”=“ab” “acb”=“ab”,.f. .t. .t. .t. .f.,(2) “$”:如果左边字符串是右边字符串的子串就返回.T. Eg: “ab”$ “abc” .t.,(3) “=”:如果左右两边字符串都完全相等，返回.t.,补充：比较运算时，不同类型数据的大小规定 A.数值型：10,B.日期型：越晚的日期越大 C.逻辑型：.T.F. D.字符型：,字母：abczAB.Z,汉字：先把汉字转换

10、成拼音，然后比较 比较原则：“一局定输赢”,Eg:“吴”王”,E.优先级：“,=, “= = !=”,赋值和比较： ?x=y- 2 x=y y=x=2 x=y x,1.vfp的表达式 ：是由命 令、变量、操作符组成. 2.一个命令行至少有一个 命令。 3.分析这样的语句要选择 命令语句,再找操作符 。,这里的=是命令,赋值和比较：,x= y,? x=y-2,这里的?是命令，=是运算符， x.y是变量 显示 x=y 是真还是假,x.y是变量,把y的值赋值 给x ? x=y,这里的命令是? ，=和-是运算符,按照优先级顺序，先做算数运算；最后，把x是否等于y-2,的值显示出来,? x=y=2,x=

11、y=2,第一个=是命令，第二个=运算符 把y=2是否为真的结果赋值给X,会显示错误,这是因为? 是命令，后面的=都是比较，没有括号所以按顺 序运算 优先级，先运算x=y，结果为逻辑型（L）；然后运 算L= 2, 因为运算符二两类型不一致,所以提示错误。,4日期或日期时间表达式, 日期或日期时间表达式是由算术运算符（+ 或-）、算术表达式、日期或日期时间型变,量、日期或日期时间型内存变量数组及函数 组成。, 日期或日期时间型的运算结果是日期或日期,时间型或常数。,日期或日期时间运算及表达式一览表,运算符,功 能,举,例,结,果,+,相加,相减,日期+数字 2010-01-17+10 2010-0

12、1-17 10:20:20+150 日期-数字,01/27/10 01/27/10 10:22:50 01/17/10,日期型 日期时间型 日期型,2010-01-2710 日期-日期 2010-06-262010-05-26,31,数值型,两个日期不能相加！,日期型和日期时间型数据在使用时有多种环境，系 统默认环境是严格的日期格式，命令如下：, SET,STRICTDATE TO 1,& 系统默认,严格的日期格式 在严格的日期格式下，日期或日期时间运算可以采 用如下形式：, ?,2002-06-19-10,或 ？CTOD(06/19/02)-10 输出结果为：06/09/02, 日期型和日期

13、时间型数据在输出时，若要输出是四位年份,应 使用世纪的日期格式设置命令：, ,SET CENTURY ON 格式 ？CTOD(06/19/02)-10 06/09/2002,& 设置世纪的日期 & 显示结果, 若要改为原来的默认格式，应使用设置命令:,SET CENTURY OFF,& 取消世纪的日期格式,？CTOD(06/19/02),06/09/02,& 显示结果,5逻辑表达式, 逻辑表达式是由逻辑运算符、逻辑型常量、逻 辑型内存变量、逻辑型数组、函数和关系表达 式组成。, 在逻辑表达式中，可以描述复合条件的多个关,系表达式，一般格式为：, 逻辑表达式运算的结果是逻辑值真（.T.）或假,（

14、.F.）。逻辑运算符及举例如表所示。,逻辑运算符及表达式一览表,运算符,功 能,举,例,结,果,.NOT.,或！,逻辑非，取逻辑值相反的值,? .NOT.73,.F.,.AND.,逻辑与，两边的条件都成立，其 结果值为真,?5*927.AND.36,.T.,.OR.,逻辑或，只要一边条件成立，其 结果值为真,16 ?7*320.OR.251 9,.T.,逻辑运算的规则,A .T. .T. .F. .F.,B .T. .F. .T. .F.,.NOT.B .F. .T. .F. .T.,A.AND.B .T. .F. .F. .F.,A.OR.B .T. .T. .T. .F.,逻辑运算的优级：

15、.NOT.、.AND.、.OR.,学习要点：,2.1 常量与变量,2.1.1常 量 2.1.2变 量,2.2 函数,2.3 表达式,2.4 程序与程序文件,2.4.1 程序文件操作及输入语句 2.4.2 程序基本结构,交互式范式,适合解决一些简单问题,3.4.1程序文件的操作及输入语,句,2,VFP系统三种操作方式：菜单、命令、程序,有多条命令组成的文件 命令可以不用顺序方式,执行,程序文件的操作,关于VFP文件的操作,程序、数据库、表、查询、视图、表单、菜单,、报表。,前提：提前建立好默认目录。 Set default to d:,建立：文件-新建-程序-新建文件-编写程序 保存：文件-保存

16、-输入文件名-保存（点击保存,按钮）。扩展名为.prg。,打开：,A.文件-打开-文件类型-文件名-确定 B.MODIFY COMMAND ,运行（查看程序运行结果）,A.程序-运行-选择文件-运行（或直接选红色叹号运行） B.DO 文件名,此命令既可以在命令窗口发出，也可以出现在程序,文件中，表示调用执行另一个程序。 结束：,A.所有命令被执行 B.遇到下列语句：,（1）CANCEL：终值程序的运行 （2）DO：转去执行另一个程序,（3）RETURN：结束当前程序的执行，返回上级程序 （4）QUIT：退出VFP系统,关闭：点击程序文件右上角,文件添加注释： *或NOTE -添加在开头代码行,

17、&,-添加在命令行尾部,注释不以分号结尾，否则下一行仍作为注释。 每条都以回车键结尾，一行只写一条命令。若需分行 书写，加续行符；,简单的输入输出命令,1.Accept 提示语 to 内存变量,【注意】：提示语必须加引号,只接受字符型数据,【功能】：程序暂停运行，显示提示语，等待用 户输入，输入结束按回车把输入内容赋值给内 存变量。,2.Input 提示语 to 内存变量,【注意】：接受任何vfp合法数据类型，输入内,容时加定界符。,【功能】：程序暂停运行，等待用户输入，输入,结束按回车把输入内容赋值给内存变量。,input 请输入一个数 to a input 请输入另一个数 to b ?a+

18、b,Eg：Input输入语句,3.Wait 提示语 windows timeout 秒数,【功能】：显示内容在屏幕右上角，显示时间由,秒数确定。,Eg：,?马上开奖，请耐心等待,wait 恭喜你中奖了，矿泉水一瓶！ window nowait timeout 5 ?开奖结束，请继续,学习要点：,2.1 常量与变量,2.1.1常 量 2.1.2变 量,2.2 函数,2.3 表达式,2.4 程序与程序文件,2.4.1程序文件操作及输入语句 2.4.2 程序基本结构,2.4.2 程序基本结构,1.选择结构 2.循环结构,3.顺序结构：从上到下，从前到后 重点掌握：语句的执行过程 程序语言现实语言 读

19、程序 现实语言程序语言 写程序,（一）选择结构,1.单重选择,语法格式：,if 语句,Endif,首先判断条件是否成立，就是最终结果是一个逻辑值 ，如果为真，执行语句，执行后到endif语句；如果为 假，不执行语句，直接到endif后的语句。,（一）选择结构,【Eg】 Clear,Input “请输入a:”to a,Input “请输入b:” to b If ab,？ “最大值为：”,a Endif,？ “程序执行完毕”,2.双重选择,If 语句1 Else 语句2,Endif 执行过程：首先判断条件是否成立，如果成立， 就执行语句1，否则就执行语句2。执行后到endif 后的语句。,提示：

20、（1）else后没有条件。 （2）双重语句有且只能执 行一条。, 3.多重选择,Do case Case 条件1 语句1 Case 条件2 语句2 Case 条件m 语句m otherwise 语句m+1 Endcase, 执行过程 依次判断条件是否成立 ，哪个成立就执行哪 个语句，执行后直接 到endcase后的语句 。 如果没有成立的，就指 定otherwise语句，如 果没有otherwise语句 ，就什么也不执行， 直接到endcase后的 语句 注意：多重选择最多执 行一条语句。,（二）循环结构,1.while循环,语法格式,Do while 循环体 Enddo,执行过程：首先判断条

21、件是否成立，如果为真，就执行 循环体，执行后再次判断条件是否成立，若成立则再 执行，直到条件为假，退出循环，到enddo后的语句。,Eg：1+2+3+100 = 5050,注意：临界值的变化；用于条件比较明显的循环。,LOOP命令,结束本次循环，不再执行循环其后的循环语句，而是转,回DO WHILE处重新判断。,EXIT命令,结束循环体的执行，转去执行ENDDO后面的语句。,2.for循环 For 循环变量 = 初值 to 终值 step 步长 循环体 Endfor,执行过程： A.如果步长为正， 判断条件为循环变 量=终值，如果条 件成立，就执行循 环体，执行后循环 变量按步长递增。 然后再

22、次判断条件 是否成立，如果成 立，再次执行，再 判断，直到条件为 假，退出循环，到 endfor后的语句。,B.如果步长为负，,判断条件为循环 变量=终值，如 果条件成立，就 执行循环体，执 行后循环变量按 步长递减。然后 再次判断条件， 如果成立，再执 行，再判断，直 到条件为假，退 出循环，到 endfor 后语句。 C.默认步长是1.,2.for循环 For 循环变量 = 初值 to 终值 step 步长 循环体 Endfor,D.、终值,、都可以 是数值表达式， 但是这些表达式 仅在循环开始时 执行一次，在循 环体执行过程中， 初值、终值、步 长不会改变。 E.LOOPEXIT语 句同

23、样适用于for 语句。,2.for循环 For 循环变量 = 初值 to 终值 step 步长 循环体 Endfor,Eg:,编写程序，判断一个大于3的自然数是否为素数,学习要点：,2.1 常量与变量,2.1.1常 量 2.1.2变 量,2.2 函数,2.3 表达式,2.4 程序与程序文件,2.4.1程序文件操作及输入语句 2.4.2 程序基本结构 2.5 多模块程序设计,主程序、子程序,变量：全局变量、私有变量、局部变量,2.5 多模块程序设计,一.过程的概念,在程序设计中，为了有效地解决有些运算或程序段落重,复调用的情况，可以设计相对独立并能完成特定功能的程 序段，这种程序段称为过程或子程

24、序，用于调用程序段的 程序称为主程序。,在应用系统的开发中，一般会根据实际需要将整个系统,划分成若干模块，通常将这些可以调用的功能模块也设计 成过程或子程序。,模块是一个相对独立的程序段，它可以被其它模块所调用，,也可以去调用其它的模块。,循环结构实现在一个程序中多次执行的某段程序。过程,实现在同一程序的不同位置，或在不同程序中执行相同程 序段。,在应用系统开发中，通常将系统划分成若干个模块，系,统在主模块控制下，调用各个功能模块以完成系统的各种 功能操作。,通常将这些可调用的功能模块设计为过程或者子程序。,可以在程序末尾加 return TO MASTER|TO ,【说明】:RETURN返回

25、调用该过程的主程序，并执行主程序中 调用命令的下一条命令；TO MASTER直接返回最高级程序。,1.子程序的建立于调用 （1）建立子程序,选择：将表达式的值返回给调用程序。,选择TO MASTER：不论前面有多少级调用，直接返回第,一级主程序。,选择TO 程序文件名：可以直接返回指定的程序文件。 缺省return命令：在过程结束处自动执行一条隐含的 return命令，并返回逻辑真。,（2）调用子程序,格式1： do 格式2： (),【功能】：执行DO调用命令时，将指定的过程调入内存,并执行。,【说明】：,格式2中的子程序名不加扩展名,补充：输出命令 （1）非格式输出命令,【格式】,？,或 ？

26、 【功能】显示内存变量、常量或表达式的值。 【说明】 ？是在光标所在行的下一行开始显示 ？则是在当前光标位置开始显示。,（2）格式输出命令,【格式】,【功能】按指定的坐标位置在屏幕上输出表达式的值。, SAY ,【说明】输出的位置由指定，表,达式的内容可以是数值、字符、内存变量,和字段变量。, 2,10 say 电话号码簿 4,10 say A:按姓名查询 6,10 say B:按记录号删 除, 8,10 say C:插入新纪录,（3）文本输出命令,【格式】,TEXT, ENDTEXT 【功能】将TEXT和ENDTEXT之间的文本信息照原 样输出。 【说明】TEXT与ENDTEXT在程序中必须

27、配对。,补充：,环境设置命令,系统提供SET命令组用来设置程序运行的环境。,（1）关闭对话命令,【命令】 SET TALK ON|OFF,【功能】 控制非输出性的执行结果是否在屏幕上显示或打印出来,。,【说明】 系统默认值为ON。,（2）设置跟踪命令,【命令】 SET ECHO ON|OFF,【功能】 控制程序文件执行过程中的每条命令是否显示或打印出,来。,【说明】 系统默认值为OFF。,【例】 编写程序P1.PRG，其程序功能是计算 S=X!+Y!+Z! 。,程序P1 .PRG主程序和子程,序编写窗口,2.过程文件,过程是作为一个文件独立地存储在磁盘上，为减少磁盘文 件的打开次数，可以把多个

28、过程写入一个过程文件中，过 程文件中包含的过程数量不限。过程文件的扩展名仍然 是.PRG。,（1）建立过程文件,【功能】建立过程文件。,MODIFY COMMAND ,RETURN,RETURN,RETURN,PRO.prg,RETURN,RETURN,RETURN,PROCEDURE RETURN PROCEDURE RETURN PROCEDURE RETURN,过程文件的基本书写格式： 过程文件也可以放在命令文件中，,但必须放置在正常代码后面： PRO.prg PROCEDURE RETURN PROCEDURE RETURN PROCEDURE RETURN,（2）执行过程,当程序执行

29、到调用子程序的语句时，系统将外存中 的子程序调入内存，程序自动转到相应的子程序去 执行。子程序执行完毕，程序返回调用子程序语句 的下一语句继续执行。,【功能】调用过程文件中的指定过程。,后加()表示带参调用,DO （）,（3）打开过程文件 SET PROCEDURE TO 【功能】打开指定的过程文件，将过程文件中所 包含的子程序全部调入内存。 【说明】, ,若修改了过程文件的内容，一定要重新 打开过程文件，再进行过程文件的调用。 系统在同一时刻只能打开一个过程文件， 打开新过程文件的同时将关闭原来打开 的过程文件。,（4）关闭过程文件,SET PROCEDURE TO,【功能】关闭已打开的过程

30、文件。,RELEASE PROCEDURE,【功能】关闭指定过程文件。,【例】 编写程序P2.PRG，其程序功能是求3100之间的所有素数。 注意：对一个自然数M（取值在3100之间的奇数）求素数的方法是：将M 依次除以3到M的算数平方根之间的数，若均不能被整除，则M即为素数，否 则，M不是素数。 3100之间的所有素数：,13 31 53 73,3 17 37 59 79,5 19 41 61 83,7 23 43 67 89,11 29 47 71 97,图 程序P2 .PRG主程序和过程文件编写窗口,二.变量的作用域和参数调用 1变量的作用域,在程序设计中，内存变量的这些作用范围称为,内

31、存变量的作用域。,内存变量的作用域根据作用范围可分为全局变,量、私有变量和局部变量。,（1）全局变量 全局变量是指在程序的任何嵌套中及在程序 执行期间始终有效的变量。程序执行完毕，它们不 会在内存自动释放。 全局变量的定义如下： PUBLIC 【功能】将内存变量名表中的变量声明为全局变量。 【说明】, ,全局变量初值为逻辑假（.f.） 简单变量和数组变量都可以定义为全局变量 命令窗口中直接使用而由系统建立的变量也为全 局变量,（2）局部变量,局部变量是指用LOCAL命令定义的，只在建立它,的过程中有效的内存变量。,建立局部变量的程序执行完毕，局部变量的值将,被自动清除。,局部变量的定义方式:,

32、LOCAL,（3）私有变量,私有变量是指在程序中直接使用而未通过PUBLIC,和LOCAL命令声明，而由系统自动隐含建立的变 量。,私有变量的作用域是建立它的模块和其下属各模,块。,一旦建立它的模块程序运行结束，私有变量将自,动清除。,开发程序是模块化开发的，主程序和子程序很可能 不是同一个人建立的，对于其他程序模块中变量的 使用，编程者并不是很清楚。可能出现如下情况： 子程序中用到的变量是主程序中已经建立的，子程 序的运行会改变主程序中变量的值。在此，PRIVATE,命令可以解决这些问题：,PRIVATE命令可以隐藏主程序中可能存在的变量，,使得这些变量在子程序中暂时无效。,PRIVATE

33、,PRIVATE ALL LIKE |EXCEPT,【注意】PRIVATE命令不是建立内存变量，而是隐藏,在上层模块中可能已经存在的内存变量，使得这些变 量在当前模块暂时无效。,图 程序P16 .PRG主程序和调用过程编写窗口,【例】编写程序P16.PRG，其程序功能说明过程中全局变量和局部 变量的应用。 输出结果：,在主程序中：A=1 在过程中：A=11,B=2 B=12 C=13 D=14,返回主程序后：A=11,B=2 C=13 D=, List memo like ?,List memo like ?,?List memo中like初？始变量：”,?List memo like ?后的

34、变量：”, ?List memo like始？变量”,*p1.prg* Public a,b A = 1 B = “good” ?”程序p1中的初始变量：” Do p2 ?”程序p1中执行p2后变量：” return,*p2.prg* Private a,C = 12 Store date() to a,b ”程序p2 的 Do p3 ”程序p2执行p3 return *p3.prg* Private a A = “12345” B = year(b) C = str(c,1) Private c Store 5 to a,b,c ”程序p3中初 return,3、过程的带参调用,过程的带参调

35、用方法:在调用过程的命令和被调,用过程的相关语句中，分别设置数量相同、数 据类型一致且排列顺序相互对应的参数表。 调用过程的命令将一系列参数的值传递给被调,用过程中的对应参数，被调用过程运行结束时 ，再将参数的值返回到调用它的上一级过程或 主程序中。,这种调用是通过带参过程调用命令和接受参数,命令实现的。,（1）带参调用(调用模块),【命令】,DO WITH , （） 【功能】调用一般过程或过程文件中的过程，并为 被调用过程提供参数。 【说明】该命令只用在调用过程的程序中。此处又称为实参表，其中的参数可以是常 量、已赋值的变量或数值表达式，参数之间 用逗号分开。,（2）接受参数,【功能】接受调

36、用过程的命令传递过来的参数。,【命令】 PARAMETERS ,【说明】该命令必须位于被调用过程的第一条可执行,语句处。此处又称为形参表，其中,的参数一般为内存变量。形参与实参的个数 应相等、数据类型和个数要对应相同。,LPARAMETERS ,3、传递方式：,（1）值传递,只能把值,主程序,子程序,（2）引用传递,主程序,子程序,注意：是通过改变调用命令改变数据传递方式 对于do 程序名格式来说： store 123 to t1,t2,例(值传递）,do a1.prg with 5,19+t2, (t1),parameter a1,a2,a3 例（引用传递） do a1.prg with t1,t2 parameter m1,m2,如果使用的是调用命令格式2，默认情况下都是值传递， 但可以通过下了命令改变 Set udfparms to value | reference Set udfparms to reference (设为引用传递） Set udfparms to