《二级VF程序设计典型例题.》.doc

计算机二级VF程序设计典型例题(六) 基础培训频道??更新:2008-6-20 ??编辑:站长??阅读: RETURN T 分析：FUNCTION?是一个子函数，语句PARAMETERS是定义子函数里面的变量。 [例30]??如果说用DO命令来执行查询文件、菜单文件、那么文件名中必须名含——————。 分析：VISUAL?FOXPRO?程序文件通过编辑、连接，可以产生不同的目标代码文件，这些文件具有不同的文件名。 当用DO?命令执行程序文件时，如果没有指定扩展名，系统将按下列顺序寻找程序文件的源代码或某种目标代码文件 执行：.EXE-.APP-.FXP-.PRG;但是用DO命令来执行查询文件、菜单文件时，那么文件名中必须包括扩展名。 答案：扩展名（.QBR或.MPR） [例31]打开银行客户关系表，输入一个控制口令控制程序的执行，若口令为1，则把 “银行代码”为“001”的所有记录加上删除标记；若口令为2，把“银行代码”为“002”的所有记录? 加上删除标记；若口令为3，把“银行代码”为“003”的所有记录加上删除标记。请将程序填写完 整。 ???程序： ??????CLEAR ??????USE银行客户关系表EXCLUSIVE ??????BROWSE?LAST ??????WATT“请输入你的选择：（1-3）”TO?yhdm ??????DO?CASE ?????????CASE??(1) ??????????DELETE?ALL?FOR?银行代码=“001” ??????????BROWSE?ALL?FOR银行代码=“001” ??????????RECALL ?????????CASE??（2） ???????????DELETE?ALL?FOR?银行代码=“002” ???????????BROWSE?ALL?FOR?银行代码=“002” ???????????RECALL ??????????CASE??（3） ????????????DELETE?ALL?FOR?银行代码=“003” ????????????BROWSE?ALL?FOR?银行代码=“003” ????????????RECALL ????ENDCASE ????BROWSE? ????USE ??分析：该程序执行时，依次判断语句中列出的条件，当碰到取值为真时就执行该条件下的语句序列。 ??答案：（1）yhdm=“1”，（2）yhdm=“2”，（3）yhdm=“3” ????例32??按银行帐号显示存款记录，如果该帐号不存在，则会显示空记录，请将该程序 填写完整。 ??????程序： ??????CLEAR? ??????USE?KH ??????帐号=SPASE（5） ??????@10.4??SAY?请出入要查循学生的学号：”?CET帐号 ??????READ ??????---------------- 基础培训频道??更新:2008-4-25 ??编辑:站长??阅读: ??RETURN ?????计算圆面积的函数： ????????FUNCTION??AREA ????????PARAMETERS?A ????????S=3.1415926*A*A ????????RETURN ???分析：该语句是实现对计算圆面积函数的调用，返回值赋给变量SM。这个程序所使用的是一个自定义函数，自定义函数和 子程序的区别就是自定义函数必须返回一个函数值，而子程序没有这个限制。自定义函数的编辑方法和子程序的编辑方法相同，只是要把子程序文件名改为自定义函数名。 ???需要注意的几点是：自定义函数能以独立的文件存储，也可包含在调用程序中作为它的一部分。如果[FUNCTION函数名]缺省，这表示该函数是一个独立的文件。另外，自定义函数不能与系统函数同名，也不能与内存变量同名。 ?????答案：SM=AREA(R) ?例26???当变量I在奇偶之间变化时，求出下面程序的输出结果。 ?????程序： ???????CLEAR ???????I=O ???????DO?WHILE?I10 ????????IF?INT(I/2)=I/2 ????????????W ???????ENDIF? ????????T ???????I=I+1 ???????ENDDO ?????分析：该程序应用的是循环和条件嵌套的结构。 ?????答案：W,T,T连续显示5次 [例27]??填空完成下列程序，仅接受输入Y和N的程序，否则程序结束。 ????????DO??WHILE??.T. ??????????WAIT??请输入Y/N????TO