vfp6.0代码大全

给你VFP的函数：

1 Visual FoxPro数据库函数

ADATABASES() 将所有打开数据库的名称和路径放到内存变量数组中

ADBOBJECTS() 把当前数据库中的命名连接名、关系名、表名或sQL视图名放到一个内存变量数组中

AFIELDS() 把当前表的结构信息存放在一个数组中，并且返回表的字段数

ALIAS() 返回当前表或指定工作区衰的别名

ASESSIONS() 创建一个已存在的数据工作期ID数组

ATAGINFO() 创建一个包含索引和键表达式的名字、数量和类型信息的数组

AUSED() 将一个数据工作期中的表别名和工作区存入内存变量数组

BOF() 确定当前记录指针是否在表头

CANDIDATE() 判断索引是否为候选索引

CDX() 根据指定的索引位置编号，返回打开的复合索引(．CDX)文件名称

CPDBP() 返回一个打开表所使用的代码页

CREATEOFFLINE() 由已存在的视图创建一个游离视图

CURSORGETPROP() 返回VisualFoxPro表或临时表的当前属性设置

CURSORSETPROP() 指定VisualFoxPro表或临时表的属性设置

CURSORTOXML() 转换VisualFoxPro临时表为XML文本

CURVAL() 从磁盘上的表或远程数据源中直接返回字段值

DBC() 返回当前数据库的名称和路径

DBF() 返回指定工作区中打开的表名，或根据表别名返回表名

DBSETPROP() 给当前数据库或当前数据库中的字段、命名连接、表或视图设置一个属性

DELETED() 返回一个表明当前记录是否标有删除标记的逻辑值

DESCENDING() 是否用DESCENDING关键字创建了一个索引标识

DROPOFFLINE() 放弃对游离视图的所有修改，并把游离视图放回到数据库中

EOF() 确定记录指针位置是否超出当前表或指定表中的最后一个记录

FCOUNT() 返回衰中的字段数目

FIELD() 根据编号返回表中的字段名

FILTER() 返回SETFILTER命令中指定的表筛选表达式

FLDLIST() 对于SETmELDS命令指定的字段列表，返回其中的字段和计算结果字段表达式

FLOCK() 尝试锁定当前表或指定表

FOR() 返回一个己打开的单项索引文件或索引标识的索引筛选表达式

FOUND() 如果CONTINUE、FIND、LOCATE或SEEK命令执行成功，函数的返回值为"真"

FSIZE() 以字节为单位，返回指定字段或文件的大小

GETFLDSTATE() 返回一个数值，标明表或临时表中的字段是否已被编辑，或是否有追加的记录，或者记录的删除状态是否已更改

GETNEXTMODIFIED() 返回一个记录号，对应于缓冲表或临时表中下一个被修改的记录

HEADER() 返回当前或指定表文件的表头所占的字节数

IDXCOLLATE() 返回索引或索引标识的排序序列

INDBC() 如果指定的数据库对象在当前数据库中，则返回"真"(T)

INDEXSEEK() 在一个索引表中搜索第一次出现的某个记录

ISEXCLUSIVE() 判断一个表或数据库是以独占方式打开的

ISFLOCKED() 返回表的锁定状态

ISREADONLY() 判断是否以只读方式打开表

ISRLOCKED() 返回记录的锁定状态

KEY() 返回索引标识或索引文件的索引关键字表达式

KEYMATCH() 在索引标识或索引文件中搜索一个索引关键字

LOOKUP() 在表中搜索字段值与指定表达式匹配的第一个记录

LUPDATE() 返回一个表最近一次更新的日期

MDX() 根据指定的索引编号返回打开的．CDX复合索引文件名

MEMLINES() 返回备注字段中的行数

MLINE() 以字符串形式返回备注字段中的指定行

NDX() 返回为当前表或指定表打开的某一索引(JDX)文件的名称

ORDER() 返回当前表或指定表的主控索引文件或标识

PRIMARY() 检查索引标识，如果为主索引标识，就返回"真"(T)

RECCOUNT() 返回当前或指定表中的记录数目

RECNO() 返回当前表或指定表中的当前记录号

RECSIZE() 返回表中记录的大小(宽度)

REFRESH() 在可更新的SQL视图中刷新数据

RELATION() 返回为给定工作区中打开的表所指定的关系表达式

SEEK() 在一个已建立索引的表中搜索一个记录的第一次出现位置

SELECT() 返回当前工作区编号或未使用工作区的最大编号

SETFLDSTATE() 为表或临时表中的字段或记录指定字段状态值或删除状态值

SQLCANCEL() 请求取消一条正在执行的SQL语句

SQLCOLUMNS() 把指定数据源表的列名和关于每列的信息存储到一个VisualFoxPro临时表中

SQLCOMMIT() 提交一个事务

SQLCONNECT() 建立一个指向数据源的连接

SQLDISCONNECT() 终止与数据源的连接

SQLEXEC() 将一条SQL语句送入数据源中处理

SQLGETPROP() 返回一个活动连接的当前设置或默认设置

SQLMORERESULTS() 如果存在多个结果集合，则将另一个结果集合复制到VisualFoxPro临时表中

SQLPREPARE() 在使用SQLEXEC()执行远程数据 *** 作前，可使用本函数使远程数据为将要执行的命令做好准备

SQLROLLBACK() 取消当前事务处理期间所做的任何更改

SQLSETPROP() 指定一个活动连接的设置

SQLSTRINGCONNECT() 使用一个连接字符串建立和数据源的连接

SQLTABLES() 把数据源中的表名存储到VisualFoxPro临时表中

SYS(14) 索引表达式

SYS(21) 控制索引编号

SYS(22) 控制标识名或索引名

SYS(2011) 返回当前工作区中记录锁定或表锁定的状态

SYS(2012) 返回表的备注字段块大小

SYS(2021) 筛选索引表达式

SYS(2029) 返回与表类型对应的值

SYS(3054) Rushmore优化等级 •

TAG() 返回打开的．CDX多项复合索引文件的标识名，或者返回打开的．IDX单项索引文件的文件名

TAGCOUNT() 返回复合索引文件(．CDX)标识以及打开的单项索引文件(．IDX)的数目

TAGNO() 返回复合索引文件(．CDX)标识以及打开的单项索引(．IDX)文件的索引位置

TARGET() 返回一个表的别名，该表是SETRELATION命令的INTO子句所指定关系的目标

UNIQUE() 用于测试索引是否以惟一性方式建立

UPDATED() 用于测试在最近的READ命令中，数据是否已被修改

USED() 确定是否在指定工作区中打开了一个表

XMLTOCURSOR() 转换XML文本到VisualFoxPro游标或表

2 Visual FoxPro日期和时间函数

CTOD()把字符表达式转换成日期表达式。

CDOW()从给定日期或日期时间表达式中返回星期值。

CMONTH()返回给定日期或日期时间表达式的月份名称。

CTOD()把字符表达式转换成日期表达式。

CTOT()从字符表达式返回一个日期时间值。

DATE()返回由 *** 作系统控件的当前系统日期，或创建一个与2000年兼容的日期值。

DATETIME()以日期时间值返回当前的日期和时间, 或创建一个 2000 兼容的日期时间值。

DAY()以数值型返回给定日期表达式或日期时间表达式是某月中的第几天。

DMY()从一个日期型或日期时间型表达式返回一个“日-月-年”格式的字符表达式(例如，31 May 1995)。月名不缩写。

DTOC()由日期或日期时间表达式返回字符型日期。

DTOS()从指定日期或日期时间表达式中返回 yyyymmdd 格式的字符串日期。

DTOT()从日期型表达式返回日期时间型值。

GOMONTH()对于给定的日期表达式或日期时间表达式，返回指定月份数目以前或以后的日期。

HOUR()返回日期时间表达式的小时部分。

MDY()以“月-日-年”格式返回指定日期或日期时间表达式，其中月份名不缩写。

MINUTE()返回日期时间型表达式中的分钟部分。

MONTH()返回给定日期或日期时间表达式的月份值。

QUARTER()返回一个日期或日期时间表达式中的季度值。

SEC()返回日期时间型表达式中的秒钟部分。

SECONDS()以秒为单位返回自午夜以来经过的时间。

SYS(1)以日期数字字符串的形式返回当前系统日期。

SYS(2)返回自午夜零点开始以来的时间，按秒计算。

SYS(10)将 (Julian) 日期转换成一个字符串。

SYS(11)将日期格式表示的日期表达式或字符串转换成 (Julian) 日期。

TIME()以 24 小时制、8 位字符串(时：分：秒)格式返回当前系统时间。

TTOC()从日期时间表达式中返回一个字符值。

TTOD()从日期时间表达式中返回一个日期值。

WEEK()从日期表达式或日期时间表达式中返回代表一年中第几周的数值。

YEAR()从指定的日期表达式中返回年份。

3 Visual FoxPro字符函数

ALLTRIM()． 删除指定字符表达式的前后空格符

ASC() 返回字符表达式中最左边字符的ANSI值

AT() 返回一个字符表达式或备注字段在另一个字符表达式或备注字段中首次出现的位置

AT_C() 返回一个字符表达式或备注字段在另一个字符表达式或备注字段中首次出现的位置

ATC() 返回一个字符表达式或备注字段在另一个字符表达式或备注字段中首次出现的位置

ATCC() 返回一个字符表达式或备注字段在另一个字符表达式或备注字段中首次出现的位置

ADDBS() 如果必要，向一个路径表达式添加一个反斜杠

ATCLINE() 返回一个字符表达式或备注字段在另一个字符表达式或备注字段中第一次出现的行号

ATLINE() 返回一个字符表达式或备注字段在另一个字符表达式或备注字段中首次出现的行号

BETWEEN() 判断一个表达式的值是否在另外两个相同数据类型的表达式的值之间

CHR() 根据指定的ANSI数值代码返回其对应的字符

CHRTRAN() 将第一个字符表达式中与第二个表达式的字符相匹配的字符替换为第3个表达式中相应的字符

CHRTRANC() 将第一个字符表达式中与第二个表达式的字符相匹配的字符替换为第3个表达式中相应的字符

CPCONVERT() 把字符、备注字段或字符表达式转换到其他代码页

CHRSAW() 确定一个字符是否出现在键盘缓冲区中

CHRTRAN() 在一个字符表达式中，把与第二个表达式字符相匹配的字符替换为第三个表达式中相应字符

CHRTRANC() 将第一个字符表达式中与第二个表达式的字符相匹配的字符替换为第三个表达式中相应的字符

DIFFERENCE() 返回0到4间的一个整数，表示两个字符表达式间的相对语音差别

EMPTY() 确定表达式是否为空值

GErWORDCOUNr() 计数一个中中的单词数

GETWORDNUM() 从一个串中返回一个指定的词

INLIST() 判断一个表达式是否与一组表达式中的某一个相匹配 '

ISALPHA() 判断字符表达式的最左边一个字符是否为字母

ISBLANK() 判断表达式是否为空值

ISDIGIT() 判断字符表达式的最左边一个字符是否为数字(0到9)

ISLEADBYTE() 如果字符表达式第一个字符的第一个字节是前导字节，则返回"真"(T)

ISLOWER() 判断字符表达式最左边的字符是否为小写字母

ISMOUSE() 判断计算机是否具有鼠标

ISNULL() 判断计算结果是否为NULL值

ISUPPER() 判断字符表达式的第一个字符是否为大写字母(A～z)

LEFT() • 从字符表达式最左边一个字符开始返回指定数目的字符

LEPTC() 从字符表达式最左边一个字符开始返回指定数目的字符

LEN() 返回字符表达式中字符的数目

LENC() 返回字符表达式中字待的数目

LIKE() 确定一个字符表达式是否与另一个字符表达式相匹配

LIKEC() 决定一个字符表达式是否与另一个字符表达式相匹配

LOWER() 以小写字母形式返回指定的字符表达式

LTRIM() 删除指定的字符表达式的前导空格，然后返回得到的表达式

OCCURS() 返回一个字符表达式在另一个字符表达式中出现的次数

OEMTOANSI() 用于将字符串表达式中的字符转换成与其相对应的ANSI字符集中的字符

PADL()、PADR()、PADC() 由一个表达式返回一个字符中，并从左边，右边或同时从两边用空格或字符把该字符串填充到 指定长度

PROPER() 从字符表达式中返回一个字符串，字符串中的每个首字母大写

RAT() 返回一个字符表达式或备注字段在另一个字符表达式或备注字段内第一次出现的位置，从最右 边的字符算起

RATC() 返回一个字符表达式在另-个字符表达式或备注字段最后一次出现所在的行号，从最后-行算起

RATLINE() 回一个字符表达式或备注字段在另一个字符表达式或备注字段中最后出现的行号，从最后一行 开始计数 。

REPUCATE() 返回一个字符串，这个字符串是将指定字符表达式重复指定次数后得到的

RIGHT() 从一个字符串的最右边开始返回指定数目的字符

RIGHTC() 从一个字符串中返回最右边指定数目的字符

RTRIM() 删除了字符表达式后续空格后，返回结果字符串

SOUNDEX() 返回指定的字符表达式的语音表示

SPACE() 返回由指定数目的空格构成的字符串

STR() 返回与指定数值表达式对应的字符

STRCONV() 将字符表达式转换成另一种形式

STREXTRACT() 返回一个两个分隔符间的串

STRTRAN() 在第一个字符表达式或备注字段中，搜索第二个字符表达式或备注字段，并用第3个字符表达-式或备注字段替换每次出现的第2个字符表达式或备注字段

STUFF() 返回一个字符串，此字符串是通过用另一个字符表达式替换现有字符表达式中指定数目的字符得到的

STUFFC() 返回一个字符串，此字符串是通过用另一个字符表达式替换现有字符表达式中指定数目的字符、得到的

SUBSTR() 从给定的字符表达式或备注字段中返回字符串

SUBSTRC() 从给定的字符表达式或者备注字段返回字符串

SYS(15) 替换字符串中的字符

SYS(20) 转换德文文本

TEXTMERGE() 提供串表达式的求值 。

TRIM() 返回删除全部后缀空格后的指定字符表达式

TXTWIDTH() 按照字体平均字符宽度返回字符表达式的长度

TYPE() 计算字符表达式，并返回其内容的数据类型

UPPER() 用大写字母返回指定的字符表达式

4 Visual FoxPro数值函数

ABS() 返回指定数值表达式的绝对值

ACOS() 返回指定数值表达式的反余弦值

ASIN() 返回数值表达式的反正弦弧度值

ATAN() 返回数值表达式的反正切弧度值

ATN2() 返回指定值的反正切值，返回值无象限限制

BINTOC() 将整型用二进制字符型表示 。

BITAND() 返回两个数值型数值在按位进行AND运算后的结果

BITCLEAR() 清除一个数值型数值的指定位(将此位设置成0)，并返回结果值

BITLSHIFr() 返回一个数值型数值向左移动给定位后的结果

BrrNOT() 返回一个数值型数值按位进行NOT运算的结果

BITOR() 返回两个数值型数值按位进行OR运算的结果

BITRSHIFF() 返回一个数值型数值向右移动指定位后的结果

BITSET() 将一个数值型数值的某一位设置为1并返回结果

BITTEST() 确定一个数值型数值的指定位是否为1

BITXOR() 返回两个数值型数值按位进行异或运算的结果

CEILING() 返回大于或等于指定数值表达式的最小整数

COS() 返回数值表达式的余弦值

CTOmN() 将二进制字符型表示转换为整数

DTOR() 将度转换为弧度

EVALUATE() 计算字符表达式的值并返回结果

EVL() 从两个表达式中返回一个非空值

EXP() 返回eAx的值，其中x是某个给定的数值型表达式

FLOOR() 对于给定的数值型表达式值，返回小于或等于它的最大整数

FV() 返回一笔金融投资的未来值

INT() 计算一个数值表达式的值，并返回其整数部分

LOG() 返回给定数值表达式的自然对数(底数为c)

LOGl0() 返回给定数值表达式的常用对数(以10为底) •

MAX() 对几个表达式求值，并返回具有最大值的表达式

MIN() 计算一组表达式，并返回具有最小值的表达式

MOD() 用一个数值表达式去除另一个数值表达式，返回余数

MTON() 由一个货币型表达式返回一个数值型值

NORMALIZE() 把用户提供的字符表达式转换为可以与VisualFoxPro函数返回值相比较的格式

NTOM() 由一个数值表达式返回含有四位小数的货币值

NVL() 从两个表达式返回一个非null值

PAYMENT() 返回固定利息贷款按期兑付的每一笔支出数量

PI() 返回数值常数n

PV() 返回某次投资的现值

RAND() 返回一个0到1之间的随机数

ROUND() 返回圆整到指定小数位数的数值表达式

RTOD() 将弧度转化为度

SIGN() 当指定数值表达式的值为正、负或0时，分别返回1、-1或0

SIN() 返回一个角度的正弦值 •

SQRT() 返回指定数值表达式的平方根

SYS(2007) 返回一个字符表达式的检查求和值

TAN() 返回角度的正切值

VAL() 由数字组成的字符表达式返回数字值

AVG(<数值表达式>)：计算平均值；

CNT()：返回表中记录数；

MAX(<表达式>)：返回最大值；

MIN(<表达式>)：返回最小值；

SUM(<数值表达式>)：求和；

NPV(<数值表达式1>,<数值表达式2>,<数值表达式3>)：计算净现值；

STD(<数值表达式> )：计算标准偏差；

VAR(<数值表达式> )：计算方差；

例1：统计学生选课表中成绩超过85分的学生人数及平均成绩

use 学生选课

calculate cnt( ), avg(成绩) for 成绩>85 to xsrs, pjcj

xsrs,pjcj

Visual FoxPro 包含的函数以及附加的函数可以分为以下的种类。

字符串函数

这些函数 *** 作字符数据。

数据转换函数

这些函数转换数据从一种类型到另一种类型。

日期时间函数

这些函数产生和 *** 作日期和时间数据。

数值函数

这些函数 *** 作或返回数值型数据。

locate 命令，常常用来与found()配合使用，如果查找成功，返回真，否则返回假。

另外found()函数，也可以用来检测表尾，如果是记录指在针表尾部，返回假，否则返回真。

懂了吗

VFP80以上，直接引用变量：_PAGETOTAL

70 以下，

report form 报表 noco &&不显示打印信息（只为下一步求出总页数）

zys_printer=_PAGENO &&得出报表的总页数。执行完一次以后，_PAGENO 是当时最后的页号。

如下：

求绝对值函数ABS格式：ABS(expN)求整函数INT格式：INT(expN)四舍五入函数ROUND格式：ROUND(expN,〈保留小数位〉)

功能：按保留小数位指定的位数对expN的数值进行四舍五入。

说明：当保留小数位为正整数或零时，系统将自动对其后一位上的数进行四舍五入处理；当其为负数时，舍入将在整数部分进行，这时保留小数位的绝对值为从个位开始向左被舍入的位数。