第三章VisualFoxPro编程基础.ppt

空(无内容) 备注字段 0 整型 .F. 逻辑型 0 浮点型 空(如CTOT(‘’)) 日期时间 0 货币型 空(如CTOD(‘’)) 日期型 空串、空格、制表符、回车、换行 字符型 0 双精度型 0 数值型 “空”值 数据类型 “空”值 数据类型 4.数据类型测试函数 VARTYPE(表达式)[逻辑表达式] 功能：测试表达式的类型，返回一个大写字母， 函数值为字符型。字母的含义如下表所示： 未定义 U 对象型 O NULL值 X 逻辑型 L 日期时间型 T 货币型 Y 日期型 D 数值型、整型、浮点型或双精度型 N 通用型 G 字符型或备注型 C 数据类型 返回的字母 数据类型 返回的字母 若表达式是一个数组，则根据第一个数组元素的类型返回字符串。 若表达式的运算结果是NULL值，则根据逻辑表达式值决定是否返回表达式的类型：如果逻辑表达式值为.T.，就返回表达式的原数据类型。如果逻辑表达式值为.F.或缺省，则返回X以表明表达式的运算结果是NULL值。例： X=”AAA” STORE 10 TO Y STORE .NULL. TO X STORE $100.2 TO Z ?VARTYPE(X),VARTYPE(X,.T.),VARTYPE(Y),VARTYPE(Z) X C N Y 5.表文件尾测试函数 EOF([工作区号|表别名]) 功能：测试指定表文件中的记录指针是否指向文件尾，若是返回逻辑 真.T.，否则返回逻辑假.F.。表文件尾是指最后一条记录的后面位置。若缺省自变量，则测试当前表文件。 若在指定工作区上没有打开表文件，函数返回逻辑假.F.。或表文件中不包含任何记录，函数返回逻辑真.T.。 文件起始标识 例：USE AA GO BOTTOM ?EOF() .F. SKIP ?EOF(),EOF(2) 文件结束标识 .T. .F. Top记录1 记录2 … 记录i Bottom记录n 6.表文件首测试函数 BOF([工作区号|表别名]) 功能：测试当前表文件(若缺省自变量)或指定表文件中的记录指针是否指向文件首，若是返回逻辑真.T.，否则返回逻辑假.F.。表文件首是指第一条记录的前面位置。 若指定工作区上没有打开表文件，函数返回逻辑假.F.。若表文件中不包含任何记录，函数返回逻辑真.T.。 7.记录号测试函数 RECNO([工作区号|表别名]) 功能：返回当前表文件(或缺省自变量)或指定表文件中当前记录(记录指针所指记录)的记录号。如果指定工作区上没有打开表文件，函数值为0。如果记录指针指向文件尾，函数值为表文件中的记录数加1。如果记录指针指向文件首，函数值为表文件中第一条记录的记录号。 8.记录个数测试函数 RECCOUNT([工作区号|表别名]) 功能：返回当前表文件(或缺省自变量)或指定表文件中的记录个数。如果指定工作区上没有打开表文件，函数值为0。 返回的是表文件中物理上存放的记录个数。不管记录是否被逻辑删除以及SET DELETED 的状态如何，也不管记录是否被过滤（SET FILTER），该函数都会把它们考虑在内。 例 USE AA 假定表中有5条记录 ？BOF（），RECNO（） 显示. F. 1 SKIP -1 ?BOF()，RECNO() 显示.T. 1 GO BOTTOM ?EOF(),RECNO() 显示.F. 5 SKIP ?EOF(),RECNO(),RECCOUNT() 显示.T. 6 5 9.条件测试函数 IIF(逻辑表达式,表达式1,表达式2) 功能： 测试逻辑表达式的值，若为逻辑真.T.，函数返回表达式1的值，若为逻辑假.F.，函数返回表达式2的值。表达式1和表达式2的类型不要求相同。 例： X=100 Y=300 ?IIF(X100,X-50,X+50),IIF(Y100,Y-50,Y+50) 150 250 SET CENTURY ON STORE DATE() TO D STORE DTOC(D) TO S ?S,IIF(LEN(S)=8,”这是两位数年份”,”年份是：”+STR(YEAR(D),4)) 结果是: 03/07/2011 年份是:2011 10.记录删除测试函数 DELETED(表的别名|工作区号) 功能：测试指定的表或在指定工作区中所打开