vf程序设计ppt课件 第02章 程序设计基础

2.1 数据类型VFP的基本的数据类型包括 : (1) 数值型数值型数据表示数量，由正 (+)负号 (-)、数字和小数点组成。(2) 货币型用于表示货币数据时，使用货币型。(3) 字符型数值型数据由任意字符和汉字组成，用于表示姓名、专业、地址、名称等符号信息，数值性质的信息也可用字符表示。(4) 日期型日期型用于存储日期数据。日期数据可进行各种数值运算。(5) 日期时间型日期时间型数据同时保存日期和时间，可放入两者的任一个 .(6) 逻辑型 逻辑型数据的值只有真假两个值。2.1.1 常量常量是在程序运行过程中保持不变的量。(1) 数值型数值型常量是平常的数值常数，它由正 (+)负号 (-)、数字和小数点组成。(2) 货币型货币型常量用来表示货币值。表示货币型常量时，需数字前加上美元符号 ($)。(3) 字符型字符型常量由单引号、双引号和方括号括的一串字符，这些字符可以是 ASCII字符，也可以是汉字。2.1.1 常量 (4) 日期型日期型常量是用日期格式的数据两端花括号括起。系统默认日期。格式为严格的日期格式 年 /月 /日 ，年月日之间的分隔符为斜杠 (/)，也可以使用连字符 (-)、小数点符 (.)和空格符。(5) 日期时间型日期时间型常量包含时间的日期型常量，数据两端花括号括起，日期时间型常量的格式为 年 /月 /日 时 :分 :秒 上午 |下午 。(6) 逻辑型.T.、 .t.、 .Y.、 .y.表示逻辑型常量的真。 F.、 .f.、 .N.、 .n为逻辑型常量的假。 2.1.2 变量变量名由字符 (字母、汉字、 _和数字 )组成，不能以数字打头。变量名不能使用系统保留字。(1) 变量赋值格式：变量名 =值STORE 值 TO变量名表两个变量赋值的语句的差别是前者一次只能将一个值赋给一个变量，后者一次可以将一个值赋给多个变量。r=10s=3.14159*r*rSTORE “面积 ” TO s1,s2? r, s, s1, s2 & ?为显示后面的内容【 例 2.1】 变量赋值。 2.1.2 变量（ 2）显示变量格式 : DISPLAY MEMORY LIKE 变量名描述 TO PRINTER PROMPT | TO FILE 文件名 。格式 :LIST MEMORY LIKE变量名描述 TO PRINTERPROMPT | TO FILE 文件名 显示内存变量名和当前。*表示任意字符， ? 表示任一字符。TO PRINTER：显示记录送打印机打印。带 PROMPT项，打开打印对话框，在该对话框中对打印机进行设置。TO FILE 文件名：显示记录送到指定的文件中保存。 2.1.2 变量(1) 保存变量格式 :SAVE TO 文件名ALL LIKE 变量名描述 | ALL EXCEPT 变量名描述 该命令将 “变量名描述 ”中指定的内存变量保存到文件中。变量名描述可使用 *和 ?。 *表示任意字符， ? 表示任一字符。ALL LIKE变量名描述指定保存的变量范围。ALL EXCEPT指定不保存的变量范围。(2) 恢复变量格式 :RESTORE FROM文件名 ADDITIVE从保存变量的文件中恢复变量到内存中。选 ADDITIVE，不覆盖当前已有相同内存变量。4 .变量的保存和恢复2.1.2 变量格式 :RELEASE 变量名表 | ALL LIKE变量名描述 | EXCEPT变量名描述 格式 :CLEAR MEMORY前者清除命令中描述的内存变量，后者清除所有的内存变量。 6. 内存变量的释放2.1.2 变量【 例 2.2】 内存变量操作。 NDate=2004.08.19姓名 _1=”金中华 ”姓名 _2=”赵 红 ”姓名 _3=”鞠春松 ”zxf1=40zxf2=42zxf3=40DISPLAY MEMORY &显示所有内存变量SAVE TO MymemRELEASE ALL EXCEPT姓名 * &清除除以 “姓名 ”打头的其他内存变量DISPLAY MEMORY &仅显示以 “姓名 ”打头内存变量姓名 _3=”林 时 ”RESTORE FROM MymemDISPLAY MEMORY &姓名 _3内存变量又变为鞠春松CLEAR MEMORY2.1.3 数组 1. 数组的定义数组就是变量名相同而下标不同的一组变量。格式：DIMENSION 数组名 下标最大值表 2. 数组拷贝格式 : ACOPY(, ,)3. 删除数组元素格式 : ADEL(, ,2)如果是一维数组 , 则序号为要删除数组的元素号； 二维数组 , 则选 ,2，序号为要删除的数组的列号，否则为行号。2.1.3 数组【 例 2.3】 数组操作DIMENSION xm12, xh12,36, XM14, xh112,36xm1=“金中华 “xh1,1=11xh1,2=12xh1,3=13xm2=“赵 红 “xh2,1=21xh2,2=22xh2,3=23xm3=“鞠春松 “xh3,1=31xh3,2=32xh3,3=33ACOPY(xm, xm1, 1,3)ACOPY(xh, xh1)? XM11, xh11,1 & 显示金中 11ADEL(xh1, 1)? xh11,1 & 显示 21ADEL(xh1, 1, 2)? xh11,1 & 显示 22 2.1.3 数组数 组 列 内容 数据 类 型1 文件名 Character2 文件大小 Numeric3 最后改日期 Date4 最后改 时间 Character5 文件属性 Character4. 文件属性到数组格式 : ADIR(,)函数指定目录中符合文件名描述文件情况放入指定的数组中。 属性 功能A Archive Read/Write H HiddenR Read-onlyS SystemD Directory2.1.3 数组5. 得到元素序号格式 : AELEMENT(,)6. 插入数组元素格式 : AINS(,2)7. 得到数组大小 格式 : ALEN(,)8. 数组元素定位格式 : ASCAN(,)9. 数组排序格式 : ASORT(,2.1.3 数组10. 由序号得到下标格式 : ASUBSCRIPT(,) DIMENSION A5A1=2A2=4A3=1A4=3A5=5? A1,A2,A3,A4,A5 &显示 2 4 1 3 5? ASCAN(A,1) &显示 3=ASORT(A)? ASCAN(A,1) &显示 1? A1,A2,A3,A4,A5 &显示 1 2 3 4 5=ADEL(A,1)? ALEN(A) &显示 5? A1,A2,A3,A4,A5 &显示 2 3 4 5 .F.【 例 2.4】 数组函数应用。 2.1.4 常用函数 1. 数值函数 LEN(c) 得到字符串 c的长度 (字符数 ) INT(n) 取数值 n的整数部分。 SQRT(n) 求 n的算术平方根。 ABS(n) 得到的绝对值。 MAX(n1,n2 ,) 求 n1,n2, 中数值最大的。 MIN(n1,n2 ,) 求 n1,n2, 中数值最小的。 MOD(n1,n2) 求 n1/n2的余数。 ROUND(n1,n2) 将 n1的值按 n2位四舍五入。 2.1.4 常用函数【 例 2.5】 数值函数应用 。 ? LEN(“01002”) &显示 5xm=”赵 红 ”? LEN(xm) &显示 6? INT(680.34) &显示 680? SQRT(9) &显示 3.00? MAX(2, 4.5, -100) &显示 4.5? MOD(26,10) , MOD(23,-5) &显示 6 -2SET DECIMALS TO 4 &设置小数位数为 4位SET FIXED ON &固定显示小数位数? ROUND(1536.2854, 3) &显示 1536.2850? ROUND(1536.2854, 2) &显示 1536.2900? ROUND(1536.2854, 0) &显示 1536.0000? ROUND(1536.2854, -1) &显示 1540.00002.1.4 常用函数2. 字符函数 LEFT(s,n) 取字符串 s左边 n个字符。 RIGHT(s,n) 取字符串 s右边 n个字符。 SUBSTR(s,n1,n2) 取字符串 s第 n1个字符开始 n2个字符。 TRIM(s), RTRIM(s), LTRIM(s),ALLTRIM(s) 去字符串 s后面 后面，左、左右的空格字符。 EMPTY(s) 判字符串 s是否为空。 AT(s1, s2, n) 得到字符串 s1在字符串 s2中第 n次出现的位置。没有定位到则返回 0。 SPACE(n) 得到 n个空格。2.1.4 常用函数【 例 2.6】 字符函数应用。 xm =”赵 红 ” ? LEFT(xm, 2) &显示赵? RIGHT xm, 2) &显示红? SUBSTR(“01040102”,3,2) &显示 04? LEN( RTRIM( LEFT(”赵 红 ”,4) ) ) &显示 2? EMPTY(“”) &显示 .T.? AT(”A”, “ABCDAEFG”, 2) &显示 52.1.4 常用函数3. 日期函数 DATE() 得到当前日期。 TIME() 得到当前时间字符串。 DATETIME() 得到当前日期时间。 YEAR(d) 得到日期 d年的数值。 MONTH(d) 得到日期 d月的数值。 DAY(d) 得到日期 d日的数值。 DOW(d) 到日期 d是一周的第几天。【 例 2.7】 日期函数应用。 ? DATE(), TIME()? DATETIME()T=DATE()? YEAR(T), MONTH(T), DAY(T), DOW(T)2.1.4 常用函数4. 数据类型转换函数 STR(n,n1,n2 将数值转换为字符串。 VAL(s) 将数值字符串 s转换为数值。 DTOC(d) 将日期 d转换为日期字符串。 CTOD(s) 将日期字符串 s转换为日期。 TTOC(t) 将时间 t转换为时间字符串。 CTOT(s) 将时间字符串 s转换为时间。 CHR(n) 得到 n的 ASCII码字符。 ASC(s) 得到 s字符串的第一个字符的 ASCII。 2.1.4 常用函数【 例 2.8】 数据类型转换函数应用。 ? STR(1002) &显示字符串 ” 1002”? VAL(“01004”) &显示数值 1004.00t=2004-08-19 8:30 a? DTOC(t), TTOC(t) &显示 08/19/04 08:30:00 AMt=CTOD(”08/19/04”)+1? t? CHR(65) &显示字符 A? ASC(“12345”) &显示数值 492.1.4 常用函数5. 其他函数 BETWEEN(e, e1, e2) 判 e是否在 e1和 e2之间。 INKEY(n) 等待 n秒，返回键盘按键 ASCII 码。 TYPE(s) 判 s中不含引号的表达式的类型。 IIF(l, e1, e2) 如果 l为真，返回 e1，否则返回 e2。 DISKSPACE() 返回当前默认的磁盘驱动器上 FILE(s) 判断 s文件是否存 GETFILE(s1, s2 ) 打开文件选择对话框。s1:列出的 文件名描述 .s2:文件名前提示标签 . MESSAGEBOX(s ,对话框类型 ,对话框标题文本 ) 打开一个对话框，显示字符串 s。 2.1.4 常用函数对话 框 类型功能0 仅 OK按 钮1 OK和 Cancel按 钮2 Abort, Retry, 和 Ignore 按 钮3 Yes, No, 和 Cancel按 钮4 Yes和 No 5 Retry 和 Cancel 按 钮16 Stop 图标32 ? 图标48 ! 图标64 i 图标0 默 认 第 1个按 钮256 默 认 第 2个按 钮512 默 认 第 3个按 钮对话框类型说明 返回 值 按 钮1 OK2 Cancel3 Abort4 Retry5 Ignore6 Yes7 No2.1.4 常用函数【 例 2.9】 MESSAGEBOX函数应用。 ? MESSAGEBOX &显示如图所示yes= MESSAGEBOX &显示如图 所示? yes &选 “是 ”显示 6, 选 “否 ”显示 72.2 操作符和表达式表达式是由数据元素和操作符适当连接而成的式子。1. 数值操作符和表达式数值操作符用于进行数值运算。操作符 功 能+,- 正 负 号*, 幂*,/,% 乘 ,除 , 取模+,- 加减优 先 级 从高到低 为 : +,-号 *, * , / , % + , -。2.2 操作符和表达式2. 字符串操作符和表达式字符串操作符用于 进 行字符运算。操作符 功 能+ 连 接字符串- 删 除操作符左 侧 字符串尾部空格后再 连 接字符串$ 判左 侧 字符串是否包含在右 侧 字符串中优 先 级 从高到低 为 : +,- $。【 例 2.10】 字符串操作符和表达式应用。xh=”01040102”姓名 =“赵 红 ”zxf=40? “赵 红 ”+LEFT(xh,2)+”院 ”+STR(zxf)+”分 ”? ”红 ” $ 姓名2.2 操作符和表达式3.日期操作符和表达式日期操作符用于进行日期运算 。 操作符 功 能+ 日期 +天数得到新日期时间 +秒数得到新 时间- 日期 -日期得到