最近在自学vfp。看前人的作品，整体意思大致明白，但是详细意思不懂，求解释。 - 编程论坛

#2

sdta2018-02-23 14:19

最好先看一下帮助文件

#3

雨花石5682018-02-23 17:21

回复 2楼 sdta

我把能看懂的在后面注解了，看不懂的打了问号。
求判断我注解的对错，求解释我不懂的。

#4

吹水佬2018-02-24 05:30

回复 3楼雨花石568

可以参考VFP帮助
如：

只有本站会员才能查看附件，请登录

#5

hu9jj2018-02-24 08:26

以下是引用雨花石568在2018-2-23 17:21:13的发言：

我把能看懂的在后面注解了，看不懂的打了问号。
求判断我注解的对错，求解释我不懂的。

2楼说得没错，只要看一下帮助文件就能理解了！

SE d:\16\jsbfkh\DK\zkmoban.dbf                                            使用zkmoban.dbf
COPY all to d:\16\jsbfkh\DK\zcjk.dbf                                       复制所有内容到zcjk.dbf
COPY all to d:\16\jsbfkh\DK\01zcj.dbf                                      复制所有内容到01zcj.dbf
USE                                                                        关闭当前工作区中打开的表文件

USE d:\16\jsbfkh\DK\01zcj.dbf                                              使用01zcj.dbf
APPEND FROM d:\16\jsbfkh\DK\zcj.dbf                                        将zcj.dbf中所有数据添加到01zcj.dbf中
use                                                                        关闭当前工作区中打开的表文件

select 1                                                                   选择第一个工作区

use d:\16\jsbfkh\DK\zcjk.dbf                                               使用zcjk.dbf
DELETE ALL                                                                 全部内容标记为删除
pack                                                                       永久删除当前表中所有标记了删除标记的记录
APPEND FROM d:\16\jsbfkh\pkc\xmk.dbf                                       将xmk.dbf中所有数据添加到zcjk.dbf
repl all zcj with 0                                                        用0替换xmk.dbf中zcj列
index on kh to kh1                                                         建立索引
sele 2                                                                     选择第二个工作区

use d:\16\jsbfkh\DK\01zcj                                                  使用01zcj.dbf
index on kh to kh2                                                         建立索引文件
sele 1                                                                     选择第一个工作区
update on kh from B repl km01k with B->km01_zcj,km02k with B->km02_zcj,km03k with B->km03_zcj,km04k with B->km04_zcj,km05k with B->km05_zcj,km06k with B->km06_zcj,km07k with B->km07_zcj,km08k with B->km08_zcj,km09k with B->km09_zcj,km12k with b.km12_zcj     更新表中相应的记录数据
BROWSE FIELDS kh,xm,km01k,km02k,km03k,km04k,km05k,km06k,km07k,km07k,km08k,km09k,km12k     打开“浏览”窗口，显示kh,xm……的记录
use                                                                        关闭当前工作区中打开的表文件

sele 2                                                                     选择第二个工作区

USE                                                                        关闭当前工作区中打开的表文件

RUN del d:\16\jsbfkh\DK\*.idx                                              使用外部命令删除索引文件

RETURN                                                                     返回程序控制权给调用程序
thisform.release                                                           刷新当前的表单

#6

hu9jj2018-02-24 08:30

另外这段代码仅供参考，许多做法不值得借鉴，例如使用绝对地址、指定工作区等等。

#7

wengjl2018-02-24 14:32

这样的提问才贴合互动

#8

hyswcyh2018-02-26 14:57

楼主该从基本语法、子句、注释开始学习，或重温一下。

#9

网路盲流2018-05-29 11:43

正如6楼所述，这段代码确实的糟糕蹩足以极，应亦为初学者作业。