第07章vfp程序设计基础.ppt

1、第7章VFP编程基础，第2章，当今世界两大电脑编程的方法面向流程的结构化编程，面向对象程序设计牙齿章节了解VFP的重点和难点，了解结构，灵活操作，创建、修改和执行3、目录、7.1应用节目7.2 VFP基本语法结构7.3数组7.4过程和自定义函数7.5变量的范围7.6集成应用程序VFP系统菜单创建档案|新建|节目|创建新档案注意创建的文件不在项目中2，项目管理器创建代码|节目|新建注释创建档案项目3，命令窗口直接输入方法Modify command节目名称主创建的文件在默认位置具有程序扩展名： PRG，5，7.1.2修改节目(4茄子方法)1，VFP系统菜单档案|打开|节目选择2，项目管理器代码|

2、节目选择|节目修改|节目修改3，命令窗口输入修改命令程序名称注意程序位于默认位置4， 项目管理器代码|选择节目|运行节目注意牙齿程序在项目内3，在命令窗口中输入DO档案名称如果未指定主档案位置，那么如果程序不在默认位置，则需要添加路径。 示例：Do d:项目p2.prg，7，7.2 VFP基本语法结构，在编程语言中，节目控制是编程语言的整数，在结构化编程中，程序通常由三茄子结构组成。即顺序结构条件分支结构循环结构，8，7.-嗯？数据1，数据2，from jxsjk！Xs，jxsjk！Kc，jxsjk！CJ；where xs . xh=CJ . xh and KC . kcdh=CJ . kcd

3、h；Order by Xs.xh如果先执行into array s list memory like s SET UDF parms TO VALUE，则设置为传递到值。使用强制地址传递函数调用时，将变量设置为在括号中传递给值。通过在实际参数变量前加上符号，可以将其设置为传递到参考。73，clear p=2？P=，P udf(p)？P=，p proc UDF parameters q=q * 10？Q=，q endproc，结果：p=2 q=20 p=20，节目，74，函数的返回值一次只能通过RETURN命令返回一个数据。命令格式：RETURN表达式|TO MASTER |TO过程名功能：RE

4、TURN表达式向调用方返回值。RETURN TO MASTER直接返回主程序。返回RETURN TO过程名为的过程。省略RETURN。默认返回值为true (.T .)，75，子节目调用进程，主节目，子节目f1，子节目F2，调用f1，调用F2，一个应用节目软件由一个主程序组成。由多个子程序组成的主程序可以调用子程序。可以调用子程序，也可以调用子程序。VFP允许嵌套DO调用级别为128层，变量78，7.5的范围，应用程序。在节目模块中，根据变量和数组的范围，可以将变量和数组分为三个茄子类别：全局、局部和原因。类型范围全局变量和数组所有节目模块本地变量和数组仅限于生成模块中的专用变量和数组。仅限于

5、宣言模块和子模块。79，变量宣言全局PUBLIC本地本地专用PRIVATE(例如： PUBLIC a，b主1，程序未使用上述命令指定的变量的默认值为专用变量)。2、在命令窗口中创建的变量或数组自动具有全局属性。80，clear public a，c a=篮球b=足球c=排球f()？a？b，function f local b a=网球b=a c？输入B endfun、网球排球网球足球、结果(如81，7.6综合应用节目)，例如7-21数字(06)，以中文和英文显示星期几。Clear Input输入数字(06): to n do case case n=1 m=星期一(Monday) case n

6、=2 m=星期二(Tuesday) case n=3 m=星期三ccase nEndcase？数字ltrim(str(n)有：米，82，例7-23 30人在餐厅吃饭，其中有男人、女人和孩子。每个男人3先令，每个女人2先令，每个孩子1先令，总共50先令，每个男人、女人和孩子多少人？clear for x=1 to 16 for y=1 to 24 z=30-x-y if 3 * x 2 * y z=50？x，y，z endif endfor endfor end，假设一个男人有x个女人有y个孩子，有z个，则x y z=30 3x 2y z=50，83，示例7-24假设一个班有50个同学，则随机挑

7、选10个同学组成“电脑兴趣小组”Studenti Endfor return，生成随机数，去除相同数量，84，示例7-25，杨辉三角形的前8行打印，clear dime a (8，8) for I=1 to 8 J)Substr(str(a(i，j)，6) endfor？Endfor，85，*示例7-27，正方形的两个对角元素和clear public a3，3？矩阵：For I=1 to3 for j=1 to3 ai，j=int (rand () * 50)？-嗯？Str(ai，j，5)端点？End for，S1=0 for I=1 to3 S1=S1 ai，I end for S2=0

8、for I=1 to3 S2=S2 ai，4-I end for？主对角元素的总和=，str(s1，5)？第二对角元素的总和=、str (s2，5)、86、范例3360设计八进位小数转换器，input to n c=alltrim (str (n) x=0执行以下过程后，显示的结果为_ _ _ _ _ _ _ _ _。CSRQ talk off a . 2018.00 b . 18.00 c . 20.00d .错误信息，88，2002年(秋季)VFP第二次考试笔试7。已知的学生表(XS .DBF)如果将第一条系统日期设置为2002年十月12日，则在发出以下命令后，m、n和MN的值将分别为_

9、_ _ _ _ _ _use xs M=all trim(XM)space(len(XB)all trim(Xi Ming)N=year(date()-year(csrrs(n)function sparameters x y=1p=0 for I=1 to x y=y * I p=p y end for return p end func，答案：33 1 1 1 * 2 1 *已知学生表(XSB)。DBF)的数据包括：记录编号学号出生日期诫命代码1 000104王凯南09/02/82 02 2 000101李秉南04/09/83 02 3 000103油画女10/06 82 02 5 000

10、106何文女09/08/82 02 6 000105章USE XSB SET ORDER TO XSXH GO TOP SKIP？RECNO() GO BOTTOM？RECNO()，回答：4，5，已构建XSXH索引标记。基于学号字段创建的升序索引。91，21。运行以下程序后，您将看到以下结果：C=江苏省高级中学电脑等级测试图1？左侧(x，6) SUBSTR(C，15) right (t，3) procedure sub1 public x，t x=c t=数据库VFP RETURN endproc 15)下一节目段的功能是根据数字变量x的值范围为变量y指定不同的值。节目段中的多个命令可以简化为名为y=IIF (x0，1，_ _ _ _ _ _ _ _ _ _ _ _ _ _ _)的单个命令。if x0 y=1 else if x=0y=0 else y=-1 endif endif，回答：IIF (x=0，0，-1)，93，(02秋季错误vfp01水仙数为153默认算法是在字符串中依次选择一个字符。例如，如果ASC代码值大于127，则为汉字内部代码的一个字节。CString=Microsoft (Microsoft)的(Windows)操作系统n count=0 do while len(CS