《第3讲 第3章vfp的数据及其运算》由会员分享，可在线阅读，更多相关《第3讲 第3章vfp的数据及其运算（77页珍藏版）》请在金锄头文库上搜索。
1、Visual Foxpro 程序设计教程Visual Foxpro 程序设计教程第3章 Visual Foxpro 的数据及其运算3.1 Visual Foxpro 的数据类型3.2 Visual Foxpro 的常量与变量3.3 Visual Foxpro 的内部函数3.4 Visual Foxpro 的表达式3.5 小结Visual Foxpro 程序设计教程函数常用来执行一些特殊的数据处理,充分正 确地使用函数,可简化操作和程序，增强数 据处理功能。函数调用的一般形式：函数名(参数表)函数名后的括号（）不能省。参数表用方括 号括起来表示可省，即有些函数不需要参 数。Visual Foxp
2、ro 程序设计教程3.3 Visual Foxpro 的内部函数3.3.1 数值函数3.3.2 字符函数3.3.3 日期和时间函数3.3.4 数据类型转换函数3.3.5 测试函数Visual Foxpro 程序设计教程3.3.1 数值函数数值函数的自变量和函数值往往是数值型数据。n1. 求绝对值函数 ABS()例如： ABS（-123）n2. 求平方根函数 SQRT()参数值必须为非负数例如： ? SQRT（25）? SQRT（3+6）Visual Foxpro 程序设计教程3.3.1 数值函数n3. 求指数函数EXP()求ex的值n4. 求对数函数LOG()求自然对数LOG10()求常用对数
3、Visual Foxpro 程序设计教程3.3.1 数值函数(续)n5. 取整函数nINT()取取数值型表达式的整数部分。整数部分。nCEILING()取大于或等于指定表达式的最小整数。取大于或等于指定表达式的最小整数。nFLOOR() 取小于或等于指定表达式的最大整数。取小于或等于指定表达式的最大整数。Visual Foxpro 程序设计教程3.3.1 数值函数(续)n5. 取整函数(续)x=56.72?INT(x), INT(-x)56-56CEILING(x), CEILING(-x)57-56FLOOR(x), FLOOR(x)56-57Visual Foxpro 程序设计教程3.3.
4、1 数值函数(续)n6. 求余数函数MOD(, )n所得余数的符号和表达式2相同。n如果被除数和除数同号，则函数值即为两数相 除的余数。n如果被除数和除数异号，则函数值即为两数相 除的余数再加上除数的值。Visual Foxpro 程序设计教程3.3.1 数值函数(续)n6. 求余数函数(举例)? MOD(15, 4)? MOD(15, 4)3 3? MOD(-15, -4)? MOD(-15, -4)-3-3? MOD(-15, 4)? MOD(-15, 4)1 1? MOD(15, -4)? MOD(15, -4)-1-1如何求一个整数的 某个数位上的数字 ?（P43）x=125x=125
5、 x1=int(x/100)x1=int(x/100) x2=int(mod(x,100)/1x2=int(mod(x,100)/1 0)0) x3=mod(x,10)x3=mod(x,10) ? x1+10*x2+100*x3? x1+10*x2+100*x3Visual Foxpro 程序设计教程3.3.1 数值函数(续)n7. 四舍五入函数ROUND(,)n n求值并保持求值并保持N2N2位小数。若位小数。若N2, )nMIN(, )示例：?MAX(2005-06-23,2004-06-23)06/23/05?MIN(“助教“,“讲师“,“副教授“,“教授“)副教授Visual Foxp
6、ro 程序设计教程3.3.1 数值函数(续)n9. 函数nPI()返回圆周率的近似值Visual Foxpro 程序设计教程3.3 Visual Foxpro 的内部函数3.3.1 数值函数3.3.2 字符函数3.3.3 日期和时间函数3.3.4 数据类型转换函数3.3.5 测试函数Visual Foxpro 程序设计教程3.3.2 字符函数n1. 宏代换函数n n& .字符表达式例例1 1：X=“100+200“X=“100+200“ ? &X? &X 300300 例例2 2：Y=“Y=“abcdabcd“ “Z=“Y“Z=“Y“? &Z? &Zabcdabcd Visual Foxpro
7、 程序设计教程3.3.2 字符函数例例3 3 i=“1“i=“1“ j=“2“j=“2“ x12=“Good“x12=“Good“Good=MAX(96/01/02, 65/05/01)Good=MAX(96/01/02, 65/05/01) ? ? x&i.&jx&i.&j, &x12, &x12 GoodGood4848 例例4 4m=“245*SQRT(4)“m=“245*SQRT(4)“? 34+&m? 34+&m524.00524.00Visual Foxpro 程序设计教程3.3.2 字符函数n2. 求字符串长度函数n nLEN(LEN(字符型表达式)?LEN(ABCDEFG)?L
8、EN(“中华人民共和国“)n3. 求子串位置函数n nAT(,)n nATC(,)Visual Foxpro 程序设计教程3.3.2 字符函数n3. 求子串位置函数(举例)? ? AT(“isAT(“is“, “this is a book“)“, “this is a book“) 3? ? AT(“isAT(“is“, “this is a book“, “this is a book“，2)2)6 6? ? AT(“isAT(“is“, “this is a book“, “this is a book“，3)3)0 0xmxm=“=“李小四李小四“ “?AT(“?AT(“李李“, “,
9、 xmxm), AT(“PRO“, “Visual ), AT(“PRO“, “Visual FoxproFoxpro“)“)?ATC(“PRO“, “Visual ?ATC(“PRO“, “Visual FoxproFoxpro“)“)1 10 01111Visual Foxpro 程序设计教程3.3.2 字符函数n4. 取子串函数n nLEFT(,)n nRIGHT(,)n nSUBSTR(,)Visual Foxpro 程序设计教程3.3.2 字符函数n4. 取子串函数(举例)? LEFT (“? LEFT (“中华人民共和国中华人民共和国“, 4)“, 4)中华中华? RIGHT (“
10、? RIGHT (“中华人民共和国中华人民共和国“, 4)“, 4)和国和国? SUBSTR(“? SUBSTR(“中华人民共和国中华人民共和国“, 5, 4)“, 5, 4)人民人民Visual Foxpro 程序设计教程3.3.2 字符函数n5. 删除字符串前后空格函数n nLTRIM()n nRTRIM()n nALLTRIM()例如：例如：? LTRIM(“ ? LTRIM(“ 大学生大学生 “)“)? RTRIM(“ ? RTRIM(“ 大学生大学生 “)“)? ALLTRIM(“ ? ALLTRIM(“ 大学生大学生 “) “) Visual Foxpro 程序设计教程3.3.2
11、字符函数n6. 生成空格函数n nSPACE()?“A“+SPACE(2)+“B“?“A“+SPACE(2)+“B“A BA BVisual Foxpro 程序设计教程3.3.2 字符函数n7. 字符串替换函数n nSTUFF(,)2)STORE “STORE “中国中国 长沙长沙“ TO X“ TO X?STUFF(X, 6, 4, “?STUFF(X, 6, 4, “北京北京“)“)中国中国 北京北京Visual Foxpro 程序设计教程3.3.2 字符函数n8. 产生重复字符函数n nREPLICATE(,)?REPLICAT(“*“, 6)?REPLICAT(“*“, 6)*Visu
12、al Foxpro 程序设计教程3.3.2 字符函数n9. 大小写字母转换函数n nLOWER()n nUPPER()YnYn=“y“=“y“? ? UPPER(YnUPPER(Yn ), ), LOWER(“YEsLOWER(“YEs“)“)Y YyesyesVisual Foxpro 程序设计教程3.3 Visual Foxpro 的内部函数3.3.1 数值函数3.3.2 字符函数3.3.3 日期和时间函数3.3.4 数据类型转换函数3.3.5 测试函数Visual Foxpro 程序设计教程3.3.3 日期和时间函数n1. 系统日期和时间函数n nDATE()DATE()n nTIME(
13、)TIME()n nDATETIME()DATETIME()? DATETIME()? DATETIME()03/07/11 10:21:30 AM03/07/11 10:21:30 AMVisual Foxpro 程序设计教程3.3.3 日期和时间函数n2. 求年份、月份和天数函数n nYEAR(|)n nMONTH(|)n nDAY(|)d=2005/03/12d=2005/03/12? ?YEAR( YEAR( d d), MONTH ( ), MONTH ( d d), DAY( ), DAY( d d ) )2005 3 122005 3 12Visual Foxpro 程序设计教程
14、3.3.3 日期和时间函数n3. 求时、分和秒函数n nHOUR()n nMINUTE()n nSEC()d=2005/03/12,8:42:56 AMd=2005/03/12,8:42:56 AM? ? HOUR( HOUR( d d) )，MINUTE ( MINUTE ( d d) )，SEC( SEC( d d ) )8 42 568 42 56Visual Foxpro 程序设计教程3.3 Visual Foxpro 的内部函数3.3.1 数值函数3.3.2 字符函数3.3.3 日期和时间函数3.3.4 数据类型转换函数3.3.5 测试函数Visual Foxpro 程序设计教程3.
15、3.4 数据类型转换函数n1. 将字符转换成ASCII函数n nASC() ? ?ASC(“A“),ASC(“aASC(“A“),ASC(“a“), ASC(“BCD“)“), ASC(“BCD“) 65 97 6665 97 66n2. 将ASCII转换成相应字符函数n nCHR() ?CHR(65), CHR(65+1.5)?CHR(65), CHR(65+1.5) ,CHR(97)CHR(97)A B A B a ach1=“M“ch1=“M“ch2=chr(asc(ch1)+asc(“a“)-asc(“A“)ch2=chr(asc(ch1)+asc(“a“)-asc(“A“)?ch2?
16、ch2 mmVisual Foxpro 程序设计教程3.3.4 数据类型转换函数n3. 将字符串转换成日期或日期时间函数n nCTOD()n nCTOT() SET DATE TO YMDSET DATE TO YMD SET CENTURY SET CENTURY ONON x=“2005/06/23“x=“2005/06/23“ y=“2004/06/23“y=“2004/06/23“a=“a=“2007/03/12,12:30:25 P“2007/03/12,12:30:25 P“? ? CTOD(x)-CTOD(y),CTOD(x)-CTOD(y), CTOT(a)CTOT(a)3653652007/03/122007/03/12 12:30:25
