第Visual FoxPro数据及运算PPT学习教案

1、会计学1第第Visual FoxPro数据及运算数据及运算对于数据处理时要用到的常量、内存变量，以及表中的字段等，Visual FoxPro提供了6种基本的数据类型；另外，对于表中的字段， Visual FoxPro特别又增加了7种可采用的数据类型。第1页/共77页第2页/共77页第3页/共77页第4页/共77页第5页/共77页字符型常量的定界符必须成对匹配，不能一边用单引号而另一边用双引号。如果某种定 界符本身也是字符串的内容，则需要用另一种定界符为该字符串定界。例如，计算机、430056、男、Im a student.、A都是字符型常量。注意，在命令中，A与A是完全不同的，前者是字符型常量

2、，而后者会被系统认为是一个变量。另外，不包含任何字符的字符串叫空串，即。空串与包含空格的字符串 不同。第6页/共77页为了表示绝对值很大或很小的数值型常量，也可以使用科学记数法形式书写，例如：用4.9731E12表示4.97311012，用1.5E-12表示1.510-12。数值型常量不用定界符。第7页/共77页严格的日期格式：在Visual FoxPro命令的表达式中，系统默认日期型常量为严格的日期格式，其一般形式为：yyyy/mm/dd。用这种格式书写的日期常量能表达一个确切的日期，它不受系统日期格式、世纪年份设置的影响。这种格式的日期常量在书写时要注意：花括号内第一个字符必须是脱字符“”

3、；年份必须用4位，如1959、2009等；年月日的次序不能颠倒、不能缺省。第8页/共77页第9页/共77页第10页/共77页只由字母、汉字、下划线、数字组成，字母大小写等价。开头不能是数字。除自由表中的字段名、索引的TAG标识名最多只能10个字符外，其他的命名可使用1128个字符。为避免误解和混淆，不应将Visual FoxPro的保留字作为变量名。注意：变量名不得用引号或方括号括起来。第11页/共77页字段变量的名字、类型等，在用户建立表结构时决定。第12页/共77页内存变量的数据类型可以为字符型(C)、数值型(N)、货币型(Y)、日期型(D) 、日期时间型(T) 、逻辑型(L)。每一个变量

4、都有一个名字，通过变量名访问变量。如果当前表中存在一个同名的字段变量，则在访问内存变量时，必须在变量名前加上前缀M.或M-，否则系统将访问同名的字段变量。以下几张幻灯片给出与内存变量操作有关的几条命令。第13页/共77页第14页/共77页例如，依次执行如下命令： x=0 y=1+2 x=y ? x,y输出结果为：3 3。可见，最后，内存变量x与y的值均为3。这是因为，赋值命令x=y的功能是将y的值赋给x而不是相反。赋值命令x=y与y=x的效果是截然不同的。第15页/共77页例如，执行命令： Store 100 To x,y,z ? x,y,z输出结果为：100 100 100。第16页/共77

5、页 Use 学生学生 xm=张三思张三思 Display fields 学号学号,姓名姓名,性别性别,专业专业 for 姓名姓名=xm主窗口中显示出： 记录号 学号 姓名 性别 专业 3 07640301 张三思 男 生物工程再执行命令： xm=田七彩田七彩 Display fields 学号学号,姓名姓名,性别性别,专业专业 for 姓名姓名=xm主窗口中接着显示出： 记录号 学号 姓名 性别 专业 7 08261217 田七彩 女 财务管理第17页/共77页选用LIKE选项只显示与通配符相匹配的内存变量，通配符包括：*和?，*表示任意多个字符，?表示任意一个字符。选项TO PRINTER或

6、TO FILE 用于在显示的同时输出到打印机，或者存入给定文件名的文本文件中，文件的扩展名为.txt。LIST MEMORY一次显示与通配符匹配的所有内存变量，如果内存变量多，一屏显示不下，则自动向上滚动。DISPLAY MEMORY分屏显示与通配符匹配的所有内存变量，如果内存变量多，显示一屏后暂停，按任意键之后再继续显示下一屏。第18页/共77页命令功能：格式一清除所有内存变量。格式二清除指定的内存变量。选用LIKE选项清除与通配符相匹配的内存变量，选用EXCEPT选项清除与通配符不相匹配的内存变量。第19页/共77页第20页/共77页第21页/共77页第22页/共77页例： ? SQRT(

7、2)输出结果为：1.41。第23页/共77页例： x=3.8? INT(x),INT(-x)输出的函数值依次为：3 -3第24页/共77页例: x=345.456 ? ROUND(x,2),ROUND(x,1),ROUND(x,0),ROUND(x,-1)输出结果为：345.46 345.5 345 350。第25页/共77页例： x=716 a1=MOD(x,10) a2=MOD(INT(x/10),10) a3=INT(x/100) ? a1,a2,a3输出结果依次为x的个位、十位、百位数字。第26页/共77页功能：MAX函数计算各表达式的值，并返回其中的最大值。MIN函数计算各表达式的值

8、，并返回其中的最小值。函数参数中，表达式的类型可以是字符型、数值型、货币型、双精度型、浮点型、日期型、日期时间型，也可以是逻辑型，但所有表达式的类型必须相同。第27页/共77页第28页/共77页第29页/共77页例： ? LEN(中文中文Visual FoxPro)输出结果为17。第30页/共77页例： s= 张张 三三 ? LEN(s),LEN(ALLTRIM(s)输出结果分别为10和6。第31页/共77页例： s=中文中文Visual FoxPro ? LEFT(s,4),SUBSTR(s,6,2),RIGHT(s,3)输出结果为：中文 is Pro。第32页/共77页第33页/共77页第

9、34页/共77页功能：DATE函数返回当前的系统日期，函数值为日期型。TIME函数按24小时制返回当前的系统时间，格式为hh:mm:ss，函数值为字符型。第35页/共77页例： d=2008/09/10 ? YEAR(d),MONTH(d),DAY(d)输出结果依次为：2008 9 10。第36页/共77页功能：HOUR函数按24小时制从指定的日期时间型数据中返回小时的数。MINUTE函数从指定的日期时间型数据中返回分钟的数。SEC函数从指定的日期时间型数据中返回秒数。这三个函数的返回值都为数值型。第37页/共77页v数值转换成字符串STRv字符串转换成数值VALv字符串转换成日期或日期时间C

10、TOD、CTOTv日期或日期时间转换成字符串DTOC、TTOCv求字符的ASCII码的函数ASCv求ASCII码对应字符的函数CHRv宏代换函数&第38页/共77页例：? STR(5678.5678,7,2),STR(5678.5678,6,2),STR(5678.5678,3,2)输出结果为：5678.57 5678.6 *。第39页/共77页例：? VAL(-123.45-6ABC),VAL(Q-123.45-6ABC),VAL( -123.45-6.7ABC)输出结果是： -123.45 0.00 -123.45第40页/共77页功能：CTOD函数将的值转换成日期型数据。字符串中的日期部

11、分格式要与系统设置的日期显示格式一致。其中的年份可以用四位，也可以用两位。第41页/共77页对DTOC函数来说，如果使用选项1，则字符串的格式总是为YYYYMMDD，共8个字符。对TTOC函数来说，如果使用选项1，则字符串的格式总是为YYYYMMDDHHMMSS，采用24小时制，共14个字符。例： ? 系统日期中的分隔符是：系统日期中的分隔符是：-SUBSTR(DTOC(DATE(),3,1)输出结果为： 系统日期中的分隔符是：/第42页/共77页例： b=学生学生 Use &b &相当于：Use 学生 b=教师教师 Use &b &相当于：Use 教师又例： e=1+2 ? e, 等于等于:

12、, &e &相当于：? e, 等于:, 1+2输出结果为： 1+2 等于: 3第43页/共77页常用的测试函数有-v表文件首测试函数BOF( )v表文件尾测试函数EOF( )v记录号测试函数RECNO( )v记录删除测试函数DELETED( )v记录查找测试函数FOUND ( )第44页/共77页 表文件首是指第一条记录上面的位置。第45页/共77页例： Use 课程课程 ? EOF()输出结果为：.F.。然后再执行命令： Display All将显示出所有记录。然后再输出EOF函数的值： ? EOF()此时输出结果为：.T.。这是因为，刚才逐条显示完所有记录后，记录指针移过了底部，指向了表文

13、件尾，所以EOF函数值为逻辑真值了。注意：当前表的EOF()值为.T.时，VF主窗口的状态栏中有EOF字样。第46页/共77页功能：返回当前表文件或指定表文件中当前记录的记录号。如果指定工作区号上没有打开表文件，函数值为0。如果记录指针指向文件尾，函数值为表文件中的记录数加1。第47页/共77页功能：对当前表文件或指定表文件中的当前记录，测试其是否有逻辑删除标记。若有，函数值为.T.，表示该记录已被逻辑删除；否则，函数值为.F.。若缺省参数，则在当前工作区所打开的表中测试当前记录。第48页/共77页例： Use 学生学生 Locate For 专业专业=财务管理财务管理 ? FOUND()输出

14、结果为：.T.。第49页/共77页例： ? BETWEEN(567*8,4500,4600)输出结果为.T.。第50页/共77页例： SET CENTURY ON s=DTOC(DATE() ? IIF(LEN(s)=10, 4位年份位年份,2位年份位年份)输出结果为：4位年份。又例： SET CENTURY OFF s=DTOC(DATE() ? IIF(LEN(s)=10, 4位年份位年份,2位年份位年份)输出结果为：2位年份。第51页/共77页作为特例，单个的常量、变量或函数，可视为最简单的表达式。Visual FoxPro的表达式有算术、字符、日期时间、关系、逻辑等5类基本运算。第52

15、页/共77页Visual FoxPro的算术运算符，按运算优先级从高到低的顺序排列如下：括号( )。注意：多层括号都用此英文的圆括号，且里层括号更优先。注意：多层括号都用此英文的圆括号，且里层括号更优先。乘方* * *或。乘* *、除/、求余数%。加+、减-。第53页/共77页第54页/共77页所用到的两个赋值命令分别写为： x1=(-5+Sqrt(5x1=(-5+Sqrt(52-42-4* *4 4* *1)/(21)/(2* *4)4) x2=(-5-Sqrt(5 x2=(-5-Sqrt(5* *5-45-4* *4 4* *1)/2/41)/2/4第55页/共77页第56页/共77页例：

16、sm=计算机网络教程计算机网络教程 ? + sm + 新书已到新书已到输出为结果为：计算机网络教程新书已到若执行下一命令： ? + sm - 新书已到新书已到输出为结果为：计算机网络教程新书已到第57页/共77页例：sm=计算机网络ABC ? $sm, 网络$sm, 计网$sm, ABC$sm, abc$sm输出结果分别为：.F. .T. .F. .T. .F.。第58页/共77页第59页/共77页例： ? 2008/08/08+100输出结果为：11/16/08。第60页/共77页例： ? 2008/08/08-100输出结果为：04/30/08。第61页/共77页例： ? 2008/01/

17、01-2008/08/08, 2009/08/08-2008/08/08输出结果为：-220 365。第62页/共77页5.前推日期时间表达式一般形式：-其运算结果得到以前若干秒的日期时间。6.日期时间间隔表达式一般形式：-其运算结果得到两个日期时间之间相隔的秒数。例： ? 2008/08/08,00:00:00 AM-2008/08/08,08:00:00 PM输出结果为：-72000。表示运算符左边的日期时间离右边的日期时间还差72000秒。第63页/共77页关系表达式一般形式为： e1e2其中e1、e2可以为算术表达式、字符表达式、日期时间表达式，也可以为逻辑值的表达式。e1、e2必须属

18、于同一类型。精确等于运算符=仅适用于字符型数据。关系表达式常用于表示一个操作条件，表达式值为.T.时，条件成立，否则条件不成立。第64页/共77页设置字符排序依据的方法是：在“工具”菜单中单击“选项”菜单项，在“选项”对话框的“数据”选项卡中，从“排序序列”下拉列表框中可选择Machine、PinYin或Stroke三种选项之一，作为字符排序的依据。第65页/共77页精确相等比较在SET EXACT on状态，字符串使用=号运算符所作的比较，为精确的相等比较。这种比较，先在较短串的尾部加上若干空格，使两个字符串的长度一样，再逐个字符作=号比较。例： ? AB =AB, AB=AB , AB AB输出：.T. .T. .F.。双等号相等比较双等号运算符=是VF专为字符串的相等比较而设计的，用于对两字符串作完全严格的相等比较，且