程序设计基础（vfp）第五章 程序设计基础

程序设计基础（VFP）第五章程序设计基础·数据类型·表达式·程序控制Contents本章目录涵盖编程基础核心模块，从数据结构到程序逻辑控制的完整知识体系。01数据类型与数据容器02操作符和表达式03数据处理技术04程序流控制CHAPTER01数据类型与数据容器掌握VFP的数据类型体系与变量、常量、数组等数据容器的使用方法DataTypesVFP数据类型体系总览VFP提供了丰富的数据类型体系，涵盖数值、字符、日期时间、逻辑、备注、通用等类型，每种类型在内存占用、运算规则和适用场景上各有特点，正确选择数据类型是高效编程的基础。数值型支持整数和浮点数运算，是数学计算和统计分析的基础数据类型。可存储整数、小数、双精度等多种数值形式。存储空间：8BYTES字符型存储文本信息，支持连接、截取、查找等丰富的字符串操作。适用于姓名、地址、编码等文本数据的存储。最大长度：254字符日期型YYYY/MM/DD格式存储，支持日期加减运算，常用于计算时间差、年龄、账期等业务场景。存储空间：8BYTES逻辑型仅.T.和.F.两个取值，广泛用于条件判断和流程控制。是构建业务规则和数据校验的核心类型。存储空间：1BYTE备注与通用型存储大容量文本和OLE对象，通过.FPT文件独立存储。适用于长文本、图片、文档等非结构化数据。存储方式：.FPT文件VFPDATATYPES数值型与字符型数据详解数值型和字符型是VFP编程中最基础也最常用的两种数据类型。数值型涵盖整数与浮点数，需注意精度控制；字符型支持三种定界符，在字符串比较中遵循ASCII码逐位比较规则，掌握其特性对正确编程至关重要。数值型数据（N）01整数范围-263至263-1，浮点数精度约15–16位有效数字，超出精度范围会出现舍入误差02货币型（Currency）是数值型的特殊形式，固定4位小数精度，专门用于财务计算以避免浮点误差03浮点型（Float）与双精度型（Double）在VFP中表现一致，均占用8字节，可根据计算精度需求选择字符型数据（C）01支持单引号、双引号和方括号三种定界符，方括号定界符可包含引号，如[It'sa'test']02字符串比较按ASCII码逐位进行，大写字母ASCII值小于小写字母，因此'A'<'a'为真03字符型字段最大254字节，超出长度需使用备注型（Memo）字段存储，备注型理论上无长度限制DATATYPES日期型与逻辑型数据详解日期型与日期时间型为时间相关业务提供了精确的数据支持，支持日期加减运算；逻辑型虽仅有两个取值，却是程序流程控制中条件判断的核心数据类型，两者的正确使用直接影响程序的业务逻辑准确性。TYPEREFERENCE8BDate·DateTime1BLogical(L)Date−Date→Days日期差→天数（数值型）Date+N→NewDate日期偏移→新日期.T.>.F.逻辑值隐式排序规则日期与日期时间型01日期型（Date）固定8字节，格式YYYY/MM/DD；日期时间型（DateTime）同样8字节，精确到秒级02日期运算支持加减：日期−日期=天数差（数值型），日期+整数=新日期，常用于工龄和工期计算03DATE()返回当前系统日期，DATETIME()返回当前日期时间，CTOD()可将字符型转换为日期型逻辑型数据（L）04仅占1字节，真值.T./.t./.Y./.y.，假值.F./.f./.N./.n.，书写时两端必须加圆点05逻辑型是条件分支和循环控制的核心，所有IF和DOWHILE语句的条件表达式最终都归结为逻辑值06逻辑型数据参与比较运算时.T.大于.F.，在排序和筛选场景中需注意这一隐式转换规则VFP·数据类型数据容器分类与特征VFP中的数据容器分为常量、变量、数组和字段四类，每种容器在数据生命周期、作用域和使用方式上各有特点。常量程序运行期间值固定不变，使用#DEFINE命令定义符号常量，适合存放税率、版本号等固定参数#DEFINE变量最灵活的数据容器，通过赋值语句创建和修改，按作用域分为局部变量、私有变量和公共变量三类三类作用域数组同名下标变量的有序集合，用DIMENSION或DECLARE声明，支持一维和二维，元素从下标1开始DIMENSION字段数据表中的列，与表记录绑定存储，字段名即为容器名，其数据类型在表结构定义时确定表结构绑定VFP·基础语法变量作用域与命名规范VFP变量按作用域分为LOCAL、PRIVATE和PUBLIC三级，不同作用域决定了变量的可见范围和生命周期。遵循合理的命名规范（如匈牙利命名法）和作用域最小化原则，是编写可维护代码的关键实践。变量作用域层级LOCAL局部变量—仅在定义它的程序模块内有效，程序结束时自动释放，是推荐的默认作用域选择PRIVATE私有变量—在当前程序及其调用的子程序中有效，是VFP的默认变量类型，无需显式声明PUBLIC公共变量—在整个应用系统的所有模块中全局可见，需谨慎使用以避免变量冲突和调试困难命名规范建议匈牙利命名法—变量名前缀标识类型，如nCount（数值）、cName（字符）、lFlag（逻辑）、dDate（日期）命名规则—长度1–254字符，以字母或下划线开头，建议使用有意义的英文单词或缩写，避免单字母命名VisualFoxPro·Array数组的声明与操作VFP数组使用DIMENSION或DECLARE声明，下标从1开始，支持一维和二维结构。数组元素可存放不同类型数据，配合ASCAN()搜索和ASORT()排序等内置函数，可高效处理批量数据。声明与维度用DIMENSIONa(5)声明一维数组，DIMENSIONb(3,4)声明3行4列的二维数组，下标均从1开始。DIMENSION混合数据类型元素可存放数值、字符串、逻辑值等不同类型数据，语法合法但建议保持类型一致。混合类型搜索与排序ASCAN()返回匹配元素下标位置，未找到返回0；ASORT()对数组元素进行升序排序。ASCAN()动态表结构AFIELDS()将当前表字段信息填充到数组，常用于动态获取表结构以实现通用数据处理。AFIELDS()VFPProgramming常量定义与内存变量操作VFP通过#DEFINE定义编译时常量或通过命名约定定义逻辑常量，内存变量则通过STORE和赋值语句管理。掌握内存变量的查看、保存和恢复命令，是调试程序和持久化配置参数的必备技能。常量定义方式#DEFINEPI3.14159编译时常量编译时直接替换为数值，运行效率最高且不可被程序修改。适用于数学常数、固定配置等永不改变的值。MAX_RETRY=3命名约定全大写命名虽技术上可修改，但通过命名规范约束开发者不改变其值。团队约定俗成的常量标识方式。内存变量操作命令STORE0TOx,y,z批量赋值同时给多个变量赋相同初值，等价于x=0、y=0、z=0三条赋值语句。初始化数组或批量清零时常用。DISPLAYMEMORY调试查看列出所有当前内存变量的名称、类型和值，是程序调试时排查变量状态的核心命令。支持按作用域筛选。SAVE/RESTORE持久化SAVETOvars.MEM将内存变量保存到文件，RESTOREFROM从文件恢复，实现参数持久化。跨会话保持配置状态。CHAPTER02操作符和表达式系统学习VFP各类操作符的运算规则与表达式构建方法VFP运算符算术操作符与字符操作符算术操作符支持基本数学运算和取模操作，字符操作符则提供字符串连接与子串判断功能。掌握两类操作符的运算规则，特别是取模运算和VFP特有的$包含运算符，是构建复杂表达式的基础。算术操作符01基本运算符：+（加）、-（减）、*（乘）、/（除）、^或**（幂）运算优先级为幂>乘除>加减，括号可改变计算顺序02取模运算：%或MOD()返回除法余数7%3结果为1，常用于判断奇偶数和循环计数场景03整除实现：VFP无整除运算符，需用INT(7/3)实现结果为2；负数取模结果的符号与除数一致字符操作符01+连接符：保留所有空格不做裁剪'Hello'+'World'结果为'HelloWorld'02-压缩连接：移除前串尾部空格后连接'Hello'-'World'结果为'HelloWorld'，适用于字段拼接03$包含判断：判断左串是否为右串的子串'VFP'$'VisualFoxPro'为真，常用于模糊查询和关键词匹配VFP·OPERATORS关系操作符与逻辑操作符关系操作符产生逻辑型结果，是条件判断的基础；逻辑操作符用于组合多个条件表达式。RELATIONAL·6种关系操作符01=（等于）、==（精确等于）、<>或#或!=（不等于）、>（大于）、<（小于）、>=和<=（大于等于/小于等于）02==要求字符串长度和内容完全一致，而=在SETEXACTOFF状态下忽略尾部空03日期型可直接比较大小，较晚的日期值更大；逻辑型.T.大于.F.；不同类型之间不能直接比较LOGICAL·3种逻辑操作符01.NOT.取反：将.T.变为.F.，将.F.变为.T.，优先级最高，常用于否定条件判断02.AND.逻辑与：两个条件同时为.T.时结果才为.T.，常用于多条件筛选03.OR.逻辑或：任一条件为.T.即结果为.T.，优先级最低，建议用括号明确运算顺序VFPFUNDAMENTALS表达式分类与运算优先级VFP表达式按结果类型分为数值、字符、关系和日期四类表达式，复杂表达式中各操作符遵循严格的优先级规则。掌握优先级层次并善用圆括号显式控制求值顺序，是避免运算错误的关键。01数值与字符表达式数值表达式结果为数值型，如2*3+1结果为7；字符表达式结果为字符型，如'Hello'+''+'World'结果为"HelloWorld"。两类表达式分别用于算术计算和字符串拼接操作。02关系与日期表达式关系表达式结果为逻辑型，如5>3为.T.；日期表达式结果为日期型或数值型，如DATE()+7为一周后的日期。关系运算常用于条件判断，日期运算支持日期间隔计算。03运算优先级层次从高到低依次为：圆括号→函数调用→幂运算(^)→乘除取模(*/%)→加减(+−)→字符运算→关系运算→逻辑运算。同级运算从左到右依次执行，括号可改变默认顺序。04类型匹配与转换混合类型表达式需注意类型匹配：数值与字符不能直接运算，需通过STR()将数值转为字符，或使用VAL()将字符转为数值。显式转换可避免隐式类型错误。FUNCTIONS常用内置函数与表达式应用VFP内置了丰富的数值处理、字符操作和类型转换函数，这些函数是构建复杂表达式和实现业务逻辑的核心工具。熟练运用常用函数可以将多行代码简化为一行表达式，显著提升编程效率和代码质量。数值与字符函数INT()取整、ROUND(x,n)四舍五入到n位小数、ABS()取绝对值、MAX()/MIN()比较取值INT·ROUND·ABS字符操作函数LEN()求字符串长度、SUBSTR(s,n,m)从第n位截取m个字符、TRIM()/LTRIM()/ALLTRIM()去除空格LEN·SUBSTR·TRIM类型转换函数STR(n,len,dec)将数值转为指定长度和小数位的字符串，VAL(s)将字符转为数值，是数据格式化的核心函数STR·VAL日期函数CTOD(s)字符转日期、DTOC(d)日期转字符、YEAR()/MONTH()/DAY()提取日期的年月日分量CTOD·DTOC·YEARVFP·表达式表达式构建实战示例通过员工工龄计算、多条件查询构造和格式化输出三个典型场景，展示如何将基础操作符和函数组合为解决实际问题的表达式，体现表达式在VFP编程中的核心桥梁作用。01工龄计算INT((DATE()-hire_date)/365)用日期差除以365并取整，得到员工入职年限的整数值。该表达式将日期函数与算术运算结合，实现人事管理中的自动化工龄统计。02多条件查询age>=18.AND.age<=60.AND.(gender='男'.OR.department='技术部')组合多个筛选条件，实现复杂业务逻辑的精确查询。通过逻辑运算符嵌套，构建符合企业实际需求的员工筛选规则。03格式化输出'员工'+name+'的月薪为'+LTRIM(STR(salary,8,2))+'元'将数值与字符拼接为可读输出。利用STR函数控制数字格式，配合LTRIM去除前导空格，生成符合中文阅读习惯的工资条文本。04数据验证!EMPTY(cName).AND.LEN(ALLTRIM(cName))<=20.AND.nAge>0.AND.nAge<150综合校验输入合法性。检查非空、长度限制及数值范围，确保录入数据符合业务规则，防止脏数据进入系统。CHAPTER03数据处理技术深入掌握常量、变量、数组、字段记录及类对象的数据处理方法VFPProgramming常量与变量处理技术VFP中常量和变量的处理涉及多种语法格式和辅助函数。掌握日期常量的花括号表示法、TYPE()类型检测函数以及PARAMETERS参数传递机制，是编写健壮程序和实现模块化设计的基础。常量处理规范01日期常量花括号表示法{^2024-01-15}为严格日期格式，SETSTRICTDATE控制日期格式的解析严格程度，避免世纪日期歧义问题02逻辑常量必须带圆点.T.和.F.不能省略圆点写成T或F，否则VFP会将其解释为变量名而非逻辑值03字符常量三种定界符嵌套规则外层用双引号时内层可用单引号，如"It'sa'test'"合法；定界符需成对出现，嵌套时交替使用避免冲突变量处理技巧01TYPE()函数类型检测返回变量类型代码：C=字符、N=数值、D=日期、L=逻辑、M=备注，参数必须加引号，如TYPE("varName")02PARAMETERS参数传递机制接收调用程序传入的参数，子程序第一行必须是PARAMETERS，参数个数和类型需与DO调用严格一致03变量初始化最佳实践变量未赋值前使用会报错，良好的编程习惯是在程序开头用STORE或LOCAL为所有变量初始化，避免运行时错误VFP·ARRAYOPERATIONS数组高级操作技术从维度探测到记录互转，掌握批量数据处理的四项核心能力VFP提供了ALEN()、ADEL()、AINS()等数组操作函数以及SCATTER/GATHER命令，使数组成为高效处理批量数据的利器。结合FOREACH遍历语法，数组操作可以替代许多复杂的手动循环逻辑。ALEN()维度探测ALEN(数组名)返回元素总数，ALEN(数组名,1)返回行数，ALEN(数组名,2)返回列数，用于动态获取数组维度信息。ALEN()SCATTER/GATHER记录互转SCATTERTOarrName将当前记录字段值填充到数组，GATHERFROMarrName将数组值写回当前记录，实现记录与数组的高效互转。S↔GADEL/AINS元素增删ADEL(数组名,n)删除第n个元素并将后续元素前移，AINS(数组名,n)在第n位插入空元素并将后续元素后移。INS/DELFOREACH遍历语法FOREACHelementINarrName...ENDFOR循环遍历数组每个元素，语法简洁且不易出错，推荐替代DOWHILE遍历。FOREACHDATABASEOPERATIONS字段与记录处理技术字段和记录处理是VFP作为数据库编程语言的核心能力。通过REPLACE、APPEND、INSERT、DELETE等命令，可以实现对数据表的高效批量操作，这是VFP在管理信息系统开发中的核心竞争力。VFPCommandSyntaxFIELDREPLACEALLsalaryWITHsalary*1.1RECORDAPPENDBLANKDELETE→PACKNAVIGATIONGOTOP·SKIPnEOF()·BOF()7核心命令01字段操作命令REPLACE字段名WITH表达式[ALL|FOR条件]批量修改字段值，如REPLACEALLsalaryWITHsalary*1.1全员加薪；字段名可直接作为表达式使用，?name输出当前记录的姓名值，字段操作基于当前记录指针位置。02记录增删命令APPENDBLANK在表尾追加空记录，INSERT在当前位置前插入记录。DELETE标记删除（逻辑删除），PACK物理删除所有已标记记录，RECALL恢复被标记删除的记录。03记录导航命令GOTOP/BOTTOM/GOTOn移动记录指针，SKIPn相对移动，EOF()和BOF()检测是否到达表尾或表头，实现记录的精准定位与遍历。Object-OrientedBasics类与对象的初步处理VFP支持面向对象编程范式，类是对象的模板而对象是类的实例。通过CREATEOBJECT()创建实例并操作其属性和方法，是理解VFP表单设计和事件驱动模型的前置知识。内置丰富基类Form（表单）、CommandButton（按钮）、TextBox（文本框）等，可直接实例化使用Form·Button·TextBoxCREATEOBJECT()创建实例oForm=CREATEOBJECT('Form')创建表单对象，oForm.Caption='标题'设置属性CREATEOBJECT()自定义类与继承DEFINECLASS...ENDCLASS语法定义属性、方法和事件处理程序，支持继承VFP基类DEFINECLASS方法调用格式oForm.Show()显示表单，oForm.Release()释放表单对象，格式为"对象名.方法名(参数)"Object.Method()CHAPTER04程序流控制掌握顺序、分支、循环三大基本控制结构及子程序调用机制Chapter·VFPProgramBasics顺序执行与程序基本概念顺序执行是最基本的程序控制结构，代码从上到下逐行执行。VFP程序文件以.PRG为扩展名，通过DO命令执行，配合注释和输入输出命令构成完整的程序开发基础。程序文件基础01程序文件扩展名为.PRG，用MODIFYCOMMAND创建编辑，DO命令执行02注释以*开头（整行）或&&开头（行尾），良好注释是可维护性的关键03SETTALKON/OFF控制执行结果是否显示，正式程序通常设为OFF输入输出命令01?和??用于输出显示：?换行后输出，??在当前行追加，支持表达式列表和PICTURE格式化?·??02INPUT接收任意类型，ACCEPT仅接收字符型，WAIT接收单字符——三种命令各有适用场景3CommandsVFP编程基础条件分支：IF-ELSE-ENDIF结构IF-ELSE-ENDIF是VFP中最基本的条件分支结构，根据条件表达式的逻辑值选择执行不同的代码块。正确的缩进和成对匹配是避免逻辑错误的关键，嵌套使用时需严格保证内层结构完全包含在外层块中。基本语法IF条件表达式…[ELSE…]ENDIF，条件表达式必须为逻辑型或可转换为逻辑型的表达式。条件为真时执行IF块内的语句序列，为假时跳过或执行ELSE块。ELSE部分可选当条件为假且无ELSE块时直接跳过IF结构，适用于仅需在条件成立时执行操作的场景。这种单分支结构使代码更加简洁清晰。嵌套规则内层IF-ENDIF必须完全包含在外层IF或ELSE块中，不能交叉嵌套，建议缩进4空格提高可读性。多层嵌套时应特别注意ENDIF的配对关系。VFP语法约束VFP不支持单行IF语句，即使只有一条执行语句也必须写完整的IF-ENDIF结构，这与VB等语言不同。编译器会严格检查结构的完整性。PROGRAMMING·CONTROLFLOW多分支选择：DOCASE结构DOCASE-ENDCASE语句用于多条件分支选择，从上到下依次判断每个CASE条件，首个为真的条件对应的代码块被执行后即跳出。OTHERWISE子句处理所有条件均不满足的兜底情况，是替代嵌套IF的最佳方案。语法结构DOCASE...CASE条件1...CASE条件2...[OTHERWISE]ENDCASE，条件从上到下依次判断DOCASE执行顺序首个为真的CASE条件被执行后立即跳出整个结构，后续CASE不再判断，排列顺序影响结果首个跳出成绩评定CASEscore>=90等级='优秀'，CASEscore>=80等级='良好'，利用顺序判断无需写上限条件≥90优秀OTHERWISE兜底当所有CASE条件均为假时执行，相当于IF-ELSE嵌套中最后的ELSE块，确保所有情况被覆盖兜底处理VFP程序设计循环结构：DOWHILE-ENDO循环DOWHILE-ENDO是VFP中最灵活的条件循环结构，在条件为真时重复执行循环体。配合LOOP跳过和EXIT跳出命令，可以实现复杂的循环控制逻辑，但需特别注意避免死循环的产生。基本语法与注意事项01语法：DOWHILE条件表达式...[LOOP]...[EXIT]...ENDDO，条件为.T.时反复执行循环体02进入循环前必须初始化循环条件变量，循环体内必须有修改条件的语句，否则陷入死循环无法终止03LOOP跳过本次循环剩余语句直接进入下一次判断，EXIT立即终止整个循环跳转到ENDDO之后典型应用场景04遍历数据表：DOWHILE!EOF()...SKIP...ENDDO逐条处理记录，找到目标后EXIT提前退出05累加求和：初始化sum=0，DOWHILEi<=n循环中sum=sum+i，循环结束后sum即为1到n的累加和循环结构FOR计数循环与SCAN表扫描循环FOR循环适用于已知循环次数的计数场景，语法简洁直观；SCAN循环是VFP特有的表遍历结构，自动管理记录指针移动，是处理数据表记录最优雅且最安全的方式。FOR-NEXT计数循环语法结构：FOR变量=初值TO终值[STEP步长]...ENDFOR，步长默认1，设负数可实现倒序如FORi=10TO1STEP-1自动步进：循环变量在每次迭代后自动按步长递增或递减，无需手动修改，避免DOWHILE中忘记更新条件的错误典型应用：遍历数组FORi=1TOALEN(arr)、生成序列、控制输出格式等已知循环次数的场景SCAN-ENDSCAN表扫描循环语法结构：SCAN[FOR条件][WHILE条件]...ENDSCAN，自动移动记录指针遍历满足条件的每条记录条件筛选：FOR子句指定筛选条件，只处理满足条件的记录；WHILE子句在条件首次为假时停止扫描，适合有序表安全优势：自动处理EOF检测和SKIP移动，比DOWHILE!EOF()写法更简洁安全，是VFP数据处理的推荐方式CONTROLFLOW循环嵌套与控制命令进阶循环嵌套是实现复杂算法的基础，内外层循环变量必须独立且内层完全包含于外层。EXIT和LOOP仅作用于最内层循环，跨层控制需借助标志变量。合理的嵌套设计是编写高效数据处理程序的关键。嵌套结构规则内外层循环变量不能重名，内层循环必须完全包含在外层循环体内，禁止交叉嵌套。变量命名应清晰区分层级关系，避免命名冲突导致逻辑错误。禁止交叉九九乘法表实例外层FORi=1TO9控制行，内层FORj=1TOi控制列，??i*j输出乘积，换行后进入下一行。内层循环次数随外层变量递增，形成经典的三角结构。9×9EXIT与LOOP作用域EXIT和LOOP仅作用于所在的最内层循环，若需从内层跳出外层循环，可设置标志变量如lExit=.T.在外层检测。这是实现跨层控制的标准模式。标志变量DOEVENTS防假死DOEVENTS命令在长循环中插入调用，允许系统处理其他事件（如界面刷新），避免程序出现假死现象。建议在循环体内定期执行以保持界面响应。界面刷新MODULARPROGRAMMING子程序与过程调用机制子程序和过程是VFP实现模块化编程的核心机制，通过DO命令调用并以RETURN返回。参数传递支持按值和按引用两种方式，理解参数传递机制对于避免数据意外修改和实现正确的数据交互至关重要。子程序与过程定义子程序是独立的.PRG文件，用DOfilename调用；过程用PROCEDURE...ENDPROC定义，可内置于程序文件中RETURN命令返回调用点，RETURNTOMASTER直接返回最外层主程序，RETURN表达式可将计算结果传回调用方SETPROCEDURETO打开过程文件，使其中定义的过程可被当前程序调用，用CLOSEPROCEDURE关闭参数传递机制DOprocWITH参数列表采用按引用传递（默认），子程序内修改参数值会直接反映到调用方的原变量函数调用proc()默认按值传递，传递的是数据副本，子程序内修改不影响原变量，SETUDFPARMS可切换PARAMETERS在子程序首行接收参数，LPARAMETERS声明局部参数（仅当前过程可见），推荐用于避免变量污染Debugging程序调试方法与常见错误分析VFP程序错误分为语法错误、运行时错误和逻辑错误三类，各有不同的排查策略。善用DEBUG调试器的断点