《VF程序设计》PPT课件

《《VF程序设计》PPT课件》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VisualFoxpro6.0程序设计基础程序设计初步（3）要点：1、建立模块化程序设计的观念2、掌握自定义方法的使用3、掌握变量的作用域4、了解过程、自定义函数程序设计的三种基本结构：顺序结构分支结构循环结构一、程序设计为什么要引入模块化模块化设计思想【例1】设计如图所示表单，计算组合数C(m,n)。其中，m和n是正整数，且m>n。“计算”命令按钮的CLICK事件代码如下：M=thisform.text1.valueN=thisform.text2.valuep1=1fori=1tomp1=p1*iendforp2=1fori=1t

2、onp2=p2*iendforp3=1fori=1tom-np3=p3*iendforresult=p1/(p2*p3)Thisform.text3.value=resultreturn数据输入求m!求n!求(m-n)!将求阶乘的问题写成一个共有的代码,代码如下：*自定义方法JCparametersxy=1fori=1toxy=y*iendforReturnY*“计算”命令按钮的CLICK事件：M=THISFORM.TEXT1.VALUEN=THISFORM.TEXT2.VALUES1=THISFORM.JC(M)S2=THISFOR

3、M.JC(N)S3=THISFORM.JC(M-N)THISFORM.TEXT3.VALUE=S1/(S2*S3)二、模块化的基本思想分而治之的策略－－是人们处理复杂问题时的一般策略。它将一个大的任务分解为多个任务，分而治之，协作处理，共同完成。分解优化。不同的人分解的策略是不一样，因此分解也有好有坏。模块化程序就是采用“自顶向下、逐步求精”的方法，从整体到局部，从抽象到具体的分解过程。（1）精简主程序提高可读性，同时便于以后程序的维护。（2）减少重复片段sub1内的命令原本在主程序会出现两次，而改成调用子程序后，便只出现两次“调用s

4、ub1”命令，因此可以减少重复片段，并且以后sub1内的命令若需修改时，只要改一个地方就可以了，而不需要同时修改多处。三、模块化程序设计的主要优点在VisualFoxPro中，子程序的结构可分为下列几种：过程自定义函数自定义方法结构化程序可视化程序自定义方法（1）方法的分类VFP的方法分为两类：内部方法和用户自定义方法。内部方法是VFP预制的子程序，可供用户直接调用或修改后使用，如在前面章节中所使用过的Release、SetFocus等方法。用户自定义方法其实就是用户为某种需要编写的子程序。1、自定义方法的建立和调用（2）方法的命名规

5、则VFP中方法的命名规则如下：由字母、汉字、下划线和数字组成，并且必须以字母、汉字或下划线开头。可以是1~128个字符。不能使用vfp的保留字方法名不要与变量名、数组名相同，取名尽量“见名知意”。（3）方法建立的步骤定义方法编写方法代码。(教材P71)【例3-15】自定义方法addtxt，将文本框中输入的文本添加到编辑框中，并将文本框中的文本设置为蓝颜色，编辑框中的文本设置为红颜色。1）方法定义（1）添加新方法addtxt。打开表单设计器→选择“表单”中的“新建方法程序”命令→打开的“新建方法程序”对话框→在“名称”框中输入方法的名称

6、(如图所示)→单击添加按钮→单击关闭按钮，退出该对话框。注意：只有表单对象可以添加自定义方法。输入方法名输入对该方法的描述，也可以不加（2）编写addtxt方法的代码。双击表单空白处，打开“代码”窗口，在“过程”下拉列表中选择“addtxt”，然后编写代码，如图所示。将文本框中输入的内容添加到编辑框回车键2）编写控件的事件代码（1）“添加”命令按钮的“Click”事件代码如下：thisform.addtxt()（2）“关闭”命令按钮的“Click”事件代码如下：thisform.release表单的自定义方法addtxt表单的内部方法

7、release文本框的内部方法3）运行结果2、参数传递与方法的返回值（1）参数传递如果需要方法能够接收参数，则在方法代码开始部分增加下面的命令行：PARAMETERS<形参表>或LAPRAMETERS<形参表>调用时使用括号将实参括起来：对象名.方法名(<实参表>)说明：见教材P75（2）方法的返回值如果需要一个返回值，则要在方法代码的结束处增加下面的命令行：RETURN[<表达式>]如果缺省<表达式>，vfp将自动返回.T.。当代码执行到RETURN命令时，程序流程立即返回到主程序中。（3）方法的调用形式在主程序中可以使用以下形式调

8、用方法：①在表达式中调用方法，例如，y=2+Thisform.New(x)。②在赋值语句中调用方法，例如，y=Thisform.New(x)。③以等号命令调用方法，例如，=Thisform.New(x)。以该形式调用的方