怎样在VFP中创建函数,并给函数添加代码

来源：学生作业帮编辑：大师作文网作业帮分类：综合作业时间：2024/11/13 00:44:17

怎样在VFP中创建函数,并给函数添加代码
在VFP中自己怎么添加新函数进去,比如说新函数叫AutoAdd,然后再怎么给它添加代码?
新定义的函数的.PRG文件应该保存在哪里呢

自定义函数就是自己写的程序,后缀也是：PRG.
新建输入指令：modi comm autoadd
很多自带函数有参数,如果你的函数也有参数,请在第一行有效代码写：
Para 参数1,参数2.
参考：
*
* 自定义函数：Seekxsb
* 用来检测指定XSB编号.若存在,函数将返回.T.
* 参数a为搜索条件,b/c返回对应数据.
*
Parameters a,b,c &&接过参数
Private a,b,c,Xz0,re &&声明为内部变量
Xz0='Sele '+Str(Sele(),4) &&取得目前工作区,以便返回时恢复
Sele 0 &&转到最低空工作区
use Xsb again Order iXsNo &&打开表并指定索引-iXSNO为已有索引,again防止因表已打开而出错.
if type('a')='C'.and.Seek(a) &&若参数a字符型(索引为字符型)且能找到...
b=Name_X
c=QuYu
endif
re=found() &&是否找到,用于返回真假
use &&关闭这个表
&Xz0 &&宏替换,恢复到原来工作区
Return re &&返回函数结果
为防止调用后影响正常操作,所以多写了些语句,嫌眼杂只要求能看明白的话可简化为：
Para a,b,c
Sele 0
use Xsb Orde iXsNo
if Seek(a)
b=Name_X
c=QuYu
endif
Retu foun()

怎样在VFP中创建函数,并给函数添加代码 VFP中AT是什么函数 VBA程序设计代码,设计一个函数,通过输入三角形的三个边长,计算三角形的面积,要求函数在标准模块中添加如何在电子表格中添加乘积函数在vfp中求stuff函数的用法详解怎样在excel中添加函数?要求计算值是两个指定数之间的随机数 VFP中函数MOD的用法 vfp中,count函数的用法 vfp中at()函数怎么用? vfp中len函数的问题 VFP创建自定义函数功能:根据一个日期值返回用汉字表示的星期 vfp中where函数和having函数是什么意思