《VFP常用命令及用法》由会员分享，可在线阅读，更多相关《VFP常用命令及用法（26页珍藏版）》请在金锄头文库上搜索。
1、VFP 常用命令及用法、实例命令中用到的范围：ALL： 命令对表中所有记录起作用，即执行时从首记录到末记录，最记录指针停在数据库的末尾。 NEXT 命令作用于从当前记录开始到当前记录后条记录为止的范围内的记录，最后记录指针指向作用范围内的最后一条记录处。NEXT 1 表示仅作用于当前记录。 Record 命令作用于记录号为的记录。 TEST 命令作用范围从当前记录开始到表的最后一个记录为止 命令中的 FOR 子句只作用于满足条件的记录。 一、基本命令1. 打开和关闭数据表USE 当省略选项时为关闭当前数据表CLOSE ALL 关闭所有数据表2. 选择当前工作区 SELECT 功能：选择当前工作
2、区。可以直接选择工作区号，也可通过指定其中已经打开的数据表别名来指定工作区。SELECT 0 是选择当前未使用的最低编号的工作区3. 增加记录APPEND BLANK 在当前表的尾部追加一个空白记录INSERT BLANK 在当前表的当前记录之后插入一条空白记录INSERT BLANK BEFORE 在当前表的当前记录之前插入一条空白记录注意：在表建立索引后，INSERT 的功能与 APPEND 相同4. 替换字段的值REPLACE 范围 WITH , WITH , . WITH FOR 功能：计算表达式的值，并填入指定字段，当范围和条件选项省略时只对当前记录操作。5. 删除记录DELETE
3、范围 FOR 条件功能：对记录加删除标记（即逻辑删除），当范围和条件选项省略时只对当前记录操作。 RECALL 范围 FOR 条件功能：对记录去除删除标记（即恢复删除），当范围和条件选项省略时只对当前记录操作。PACK功能：删除带有删除标记的记录ZAP功能：物理删除当前表所有记录6. 建立索引与选择主控索引INDEX ON TAG DESCENDING功能：对当前表按建立结构复合索引，索引文件名与表名相同，扩展名默认为 CDX。DESCENDING 选项为按关键字降序排列，默认为升序。SET ORDER TO TAG 功能：在结构复合索引文件打开后，指定主控索引标识符。7. 记录指针定位GO
4、BOTTOM | TOP | 功能：移动记录指针直接指定记录。BOTTOM 为指向末记录，TOP 为指向首记录，为指向记录号为的记录。SKIP expN功能：按 expN 的值，从当前位置出发移动记录指针。当 expN 为正时向尾部方向移动 expN 条记录，当 expN 为负时向首部方向移动 expN 条记录，当expN 为 1 时可以省略。8. 查找LOCATE 范围 FOR 条件功能：在数据表的指定范围中搜索满足条件的第一个记录。搜索成功，记录指针指向该记录，并将 FOUND（）置为.T.；否则，记录指针指数据表末尾，并将 FOUND（）置为.F.。缺省为 ALL。CONTINUE功能：
5、查找下一个满足 LOCATE 命令指定条件的记录，查找成功，将FOUND()置为.T.并将指针指向满足条件的记录；否则，记录指针指数据表末尾，将 FOUND()置为.F.。9. 数据表复制COPY TO 范围 FIELDS FOR 条件 功能：把已打开的表内容复制到新的表中。缺省值为 ALL。规定了新表字段，缺省为全部字段。COPY STRUCTURE TO FIELDS 功能：把当前表的结构复制到新的表中。不复制记录。规定了新表字段，缺省为全部字段。10. 统计COUNT 范围 FOR 条件 TO 功能：统计表中满足条件的记录个数，并存入指定的内存变量。缺省时为 ALLSUM 表达式表 范围
6、 FOR 条件 TO 功能：统计表中全部的或指定数值字段的值的和，并各个和存入指定的内存变量，内存就是的个数求和的数值表达式个数相同。缺省时为 ALLAVERAGE 表达式表 范围 FOR 条件 TO 功能：统计表中全部的或指定数值字段的值的平均，并各个和存入指定的内存变量，内存就是的个数求和的数值表达式个数相同。缺省时为ALL二、函数1. 数学函数ABS(expN)功能：求数值表达式的绝对值。INT(expN)功能：对数值表达式 expN 取整数部分ROUND(expN, Dec)功能：对数值表达式 expN 精确到小数点后 Dec 位。2. 字符函数SUBSTR(expC, expN1,
7、expN2)功能：取字符串 expC 中从 expN1 开始的 expN2 个字符，若 expN2 省略，则从 expN1 开始一直取到最后。TRIM(expC)功能：取掉字符串 expC 的尾部空格。ALLTRIM(expC)功能：取掉字符串 expC 首尾的空格。 SPACE(expN)功能：产生 expN 个空格。UPPER(expC)功能：将字符串 expC 转换成大写。LOWER(expC)功能：将字符串 expC 转换成大写。expC1 $ expC2功能：判断字符串 expC1 是否在 expC2 中出现，若出现则值为.T.，否则为.F.。3. 日期函数DATE()功能：获取系统
8、日期。4. 类型转换VAL(expC)功能：将数字字符值转换成数值，如：VAL(123.45)的值为数值 123.45STR(expN , 宽度 , 小数位数) 功能：将数值转换成字符串，当小数位数省略时不带小数，当宽度和小数位数都省略时宽度为 10 不带小数。DTOC(expD)功能：将日期表达式 expD 转换成字符表达式，格式与系统日期格式一致。DTOS(expD)功能：将日期表达式 expD 转换成字符表达式，格式为 YYYYMMDD，前 4 位为年份中间 2 位为月份最后 2 位为日。CTOD(expC)功能：将符合当前系统日期格式的字符串转换成日期值。5. 测试函数FOUND()功
9、能：测试当前的查找(SEEK, LOCATE, CONTINUE)是否成功。查找成功函值为.T.否则为.F.。EOF()功能：测试当前记录指针是否到了数据表的末尾。当在末尾时函数为.T.否则为.F.。 RECNO()功能：返回当前记录号。我的主程序代码:main.prgDECLARE INTEGER FindWindow IN WIN32API STRING,STRINGLOCAL cTitlecTitle=工资管理系统IF FindWindow(0,cTitle) all like内存变量保存yfd=alltrim(ThisForm.Combo1.value)save to yf &将内存中
10、的“所有”变量存入文件yf.mem 中save to yf all like yfd &将内存中所有以 yfd 匹配的变量存入文件yf.mem 中save to yf all like yf* &将内存中所有以 yf 打头的变量存入文件yf.mem 中2、*-*restore from restore from nf.mem additive &把内存变量从文件 nf.mem 恢复，选参数 additive 项时，不对其它内存变量产生复盖。3、*-*后台最小化运行 RAR.EXERUN /n7 rar a -Y bakfile b*.dbf c*.dbf. &在后台最小化运行RAR.EXE 且
11、不等待。4、*-*if bof()=messagebox( 到最前一个了！ ,0, 提 示 )goto topelse skip -1endif 5、*-*if eof()=messagebox( 到最后一个了！ ,0, 提 示 )goto bottelse skip endif 6、*-*COPY TO dbk.dbf TYPE XL5 数据表复制成 xls 文件7、*-*=messagebox( 完成！ ,0, 提 示 )8、*-*hzdx=零壹贰叁肆伍陆柒扒玖拾佰仟万拾佰仟亿拾佰仟9、*-*IF MESSAGEBOX(真的退出系统吗？,4+32+256,提示)= 6CLOSE DATAB
12、ASESclear allclose allCLEAR EVENTSthisform.Release quitENDIF 10、*-*表数据更新：update 表名 SET 字段名 1 =表达式，字段名 1 =表达式，.WHERE 条件11、*-*从其它表取数据：把已有表的记录成批追加到当前表中append from 文件名 for 条件 1 while 条件 2 12、*-*ThisForm.grdGzk 的 refresh &表格内运算IF USED(gzk)replace 应发合计 with 等级工资+责任津贴+奖资+干资+书报+单车+燃料+考勤+临职补贴+;地区津贴+城市补贴+节支奖+
13、奖励工资+清饮+洗理+电费+报刊+粮差+肉菜+;劳保+职务保贴+出纳劳保+保健+医药+家属医药+妇卫+会计补贴+其它replace 扣除合计 with 水电+保险+工会+其他 REPLACE 结余合计 WITH 应发合计-扣除合计ENDIF13、*-*ThisForm.grdGzk 的 AfterRowColchange &表格变色Mcurrec=STR(RECN() & 获取当前所在记录号THIS.SETALL(dynamicbackcolor,IIF(RECNO()=&Mcurrec.,RGB(145,236,252),RGB(255,255,255) & 设置背景色，满足条件为黄色，不满
14、足为黑色THIS.SETALL(dynamicforecolor,IIF(RECNO()=&Mcurrec.,RGB(255,0,0),RGB(0,0,0),column) & 设置前景色，满足条件为红色，不满足为白色THIS.REFRESHthis.SetFocus14、*-*release extended aa_x & aa_x 为内存变量，一定要加上 extended，才真正释放15、*-*数据表到文本use cxjgcopy to b type deli with useuse pappend from b type deli with | &*文本到数据表repl all zd with stuff(zd,1,3,) &*对数据表中的字段修改内容REPL all zd WITH STRTRAN(zd,m,)REPL all zd WITH STRTRAN(zd, ,)16、*-*if empty(ThisForm.Text1.va
