计算机二级VF程序讲义.doc

VF程序第一节、 程序1、 程序的建立、保存、运行(1) 建立方法一(菜单)：文件新建方法二(命令)：modify command 程序文件名(2) 保存(扩展名.prg)(3) 运行方法一：常用工具栏方法二(命令)：do 程序文件名.prg(此命令中扩展名.prg写不写均可以)2、 赋值语句格式1：变量名=表达式格式2：store 表达式 to 变量名列表区别：格式1一次只能把一个值赋给一个变量；格式2一次可以把一个值同时赋给多个变量，使多个变量同时拥有同一个值3、 数据输入语句(1) accept 字符表达式 to 变量名注释： 字符表达式仅作为提示信息，别无它用 从键盘上输入一个数据，并存入指定的变量中；从键盘上输入的内容一律作为字符串来处理，输入时不需用加字符串定界符(2) input 字符表达式 to 变量名注释： 字符表达式仅作为提示信息，别无它用 从键盘上输入一个值，并存入指定的变量中；此命令可以输入任何类型的数据，输入时必需按每一种数据类型的正确表示形式来输入(3) wait 字符表达式 to 变量名 windows at 行，列 timeout 数值注释： 字符表达式仍然为字符提示信息，缺省时默认为“按任意键继续” to 变量名：从键盘上输入一个字符，并存入指定的变量中；否则将不保留输入的这个字符 windows at 行，列：把字符提示信息以窗口的形式来显示；at用来指定当前窗口显示的具体位置 timeout 数值：指定窗口显示的时间；否则，将永久显示，当按任意一个键的时候将取消显示；timeout短语中的数值将为秒 此命令的功能主要用来显示提示信息4、 程序的基本结构(1) 顺序结构(2) 选择结构第一种：IF 条件表达式 语句序列ENDIF注释：IF是整个选择结构的开始，ENDIF是整个选择结构的结束；如果条件成立，执行其中包含的语句序列，否则将不执行第二种：IF 条件表达式 语句序列1ELSE 语句序列2ENDIF注释：IF 是整个选择结构的开始，ENDIF是整个选择结构的结束；如果条件成立，执行其中包含的语句序列1，否则将执行其中的语句序列2第三种：IF的嵌套形式IF 条件表达式1 语句序列1ELSEIF 条件表达式2语句序列2ELSEIF 条件表达式3语句序列3ELSE ENDIFENDIFENDIF注释：如果条件1成立，执行语句序列1；如果条件1不成立，判断条件2，如果条件2成立，执行语句序列2；如果条件2不成立，判断条件3，如果条件3成立，执行语句序列3，以此类推；ELSE的配对关系，离它最近的IF；ENDIF的配对关系，离它最近的IF第四种：多分支选择结构DO CASE CASE 条件表达式1 语句序列1 CASE 条件表达式2 语句序列2 CASE 条件表达式3 语句序列3 OTHERWISE 语句序列ENDCASE注释：DO CASE 是整个多分去选择结构的开始，ENDCASE是整个多分支选择结构的结束；其中那个条件成立，就执行其中包含的语句序列，只会执行其中的一种情况；当所有条件都不成立时，就执行OTHERWISE短语中包含的语句(3) 循环结构第一种：DO WHILE 条件表达式 语句序列1 LOOP 语句序列2 EXIT 语句序列3ENDDO注释： DO WHILE是整个循环的开始，ENDDO是整个循环的结束 先判断条件，如果条件成立，就执行DO WHILE和ENDDO之间包含的语句序列；重复判断条件，直到条件不成立，才结束整个循环；执行ENDDO以下的语句 LOOP：遇到LOOP语句，就返回到循环开始，重新进行下一个新的条件的判断 EXIT：遇到EXIT语句，就直接结束循环，执行ENDDO以下的语句第二种：FOR 循环变量=初始值 to 终止值 STEP 步长值 循环体(语句序列)ENDFOR注释： FOR是整个循环的开始，ENDFOR是整个循环的结束 初始值、终止值、步长值均为数值型数据 缺省STEP时，默认的步长值为1第三种：SCAN 范围 FOR 条件 循环体ENDSCAN注释： SCAN是整个循环的开始，ENDSCAN是整个循环的结束 范围 和FOR 条件的使用同前 该循环只适合于对表进行操作 记录指针自动在指定范围内满足条件的记录上进行移动判断(从表的第一条直到最后一条)补充：LOOP和EXIT语句在三种循环均可以使用，判断过程跟DO WHILE循环中一样第二节：过程调用1、 PRODUCT/FUNCTION RETURN ENDPROC/ENDFUNCPRODUCT/FUNCTION 表示过程的开始ENDPROC/ENDFUNC表示过程的结束RETURN 返回指定表达式的值，如果RETURN 后面没有表达式默认返回.T.2、 参数传递(1) 接收参数的命令：PARAMETERS (变量名之间逗号隔开)(2) 调用模块程序过程的格式为： 格式1：do with (逗号隔开) 格式2：(实参列表)注释：实参可以是常量、变量、表达式，在模块调用过程中，系统自动把实参传递给形参，形参接收了实参，形参的个数不能少于实参的个数，多余的形参自动赋逻辑假值便用格式1调用模块，如果实参是变量，按引用进行传递，常量和表达式按值进行传递使用格式2调用模块，不管实参是常量、表达式、还是变量，默认都是按地址进行传递，还可以使用： set upfparms to value/refercences 进行设置to value 按值传递to references 按地址传递按值传递：形参变量值改变时不会影响实参变量的取值按引用传递：形参变量值改变量，实参变量的值也随之改变例1：x1=100 x2=100 do p1 with x1,x2 ?x1,x2procedure p1parameters a,ba=a+1b=b+1endproc例2：x1=100 x2=100 do p1 with x1+1,x2+1 ?x1,x2procedure p1 parameters a,bx1=x1+10x2=x1+x2endproc例3：x1=100x2=100p2(x1,x2)?x1,x2procedure p2parameters a,bx1=x1+1x2=x2+1endproc例4：x1=100 x2=100set upfdarms to valuep2(x1,x2)?x1,x2procedure p2parameters a,bx1=x1+1x2=x2+1endproc3、 变量作用域：(1) 公共变量：public 功能：建立公共的内存变量，并为它们赋初值逻辑值.F.，公共变量的作用范围：一量建立就一直有效和存在，即使程序运行结束也不会消失，只有当执行clear memory 、release、quit 等命令后，公共变量才被释放。在命令窗口中直接使用的变量也是公共变量(2) 私有变量