用VFP怎么做会计凭证录入的表单???高手帮忙!

发布网友发布时间：2022-09-16 22:00

共2个回答

热心网友时间：2023-10-14 06:03

讲一下思路：
上面是几个文本框，下面是GRID；
表（JZPZ）的字段：PZH凭着号,RQ日期,ZY摘要，JFJE借方金额,XFJE贷方金额,SHBZ审核标志
TEXT1:PZH,TEXT2:RQ,TEXT3:ZY,TEXT4:JFJE,TEXT5:DFJE

FORM1.INIT
SELECT 0
USE JZPZ
THISFORM.GRID1.recordsource='jzpz'
WITH THISFORM.GRID1
.COLUMN1.WIDTH=180
.COLUMN2.WIDTH=80
.COLUMN3.WIDTH=80
.COLUMN1.HEADER1.CAPTION='摘要'
.COLUMN2.HEADER1.CAPTION='借方金额'
.COLUMN3.HEADER1.CAPTION='贷方金额'
.COLUMN1.controlsource='jzpz.zy'
.COLUMN2.controlsource='jzpz.jfje'
.COLUMN3.controlsource='jzpz.dfje'
endwith
THISFORM.TEXT1.VALUE=SCPZH() &&做一个过程，生成凭证号
THISFORM.TEXT2.VALUE=DATE()
THISFORM.TEXT3.VALUE=''
THISFORM.TEXT4.VALUE=0.00
THISFORM.TEXT5.VALUE=0.00
*录入一条记录后确定按钮
COMMAND1.CLICK:
M.PZH=THISFORM.TEXT1.VALUE
M.RQ=THISFORM.TEXT2.VALUE
M.JFJE=THISFORM.TEXT4.VALUE
M.DFJE=THISFORM.TEXT5.VALUE
M.ZY=THISFORM.TEXT3.VALUE
INSERT INTO JZPZ FROM MEMV
THISFORM.GRID1.REFRESH

热心网友时间：2023-10-14 06:03

要看你用什么数据库，这里当你用的是foxpro数据库：

先确定好凭证里有几个字段，
再建一表单，放上组件用来获取数据，
添一个按钮双击加上方法来处理输入的数据，
把处理好的数据放入数据库存放。

如果有其他数据库就要用远程连接的方法保存数据。