昆明理工大学：《数据库应用基础》课程PPT教学课件（Visual FoxPro 应用及开发技术）第八讲 函数及程序控制结构

第八讲 第四章(3) 函数及 程序控制 结构

函数及 程序控制 结构 第八讲 第四章(3)

上讲内容回顾 常用的输入、输出命令; 口 Foxpro中对数据表记录的基本操作命令 HA Foxpro中对环境的基本设置命令; 用于程序控制的基本命令 其中常用的输入、输出命令和数据表记 菜的本操作命令是本讲的重点

 常用的输入、输出命令；  Foxpro 中对数据表记录的基本操作命令；  Foxpro 中对环境的基本设置命令；  用于程序控制的基本命令 其中常用的输入、输出命令和数据表记 录的基本操作命令是本讲的重点

本讲内容 m常用函数 m程序的选择结构 m程序的循环结构 m程序结构的嵌套 m过程 m自定义函数 Ee四

 常用函数  程序的选择结构  程序的循环结构  程序结构的嵌套  过程  自定义函数

常用函数 日期函数DATE() 用途:返回当前的系统日期,默认格式为mmd/y 例如:?DATE()运行结果为:2/20/01 年函数YEAR() 格式:YEAR() 用途:返回中的年的数据 ?“昆明”$“昆明理工大学”结果为:T ?”昆明”$“云南” 结果为:F $操作符 格式:$包含 在字符表达式2中,则返回“真”,否则返回“假”。 例如

日期函数DATE( ) 用途：返回当前的系统日期，默认格式为mm/dd/yy。 例如：？DATE( ) 运行结果为： 年函数YEAR( ) 格式：YEAR() 用途：返回中的年的数据 FOXPRO还具有求月和求日的函数，分别是：MONTH( ) 和DAY( )函数，用法及格式同上。 字符串操作函数 一、$操作符 格式：$ 用途：检测字符串的包含关系，若包含 在字符表达式2中，则返回“真”，否则返回“假”。 例如 ？“昆明” $ “昆明理工大学 ” 结果为：.T. ？”昆明” $ “云南” 结果为：.F

常用函数 宏替换函数& 格式:& 用途:把字符型变量的值替换出来,就是以字符型内存变量 的值作为函数的值。 注意:在&与内存变量之间不能有空格;该函数可以作为字符串的 部分出现,但引用结尾一定要写“.”,用来和普通字符区 宏替换函数还可以相互嵌套。 三、字符串长度测试函数LEN( 格式:LEN() 用途:生成个数为所指定的空格

二、宏替换函数& 格式：& 用途：把字符型变量的值替换出来，就是以字符型内存变量 的值作为函数的值。 注意：在&与内存变量之间不能有空格；该函数可以作为字符串的 一部分出现，但引用结尾一定要写“ ．”,用来和普通字符区分； 宏替换函数还可以相互嵌套。 三、字符串长度测试函数LEN( ) 格式：LEN() 用途：测算字符串的长度。 如：？LEN(“昆明理工大学计算中心”) 四、空格生成函数SPACE( ) 格式：SPACE() 用途：生成个数为所指定的空格

常用函数 五、删除字符串右边的空格函数 RTRIM)/TRIM( 格式:RTRM(TRM() 六、压缩空格函数 ALLTRIM() 格式: ALLTRIM前后的空格符都删掉,但不能删除掉字符 表达式中间的空格。 七、字符串搜索定位函数AT( 格式:AT(字符表达式2>) 用途:在中搜索首次出现的,如果找 到,函数返回的第一个字符在中的 位置。若没找到,则返回0 八、字符串查找替代函数 CHRTRAN() 格式: CHRTRANG,字符表达式2>) 用途:在中,将与相匹配的 字符替换成中相应的字符

五、删除字符串右边的空格函数RTRIM( )/TRIM( ) 格式：RTRIM( )/TRIM() 六、压缩空格函数ALLTRIM( ) 格式：ALLTRIM() 用途：把前后的空格符都删掉，但不能删除掉字符 表达式中间的空格。 七、字符串搜索定位函数 AT( ) 格式：AT(,) 用途：在中搜索首次出现的,如果找 到，函数返回的第一个字符在中的 位置。若没找到，则返回0 八、字符串查找替代函数CHRTRAN( ) 格式：CHRTRAN(,,) 用途：在中，将与相匹配的 字符替换成中相应的字符

常用函数 九、左字串截取函数LEFT( 格式:LEFT(,n) 用途:从左边开始截取n个字符。若n大于的长度,返回整个;若n,n) 用途:同上,只是截取方向不同。 命 格式 ? SUBSTR(“黄鹤一去不复返",5,10 用途: m个字符 例如 运行结果为:一去不复返

九、左字串截取函数LEFT( ) 格式：LEFT(,n) 用途：从左边开始截取n个字符。若n大于的长度，返回整个；若n,n) 用途：同上，只是截取方向不同。 十一、任意字串截取函数 SUBSTR( ) 格式：SUBSTR(,n ,m) 用途：从的第n个字符开始，连续截取m个字符。 例如： 运行结果为：

常用函数 转换函数 (1)字符转换数值函数VAL() 格式:VAL() 例将傲字电运行结果为:1950 用途:将数字格式的字符转换成数值数据。 ?WAL(1975“) (2)数值转换字符函数STR() 格式:STR(长度>[]) 用途:将数值型数据转换成字符型数据,如果遇到小数点则可指 定要转换的小数位数。当未指定返回的总长度时,其默认 不保留小数位,且总长度为10个字符,未满10个字符则在 前面补满空白

（1）字符转换数值函数VAL( ) 格式：VAL() 用途：将数字格式的字符转换成数值数据。 （2）数值转换字符函数STR( ) 格式：STR([,][,]) 用途：将数值型数据转换成字符型数据，如果遇到小数点则可指 定要转换的小数位数。当未指定返回的总长度时，其默认 不保留小数位，且总长度为10个字符，未满10个字符则在 前面补满空白

常用函数 转换函数 三、字符转换日期函数CTOD() 格式:CTOD() 用途:将字符型的日期格式数据转换成日期型的数据,默认格式 为mmdy 例如: 命令 口K ?cTon(01/03/99")-2 结果为:011/9 用来转换日期型 四、日期转换字符函数DTOC() 数据的格式。 格式:DTOC([ 用途:将日期型的数据转换成字符数据。 例如: 命令 口区 ?“今天是"+r0 ATE O,1 结果为:天是201023

三、字符转换日期函数 CTOD( ) 格式：CTOD() 用途：将字符型的日期格式数据转换成日期型的数据，默认格式 为mm/dd/yy。 四、日期转换字符函数 DTOC( ) 格式：DTOC([,]) 用途：将日期型的数据转换成字符数据。 用来转换日期型 数据的格式

常用函数 测试函数 记录测试函数 RECORD( 格式: RECORD([表别名工作区 用途:测定工作区数据表文件的记录个数。若未指定表别名或工作 区,则返回当前工作区的数据表文件记录个数。 、查找成功测试函数 FOUNT() 格式: FOUND([工作区] 用途:当用查找命令查找记录时,此函数可以判断这个记录是否被 找到。当符合条件的记录被找到时,此函数返回逻辑真值T 否则返回F 例如 程序1.px 口区 UsE学生档案 index on姓名to姓名 use use学生档案 index姓名 SEEK“李航 工 F FOUNII( ?“查到该生 ELSE ?“查无此人 ED工F USE 运行结果为:查无此人

一、记录测试函数 RECORD( ) 格式：RECORD([表别名|工作区]) 用途：测定工作区数据表文件的记录个数。若未指定表别名或工作 区，则返回当前工作区的数据表文件记录个数。 二、查找成功测试函数FOUNT( ) 格式：FOUND([工作区]) 用途：当用查找命令查找记录时，此函数可以判断这个记录是否被 找到。当符合条件的记录被找到时，此函数返回逻辑真值.T. 否则返回.F.。 运行结果为：