如何调用vfp应用程序

如何调用vfp应用程序,第1张

一 、可以直接点击在VFP文件夹下后罪名是PRG的文件

二、进入 VFP 后 可以有以下方式进入:

1、点击菜单栏打开,然后在对话框下的下拉框中选中程序,然后点击你所要打开的程序就可以了。

2.在项目管理器中打开

在vfp中调用某方法,应该这样写:

do sdl11 in abc

而abc.prg中是存储过程的,如:

proce sdl11

*租赁单价的新建

*do sdl25

use .\dbf\kcwzcbj

copy struct to .\dbf\temp

use

use .\dbf\zydwmc

delete all for zldm=space(3)

pack

use

return

proce sdl12

*租赁单价的添加

*租赁单价的添加,原有的租赁单位已经存在租赁价格库,

*但是中途中,又要租赁新添加的品种,就必须运行本程序

use .\dbf\kcwzcbj

copy struct to .\dbf\temp

use

return

proce sdl13

*租赁单价的修改

use .\dbf\kcwzcbj

copy struct to .\dbf\temp

use

return

如果我们在调用某方法或函数,要传递参数,在调用某方法中,应该这样写:

do rzjjg in abc with ‘P30120',100

而 abc.prg中应该有,rzjjg,并且它的第一个语句必须为

para 参数1,参数2,。。。

『参数的个数与调用必须一一对应』

func rzjjg &&计算日租金价格

para x3,x2 &&x3:回送材料代码,X2:回送材料数量

select 3

seek x3

x4=iif(found(),rzj*x2*djmj,0) &&X4:日租金,djmj:单件面积(租金)

select 4

replace rzj with x4

return .T.

func cbjjs &&计算丢失价格

para x1,x2

select 3

seek x1

x4=iif(found(),cbj*x2,0)

select 4

return x4

以上的均为本人商业软件《建筑机具租赁管理系统-VFP版》的一个很小很小部分。

参考资料:本人商业软件《建筑机具租赁管理系统-VFP版》


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/yw/11531007.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-16
下一篇 2023-05-16

发表评论

登录后才能评论

评论列表(0条)

保存