vf数据库第11章程序设计基础

《vf数据库第11章程序设计基础》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第十一章结构化程序设计11.1VFP的工作方式Vfp系统提供了三种工作方式，即命令方式、菜单方式和程序文件方式。1、命令方式特点：输入一条操作命令，系统完成一个数据库的操作。2、菜单方式：通过菜单选择相应的操作。3、程序方式：所谓程序执行方式，就是将实现某一功能的VFP命令序列，在编辑器中编成特定的程序文件，存放在磁盘中，其文件扩展名为Prg。当我们需要实现这一功能时，就执行该程序。特点：通过程序文件中的命令，完成对数据库的操作和系统环境的设置。4、程序文件的建立、执行和编译1．命令方式ModifyCommand<程序文件名>2．菜

2、单方式◆单击系统菜单“文件”、“新建”，弹出“新建”窗口。◆在“新建”窗口中，选择“程序”、“新建文件”，进入“程序文件编辑”窗口。◆在“程序文件编辑”窗口中，逐条输入命令行。◆结束后，单击系统菜单“文件”、“保存”，在窗口的“保存文档为：”对话框中，输入程序文件名，默认的文件类型为*.Prg，单击“保存”按钮，建立程序文件的操作结束。5、程序文件的执行程序文件保存在磁盘上，在需要运行时可从磁盘调入内存执行。注意：程序运行后，会自动产生一个文件类型为.Fxp的同名的编译程序。1．命令方式Do〈程序文件名〉2．菜单方式单击系统菜单的“

3、程序”、“运行”，在弹出的“运行”窗口中，选择路径、双击需要运行的程序名。11.2程序的基本结构在VFP中，常见的程序基本控制结构有：1、顺序结构：顺序结构是最基本、最普通的结构形式。运行时，也是按照命令书写时的先后次序来执行，在程序执行的过程中不改变命令执行次序的一种结构。2、分支结构：编写顺序结构程序虽然简单，但在实际应用中，经常需要对事物做出一定的判断，并依据判断的结果采取不同的处理行为。例如：求圆的面积，对半径要做处判断，是否大于0，如果是才能参加运算，否则不能运算，输出参数错误信息。分支结构有三种基本格式：单分支选择、二分

4、支选择（选择函数）和多分支选择。3、循环结构：重复循环操作，特别是若根据条件来决定是否重复执行某段程序，那么顺序结构和分支结构显然是无能为力。Vfp提供的循环结构程序设计就可以解决这一问题。事实上70%以上的实际问题的处理过程都需要使用循环结构。循环结构是当条件满足时，反复执行循环体内的命令系列，一直到条件为假时，才退出循环，执行循环体外的系列命令。4、过程结构：在程序的许多位置反复执行某些程序段，且常将这些程序段和嵌入它的程序分开，形成独立的程序序列，待使用时再调入程序中，以实现不同位置上的重复操作。1．输入语句输入语句提供了在程

5、序运行的过程中暂停程序的执行，等待用户从键盘上输入数据，当用户以回车键结束输入时，系统将表达式的值存入指定的内存变量，程序继续运行。输入语句有非格式化输入命令和格式化输入命令两种。（1）非格式化输入命令非格式化输入命令共有三条：Input、Accept和Wait。Input[<提示信息>]To〈内存变量〉Accept[<提示信息>]To〈内存变量〉Wait[<提示信息>]To〈内存变量11.3顺序结构语句参数说明：◆Input命令能接受除备注型、通用型以外的数据类型，但数据为字符型、日期型或逻辑型时应使用相应的定界符。◆Accept

6、命令只接受字符型数据。输入字符串时，不需要用定界符。◆Wait[<提示信息>][To〈内存变量〉]命令只接受单个字符。如果执行不带任何参数的Wait命令会弹出“按任意键继续……”的提示。例：在学生档案表中，按姓名直接定位查询学生记录。Use学生档案表Accept”请输入查询学生的姓名：”ToA1LocateFor姓名=A1Display例：在学生档案表中，按年龄顺序定位查询学生记录。Use学生档案表Input“请输入查询学生的年龄：”ToA2LocateFor年龄=A2DisplayContinueDisplay（2）屏幕格式输入语

7、句在指定行、列的位置，从键盘上为变量赋值。这个变量可以是内存变量，也可以是字段变量。如果是内存变量，必须事先定义好。如果是字段变量，必须事先打开相应的数据表。@<行,列>[Say<表达式>]Get<变量>参数说明：◆[Say<表达式>]：是作为被编辑的变量前面出现的提示，一般都是用字符串表示。◆Get<变量>：变量可以是内存变量，也可以是字段变量。如果是内存变量必须在使用前先定义。如果是字段变量，则要先打开相应的数据表。数据类型可以是数值型、字符型、日期型、逻辑型或备注型。◆@……Get<变量>命令，必须用Read语句来激活才能完成

8、对数据的编辑。多个@……Get命令，可以用一个READ语句来激活。例：用屏幕格式输入语句输入数值，计算公式C=2A+3B的值。A=0B=0@10,20Say“请输入数值：”GetA@11,20Say“请输入数值：”GetBRead?”