爱华网VFP6.0常用函数
函数是用程序来实现的一种数据运算或转换。每一个函数都有特定的数据运算或转换功能，它往往需要若干个自变量，即运算对象，但只能有一个运算结果，称为函数值或返回值。函数可以用函数名和一对圆括号加以调用，自变量放在圆括号里，如LEN(x)。函数调用可以出现在表达式里，表达式将函数的返回值作为自己运算的对象。函数调用也可作为一条命令使用，但此时系统忽略函数的返回值。本章将常用函数分为数值函数、字符处理函数、日期类函数、数据类型转换函数、测试函数5类，通过举例分别介绍。
1.数值函数
数值函数是指函数值为数值的一类函数，它们的自变量和返回值往往都是数值型数据。
1.绝对值函数
格式：ABS(〈数值表达式〉)
功能：返回指定的数值表达式的绝对值。
例如：
?ABS(10),ABS(-5)
105
2.符号函数
格式：SIGN(〈数值表达式〉)
功能：返回指定数值表达式的符号。当表达式的运算结果为正、负和零时，函数值分别为1、-1和0。
例如：
?SIGN(-10),SIGN(0),SIGN(5)
-101
3.求平方根函数
格式：SQRT(〈数值表达式〉)
功能：返回指定表达式的平方根。自变量表达式的值不能为负。
例如：
?SQRT(4)
2
4.圆周率函数
格式：PI()
功能：返回圆周率π(数值型)。该函数没有自变量。
5.求整数函数
格式：INT(〈数值表达式〉)
CEILING(〈数值表达式〉)
FLOOR(〈数值表达式〉)
功能：INT()返回指定数值表达式的整数部分。
CEILING()返回大于或等于指定数值表达式的最小整数。
FLOOR()返回小于或等于指定数值表达式的最大整数。
例如：
X=5.8
?INT(X)；INT(-X)；CEILING(X)；CEILING(-X)；FLOOR(X)；FLOOR(-X)
5-56-55 -6
6.四舍五入函数
格式：ROUND(〈数值表达式1〉，〈数值表达式2〉)
功能：返回指定表达式在指定位置四舍五入后的结果。
说明：〈数值表达式2〉指明四舍五入的位置。若〈数值表达式2〉大于等于0，那么它表示的是要保留的小数位数：若〈数值表达式2〉小于0，那么它表示的是整数部分的舍入位数。
例如：
X=645.345
?ROUND(X,2) ROUND(X,1),ROUND(X,0),ROUND(X,-1)
645.35645.3645 650
7.求余数函数
格式：MOD(〈数值表达式1〉，〈数值表达式〉)
功能：返回两个数值相除后的余数。
说明：〈数值表达式1〉是被除数，〈数值表达式2〉是除数。
余数的正负号与除数相同。如果被除数与除数同号，那么函数值即为两数相除的余数；如果被除数与除数异号，则函数值为两数相除的余数再加上除数的值。
例如：
?MOD(10，3)，MOD(10，-3)，MOD(-10，3)，MOD(-10，-3)
1-22-1
8.求最大值和最小值函数
格式：MAX(〈数值表达式1〉，〈数值表达式2〉，［，〈数值表达式3〉…］MIN(〈数值表达式1〉，〈数值表达式2〉，［，〈数值表达式3〉…］
功能：MAX()计算各自变量表达式的值，并返回其中的最大值。
MIN()计算各自变量表达式的值，并返回其中的最小值。
说明：自变量表达式的类型可以是数值型、字符型、货币型、双精度型、浮点型、日期型和日期时间型，但所有表达式的类型必须相同。
例如：
? MAX(‘8’,‘100’),MAX(‘8’,‘100’)，MIN(‘工作’，‘学习’，‘休息’)
1008工作
2. 字符函数
字符函数是指自变量一般是字符型数据的函数。
1.求字符串长度函数
格式：LEN(〈字符表达式〉)
功能：返回指定字符表达式值的长度，即所包含的字符个数。函数值为数值型。
例如：
X="book"
?LEN(X)
4
2.小写转换函数
格式：LOWER(〈字符表达式〉)
功能：将指定表达式值中的大写字母转换成小写字母，其他字符不变。
例如：
?LOWER('BOOK'),LOWER('abcDeFg20')
bookabcdefg20
3.大写转换函数
格式：UPPER(〈字符表达式〉)
功能：将指定表达式值中的小写字母转换成大写字母，其他字符不变。
例如：
?UPPER('work')，UPPER('abcDeFg')
WORKABCDEFG
4.空格字符串生成函数
格式：SPACE(〈数值表达式〉)
功能：返回由指定数目的空格组成的字符串。
5.删除前后空格函数
格式：TRIM(〈字符表达式〉
LTRIM(〈字符表达式〉)
ALLTRIM(〈字符表达式〉)
功能：TRIM()返回指定字符表达式值去掉尾部空格后形成的字符串。
LTRIM()返回指定字符表达式值去掉前导空格后形成的字符串。
ALLTRIM()返回指定字符表达式值去掉前导和尾部空格后形成的字符串。
例如：
STORESPACE(1)+"VFP"+SPACE(3) TO X
? TRIM(X)+LTRIM(X)+ALLTRIM(X)
VFPVFP VFP
?LEN(X)，LEN(TRIM(X))，LEN(LTRIM(X))，LEN(ALLTRIM(X))
7463
6.取子串函数
格式：LEFT(〈字符表达式〉，〈长度〉)
RIGHT(〈字符表达式〉，〈长度〉)
SUBSTR(〈字符表达式〉，〈起始位置〉［，〈长度〉］)
功能：LEFT()从指定表达式值的左端取一个指定长度的子串作为函数值。
RIGHT()从指定表达式值的右端取一个指定长度的子串作为函数值。
SUBSTR()从指定表达式的值指定起始位置取指定长度的子串作为函数值。
说明：在SUBSTR()函数中，若缺省第三个自变量〈长度〉，则函数从指定位置一直取到最后一个字符。
例如：
STORE"GOOD BYE!" TO X
?LEFT(X,2),SUBSTR(X,6,2)+SUBSTR(X,6),RIGHT(X,3)
GO BYBYE!YE!
7.计算子串出现次数函数
格式：OCCURE(〈字符表达式1〉，〈字符表达式2〉)
功能：返回第一个字符串在第二个字符串中出现的次数，函数值为数值型。若第一个字符串不是第一个字符串的子串，函数值为0。
例如：
STORE'abarabcadababcr' TO X
?OCCURS('a',X),OCCURS('b',X),OCCURS('c',X),OCCURS('f',X),OCCURS('r',X)
64202
8.求子串位置函数
格式：AT(〈字符表达式1〉，〈字符表达式2〉［，〈数值表达式〉］)
ATC(〈字符表达式1〉，〈字符表达式2〉［，〈数值表达式〉］)
功能：AT()的函数值为数值型。如果〈字符表达式1〉是〈字符表达式2〉的子串，则返回〈字符表达式1〉值的首字符在〈字符表达式2〉值中的位置；若不是子串，则返回0。
说明：ATC()与AT()功能类似，但在子串比较时不区分字母大小写。
第三个自变量〈数值表达式〉用于表明要在〈字符表达式2〉值中搜索〈字符表达式1〉值的第几次出现，其默认值是1。
例如：
STORE"This is Visual FoxPro" TO x
?AT("pro",x),ATC("fox",x),AT("is",x,3),AT("xo",x)
01930
9.子串替换函数
格式：STUFF(〈字符表达式1〉，〈起始位置〉，〈长度〉，〈字符表达式2〉)
功能：用〈字符表达式2〉值替换〈字符表达式1〉中由〈起始位置〉和〈长度〉指明的一个子串。
说明：替换和被替换的字符个数不一定相等。如果〈长度〉值是0，〈字符表达式2〉则插在由〈起始位置〉指定的字符前面。如果〈字符表达式2〉值是空串，那么〈字符表达式1〉中由〈起始位置〉和〈长度〉指明的子串被删去。
例如：
STORE'GOOD BYE!' TO X1
STORE'MORNING' TO X2
?STUFF(X1,6,3,X2),STUFF(X1,1,4,X2)
GOODMORNING! MORNING BYE!
10.字符替换函数
格式：CHRTRAN(〈字符表达式1〉，〈字符表达式2〉，〈字符表达式3〉)
功能：当第一个字符串中的一个或多个字符与第二个字符串中的某个字符相匹配时，就用第三个字符串中的对应字符(相同位置)替换这些字符。
说明：如果第三个字符串包含的字符个数少于第二个字符串包含的字符个数，因而没有对应字符，那么第一个字符串中相匹配的各字符将被删除。如果第三个字符串包含的字符个数多于第二个字符串包含的字符个数，多余字符被忽略。该函数的自变量是三个字符表达式。
例如：
x1=CHRTRAN("ABACAD","ACD","X12")
y1=CHRTRAN("计算机ABC"，"计算机"，"电脑")
z1=CHRTRAN("大家好!"，"大家"，"您")
?x1,y1,z1
XBX1X2 电脑ABC 您好!
11.字符串匹配函数
格式：LIKE(〈字符表达式1〉，〈字符表达式2〉)
功能：比较两个字符串对应位置上的字符，若所有对应字符都相匹配，则函数返回逻辑真(.T.)，否则返回逻辑假(.F.)。
说明：〈字符表达式1〉中可以包含通配符*和?。*可与任何数目的字符相匹配，?可以与任何单个字符相匹配。
例如：
STORE"abc" TO X
STORE"abcd" TO y
?LIKE("ab*",x),LIKE("ab*",y),LIKE(x,y),LIKE("?b?",x),LIKE("Abc",x)
.T..T..F..T..F.
3. 日期和时间函数
日期和时间函数的自变量一般是日期型数据或日期时间型数据。
1.系统日期和时间函数
格式：DATE()
TIME()
DATETIME()
功能：DATE()返回当前系统日期，函数值为日期型。
TIME()以24小时制、hh:mm:ss格式返回当前系统时间，函数值为字符型。
DATETIME()返回当前系统日期时间，函数值为日期时间型。
例如：
?DATE()，TIME()，DATETIME()
08／25／0316：59：0508／25／03 04：59：05PM
2.求年份、月份和天数函数
格式：YEAR(〈日期表达式〉|〈日期时间表达式〉)
MONTH(〈日期表达式〉|〈日期时间表达式〉)
DAY(〈日期表达式〉|〈日期时间表达式〉)
功能：YEAR()从指定的日期表达式或日期时间表达式中返回年份(如2003)。
MONTH()从指定的日期表达式或日期时间表达式中返回月份。
DAY()从指定的日期表达式或日期时间表达式中返回月里面的天数。
说明：这三个函数的返回值都为数值型。
例如：
STORE{^2001-08-25} TO d
?YEAR(d),MONTH(d),DAY(d)
2003825
3.时、分和秒函数
格式：HOUR(〈日期时间表达式〉)
MINUTE(〈日期时间表达式〉)
SEC(〈日期时间表达式〉)
功能：HOUR()从指定的日期时间表达式中返回小时部分(24小时制)。
MINUTE()从指定的日期时间表达式中返回分种部分。
SEC()从指定的日期时间表达式中返回秒数部分。
说明：这三个函数的返回值都为数值型。
例如：
STORE{^2003-08-25 04:20:40 P} TO t
?HOUR(t)，MINUTE(t)，SEC(t)
162040
.4. 数据类型转换函数
数据类型转换函数的功能是将某一种类型的数据转换成另一种类型的数据。
1.数值转换成字符串
格式：STR(〈数值表达式〉［，〈长度〉［，〈小数位数〉］］)
功能：将〈数值表达式〉的值转换成字符串，转换时根据需要自动进行四舍五入。
说明：
(1)返回字符串的理想长度L应该是〈数值表达式〉值的整数部分位数加上〈小数位数〉值，再加上1位小数点。
(2)如果〈长度〉值大于L，则字符串加前导空格以满足规定的〈长度〉要求；
(3)如果〈长度〉值大于等于〈数值表达式〉值的整数部分位数(包括负号)但又小于L，则优先满足整数部分而自动调整小数位数；
(4)如果〈长度〉值小于〈数值表达式〉值的整数部分位数，则返回一串星号(*)。
(5)〈小数位数〉的默认值为0，〈长度〉的默认值为10。
例如：
STORE -834.456 TO X
? "X="+STR(X，8，3)
X=-834.456
? STR(X，9，2)，STR(X，6，2)，(STR(X，3)，STR(X，6)，STR(X)
-834.46-834.5***-834-834
2.字符串转换成数值
格式：VAL(〈字符表达式〉)
功能：将由数字符号(包括正负号、小数点)组成的字符型数据转换成相应的数值型数据。
说明：
(1)若字符串内出现非数字字符，那么只转换前面部分；
(2)若字符串的首字符不是数字符号，则返回数值零，但忽略前导空格。
例如：
STORE'-6789'TO x
STORE'.23' TO y
格式：VAL(〈字符表达式〉)
功能：将由数字符号(包括正负号、小数点)组成的字符型数据转换成相应的数值型数据。
说明：
(1)若字符串内出现非数字字符，那么只转换前面部分；
(2)若字符串的首字符不是数字符号，则返回数值零，但忽略前导空格。
例如：
STORE'-6789'TO x
STORE'.23' TO y
STORE'A42'TO z
?VAL(x),VAL(x+y),VAL(x+z),VAL(z+y)
-6789-6789.23-6789.000.00
3.字符串转换成日期或日期时间
格式：CTOD(〈字符表达式〉)
CTOT(〈字符表达式〉)
功能：CTOD()将〈字符表达式〉值转换成日期型数据。
CTOT()将〈字符表达式〉值转换成日期时间型数据。
说明：字符串中的日期部分格式要与SET DATE TO命令设置的格式一致。其中的年份可以用四位，也可以用两位。如果用两位，则世纪由SET CENTURY TO 语句指定。
例如：
SET DATETO YMD
SETCENTURYON&&显示日期或日期时间时，用4位数显示年分
SETCENTURY TO 19 ROLLOVER 51
d1=CTOD('2003／07／25')
t1=CTOT('2003／07／25'+''+TIME())
?d1，t1，CTOD('50／01／01')，CTOD('51／01／01')
2003／07／252003／07／25 10:31:54PM 2050／01／01 1951／01／01
这里，SET CENTURYTO语句指定：小于51的两位数年份属于21世纪(19+1)，而大于等于51的两位数年份属于20世纪(19)。
4.日期或日期时间转换成字符串
格式：DTOC(〈日期表达式〉|〈日期时间表达式〉［，1］)
TTOC(〈日期时间表达式〉［，1］)
功能：DTOC()将日期型数据或日期时间数据的日期部分转换成字符串
TTOC()将日期时间数据转换成字符串。
说明：
(1)字符串中日期部分的格式与SET DATE TO语句的设置和SET CENTURY ON|OFF(ON为四位年份，OFF为两位数年份)语句的设置有关。
(2)时间部分的格式与SET HOURS TO 12|24语句的设置有关。
(3)DTOC()函数，如果使用选项1，则字符串的格式总是YYYYMMDD，共8个字符。对TTOC()来说，如果使用选项1，则字符串的格式总是为YYYYMMDDHHMMSS，采用24小时制，共14个字符
例如：
STOREDATETIME() TO t
? t
08／25／0310:54:49 PM
?DTOC(t),DTOC(t),TTOC(t),TTOC(t,1)
08／25／03 2003082508／25／03 19:54:49PM20030825225449
5.宏替换函数
格式：&〈字符型变量〉［.］
功能：替换出字符型变量的内容，即&的值是变量中的字符串。
说明：如果该函数与其后的字符无明确分界，则要用“.”作函数结束标识。宏替换可以嵌套使用。
例如：
STORE"ZGDA" TO X
USE&X&&相当于USE ZGDA
XM="姓名"
?&XM+"你好!"&&相当于? 姓名+"你好!"
张黎黎你好!&&字段变量姓名的值是张黎黎
SKIP&&转到下条记录
?XM，&XM&&相当于? XM，姓名
姓名 李艳
5. 测试函数
在数据处理过程中，有时用户需要了解操作对象的状态。例如，要使用的文件是否存在、数据库的当前记录号、是否到达了文件尾、检索是否成功、某工作区中记录指针所指的当前记录是否有删除标记、数据类型等信息。尤其是在运行应用程序时，常常需要根据测试结果来决定下一步的处理方法或程序走向。
1.空值(NULL值)测试函数
格式：ISNULL(〈表达式〉)
功能：判断一个表达式的运算结果是否为NULL值，若是NULL值返回逻辑真(.T.)，否则返回逻辑假(.F.)。
例如：
STORE.NULL.TO X
?X，ISNULL(X)
.NULL..T.
2.“空”值测试函数
格式：EMPTY(〈表达式〉)
功能：根据指定表达式的运算结果是否为“空”值，返回逻辑真(.T.)或逻辑假(.F.)。
说明：
(1)这里所指的“空”值与NULL值是两个不同的概念。函数EMPTY(.NULL.)的返回值为逻辑假(.F.)。
(2)该函数自变量表达式的类型可以是数值型、字符型、逻辑型、日期型等类型。不同类型数据的“空”值，有不同的规定，如表14.1所示。
表14.1 不同类型数据的“空”值规定
———————————————————————————————
数据类型“空”值数据类型“空”值
————————————————————————————————
数值型0双精度型0
字符型空串、空格、制表符、回车、换行日期型空(如CTOD("))
货币型0日期时间空(如CTOT("))
浮点型0逻辑型.F.
整型0备注字段空(无内容)
—————————————————————————————————
3.数据类型测试函数
格式：VARTYPE(〈表达式〉［，〈逻辑表达式〉］)
功能：测试〈表达式〉的类型，返回一个大写字母。
说明：
(1)函数值为字符型。字母的含义如表14.2所示。
表14.2 用VARTYPE()测得的数据类型
——————————————————————————————————
返回的字母数据类型返回的字母数据类型
—————————————————————————————————
C字符型或备注型G通用型
N数值型、整型、浮点或双精度型D日期型
Y货币型T日期时间型
L逻辑型XNull值
O对象型U未定义
(2)若〈表达式〉是一个数组，则根据第一个数组元素的类型返回字符串。若〈表达式〉的运算结果是NULL值，则根据〈逻辑表达式〉值决定是否返回〈表达式〉的类型；如果〈逻辑表达式〉值为.T.，就返回〈表达式〉的原数据类型。如果〈逻辑表达式〉值为.F.或缺省，则返回X以表明〈表达式〉的运算结果是NULL值。
例如：
X="AAA"
STORE 10TO X
STORE.NULL. TO Y
STORE$100.2 TO Z
?VARTYPE(X)，VARTYPE(Y，.T.)，VATRYPE(Y)，VARTYPE(Z)
NCXY
4.表文件尾测试函数
系统对表中的记录是逐条进行处理的。对于一个打开的表文件来说，在某一时刻只能处理一条记录。VFP为每一个打开的表设置了一个内部使用的记录指针，指向正在被操作的记录，该记录称为当前记录。记录指针的作用是标识表的当前记录。
表文件的逻辑结构如图14.1所示。最上面的记录是首记录，记为TOP，最下面的记录是尾记录，记为BOTTOM。在第一个记录之前有一个文件起始标识，称为Beginningof File(BOF)；在最后一个记录的后面有一个文件结束标识，称为End ofFile(EOF)。使用测试函数能够得到指针的位置。刚刚打开表时，记录指针总是指向首记录。
格式：EOF(［〈工作区号〉|〈表别名〉］)
功能：测试指定表文件中的记录指针是否指向文件尾，，则是返回逻辑真.T.，否则返回逻辑假.F.。
说明：表文件尾是指最后一条记录的后面位置。若缺省自变量，则测试当前表文件。若在指定工作区上没有打开表文件，函数返回逻辑假.F.。若表文件中不包含任何记录，函数返回逻辑真.T.。
例如：
USEZGDA
GOBOTTOM
?EOF()
.F.
SKIP
?EOF()，EOF(2)&&2号工作区没有打开表
.T..F.
图 14.1 表文件的逻辑结构
5.表文件首测试函数
格式：BOF(［〈工作区号〉|〈表别名〉］)
功能：测试当前表文件(若缺省自变量)或指定表文件中的记录指针是否指向文件首，若是返回逻辑真.T.，否则返回逻辑假.F.。
说明：表文件首是指第一条记录的前面位置。若指定工作区上没有打开表文件，函数返回逻辑假.F.。若表文件中不包含任何记录，函数返回逻辑真.T.。
6.记录号测试函数
格式：RECNO(［〈工作区号〉|〈表别名〉］)
功能：返回当前表文件(若缺省自变量)或指定表文件中当前记录(记录指针所指记录)的记录号。
说明：如果指定工作区上没有打开表文件，函数值为0。如果记录指针指向文件尾，函数值为表文件中的记录数加1。如果记录指针指向文件首，函数值为表文件中第一条记录的记录号。
7.记录个数测试函数
格式：RECCOUNT(［〈工作区号〉|〈表别名〉］)
功能：返回当前表文件(若缺省自变量)或指定表文件中的记录个数。如果指定工作区上没有打开表文件，函数值为0。
说明：该函数返回的是表文件中物理上存在的记录个数。不管记录是否被逻辑删除以及SETDELETED的状态如何，也不管记录是否被过滤(SET FILTER)，该函数都会把他们考虑在内。
例如：
USEZGDA&&假定表中有8条记录
?BOF()，RECNO()&&显示.F.1
SKIP-1
?BOF()，RECNO()&&显示.T.1
GOBOTTOM
?EOF()，RECNO()&&显示.F.8
SKIP
?EOF()，RECNO()，RECCOUNT()&&显示.T.9 8
8.条件测试函数
格式：IIF(〈逻辑表达式〉，〈表达式1)，〈表达式2〉)
功能：测试〈逻辑表达式〉的值，若为逻辑真.T.，函数返回〈表达式1〉的值，若为逻辑假.F.，函数返回〈表达式2)的值。
说明：〈表达式1)和〈表达式2〉的类型不要求相同。
例如：
X=100
Y=300
?IIF(X>100，X-50，X+50)，IIF(Y>100，Y-50，Y+50)
150250
SETCENTURY ON
STOREDATE() TO D
STOREDTOC(D) TO X
?X，IIF(LEN(X)=8，"这是两位数年份"，"年份是："+STR(YEAR(D)，4))
08／25／2003年份是：2003
9.记录删除测试函数
格式：DELETED(［〈表的别名〉|〈工作区号］)
功能：测试指定的表，或在指定工作区中所打开的表，记录指针所指的当前记录是否有删除标记“*”。若有为真，否则为假。若缺省自变量，则测试当前工作区中所打开的表。
例如：
SELECT0&&选择最小号空闲工作区
USEZGDA&&打开职工表
DELETEFOR 性别="女" AND职称="助教"&&逻辑删除记录
2删除记录
LIST姓名，性别 FORDELETED()&&列出被逻辑删除的记录
记录号#姓名 性别
1*张黎黎 女
2*李艳 女
6. 常用函数的例子
习 题
一、选择题
1.在Visual FoxPro中，有下面几个内存变量赋值语句：
X={∧2001-07-28 10:15:20PM}
Y=.T.
M=123.45
N=123.45
Z=＂123.45＂
执行上述赋值语句之后，内存变量X、Y、M、N和Z的数据类型分别是()
A)D、L、Y、N、CB)D、L、M、N、C
C)T、L、M、N、CD)T、L、Y、N、C
2.以下日期值正确的是()
A){＂2002-05-25＂}B){∧2002-05-25}
C){2002-05-25}D){［2002-0525］}
3.在下面的VisualFoxPro表达式中，不正确的是()
A){∧2003-05-01 10:10:10 AM}-10B){∧2003-05-01}-DATE()
C){∧2003-05-01}+DATE() D)［∧2003-05-01］+［1000］
4.在下面的VisualFoxPro表达式中，运算结果是逻辑真的是()
A)EMPTY(.NULL.)B)LIKE(acd,ac?)
C)AT(a,123abc)D)EMPTY(SPACE(2))
5.设D=5>6，命令?VARTYPE(D)的输出值是()
A)LB)CC)ND)D
6.在下列函数中，函数值为数值的是()
A)BOF()B)CTOD(01/01/03)
C)AT(人民，中华人民共和国)D)SUBSTR(DTOC(DATE())，7)
7.设N=886，M=345，K=＂M+N＂，表达式1+&K的值是()
A)1232B)数据类型不匹配
C)1+M+ND)346
8.表达式VAL(SUBSTR(＂奔腾586＂，5，1))*LEN(＂Visual FoxPro＂)的结果是
A)13.00B)14.00
C)15.00D)16.00
9.连续执行以下命令之后，最后一条命令的输出结果是()
SET EXACTOFF
X=＂A＂
?IIF(＂A＂=X，X-＂BCD＂，X+＂BCD＂)
A)AB)BCD
C)ABCDD)A BCD
二、填空题
1.命令 ?ROUND(337.2007，3)的执行结果是________。
2.命令 ?LEN("THIS IS MY BOOK")的结果是________。
3.TIME()返回值的数据类型是________。
4.顺序执行下列操作后，屏幕最后显示的结果是________和________。
Y=DATE()
H=DTOC(Y)
?VARTYPE(Y)，VARTYPE(H)
三、上机题
上机执行下述命令，熟悉函数的功能。
1.B=DTOC(DATE(),1)
?＂今天是：＂+LEFT(B，4)+＂年＂+IIF(SUBS(B，5，1)=＂0＂，;
SUBS(B，6，2)),SUBS(B，5，2))+＂月＂+RIGHT(B，2)+＂日＂
2.X=STR(12.4,4,1)
Y=RIGHT(X，3)
Z=＂&Y+&X＂
?Z，&Z
3.X=＂奔腾586＂
Y=＂个人计算机＂
?LEN(X)，RIGHT(X，3)+Y
?＂&X.&Y＂，X+Y
4.?AT(＂人民＂，＂中华人民共和国＂)
?VAL(SUBSTR(668899，5，2))+1
?SUBSTR(668899，3)-＂1＂
5.DD=DATE()
?STR(YEAR(DD)，4)+＂年 ＂+STR(MONTH(DD)，2)+＂月 ＂+STR(DAY(DD)，2)+＂日＂_
