第2章VFP程序设计基础

1、第二章编程基础，4.1程序文件的建立和执行4.2结构化编程4.3简单输入，输出命令4.4进程和进程调用，4.1简单输入，输出命令，(1)input命令格式：input“提示”到功能：接收任何类型的数据并输入数据时需要输入分隔符。以回车结束输入。(2)accept命令格式：accept 提示信息到功能：只能接收基于文字的数据，输入数据时无需输入分隔符。以回车结束输入。(3)wait命令格式：waitto功能：接收单个字符。输入一个字符后，命令将自动终止。4.2创建和运行程序文件，(1)创建程序文件格式：modify command (2)修改程序文件格式：modify command (3)可执

2、行程序文件格式：do程序文件的扩展名为.PRG，1 .使用Modify Command命令设置的文件的默认扩展名为：A)prg B)app C)cmd D)exe 2 .在VFP中，创建或修改程序文件的命令包括：a)modify b)modify command c)modify procedure d)以上b和c。您将要运行temp.prg程序。需要执行的命令有：a)do PRG temp . PRG b)do temp . PRG c)do cmd temp . PRG d)do form temp . PRG，2.2结构编程，1 .结构(1)条件语句if.else.endif (2)分支

3、语句do case.end case 2 .回路结构(1) do while.enddo (2) for.next | end for (3) scan.endscan，1 .结构选择，(1)条件语句if.else.endif，1 .如果存在以下程序，请选择屏幕上最后显示的结果：set exact on s= ni space(2)if s= ni if s= ni ？One ELSE？2 two ENDIF ELSE IF s=ni ？Three ELSE？four endif return a . oneb . two c . three . four，例如，编写验证用户密码的用户登录程序

4、，假定用户密码为1234，如果密码正确，则显示当前日期时间，否则显示“密码错误”。输入CLEAR ACCEPT 密码： TO password IF password=1234 ？当前时间：，date () time () else？“密码无效！”ENDIF，(2)分支语句do CASE.end case，features:依次检查case后面的条件是否成立。如果满足CASE后面的条件，则执行后面的命令序列，DO CASE语句结束，ENDCASE后面的命令继续。docase case条件表达式1、命令序列1、case条件表达式2、命令序列2、条件表达式N、573434case命令序列N、573

5、434case命令序列N相对于otherwise命令序列N 1end case；输入 x的值 to x do case x=3？X 1 otherwise？具有以下命令序列的5*x-3 endcase可以根据输入的考试分数显示相应的成绩等级。编写程序以在基于DO CASE的分支结构中实现该命令程序的功能。set talk off clear input 输入考试分数： to chj DJ=IIF (chj=90，优秀，通过)？-嗯？“成绩等级”DJ set talk on，(1) do while.ENDDO，2 .循环结构，DO WHILE EXIT LOOP ENDDO， EXIT:直接跳

6、出循环，执行ENDDO后面的语句。 LOOP:结束此循环，返回循环开始语句，再次判断循环条件。“exit”和“LOOP”命令可以放置在循环中的任何位置，这两个语句只能在循环体中使用，不能单独使用，并且经常与条件判断语句组合。 DO WHILE和ENDDO必须成对使用。例如，考试编写程序，查找值。，store 0 to sum store sum 1 to sum store sum 2 to sum.store sum 100 to sum，clear sum=0 I=1 do while I=100 sum=sum I=I 1 enddo？Sum RETURN，4 .以下过程中显示的结果s=

7、1 I=0 do while i0 y=x y * 10 x=int(x/10)enddo a)3456 b)7654 c)7654d)76543，2。运行以下程序段后，内存变量y的值为clear x=12345y=0 do while x0 y=y x=int(x/10)enddo？Y a.54321b.12345c.51d.15，3 .运行以下程序段后，内存变量y的值为：x=76543y=0 do while x0 y=x y * 10 x=int(x/10)enddo a)3456 b)3456 c)7654d)76543，5。执行以下过程：显示的结果是one= work two= a=

8、len(one)I=a do while I=1 two=two subsr(one，I，1) I=Two，(2) FOR.end for | next，格式：for=TO STEP ENDFOR|NEXT，例如FOR循环语句，计算值。set talk off clear sum=0 for I=1 to 100 sum=sum I end for？“sum=”，“sum set talk on return”，“事故：1”。编程计算，100内的偶和，即2 4 6 8.100的值。2.编程计算，100内奇数的和，即1 3 5.100的值。1 .运行以下过程段时，屏幕上显示的结果为dime a(

9、6)a(1)=1 a(2)=1 for I=3 to 6 a(I)=a(I-1)a(I-2)nextA (6) a) 5 b) 6 c) 7 d) 8，(3) scan.endscan，scan for条件表达式command groupLOOPEXITends can，记录指针自动在当前表的指定范围内依次移动到满足条件的记录上，从而对每个记录执行循环内命令。rest:从当前记录开始，位于表末尾的所有记录。Next:从当前记录开始的连续n个记录。记录记录记录号为n的记录。All:默认值，所有历史记录。1 .Visual FoxPro中的scan.要跳出ENDSCAN循环并执行endscan之后

10、的语句，请使用()。A)LOOP语句B)EXIT语句C)BREAK语句D)RETURN语句2。在Visual FoxPro中使用8语句扫描.可以在ENDSCAN循环中执行ENDSCAN后面的语句。3 .在命令窗口中输入并执行“LIST name”命令，然后将其显示在主窗口中。下一程序段的输出结果为()。GO 2 SCAN NEXT 4 FOR LEFT(名称，2)= electrical IF RIGHT(名称，2)= line LOOP ENDIF？-嗯？名字ENDSCAN，A)电话线b)冰箱c)冰箱电线d)电视机电冰，记录名称1 TV 2计算机3电话线4冰箱5电线4。在命令窗口中输入“LI

11、ST name”命令，运行后显示在主窗口中：以下程序段的输出结果：记录号名称1 TV 2计算机3电话线4冰箱5导线，GO 2 SCAN NEXT 4 FOR LEFT(名称，2)=“electrical”IF RIGHT(名称，2)(a)电话线b)冰箱c)冰箱电线d)电视电动机械冰，3 .以下程序计算一个整数的数字之和。必须填写在下划线中的语句set talk off input x= to x s=0 do while x！=0 s=s MOD(x，10) ENDDO？s set talk on a)x=int(x/10)b)x=int(x)c)x=x-int(x/10)d)x=x-如果Re

12、turn命令没有表达式，则逻辑true.t .接收参数命令格式。PARAMETERS从其他模块调用的模块称为子程序。没有被其他模块调用而调用其他模块的模块称为主模块。VFP模块可以是命令文件或进程。1: DO | WITH指令：实际参数是按引用传递参数的变量。(2)模块调用，格式23360 |()说明：默认值是按值传递参数。变更参数传递方式的指令：SET UDFPARMS TO VALUE|REFERENCE，提示：实际参数(以括号括住)会根据值传递。过程调用必须打开文件。，运行以下程序段后，内存变量a和b的值为clear a=10b=20 set UDF parms to reference

13、 do sq with(a)，b？a，b procedure sq parameters x1，y1x1=x1 * y1=2 * x1endproc，a) 10200b) 100200c) 10020d) 10 20，x，y procedure plus parameters a1，a2 a1=a1 a2=a1 a2 end proc a . 8 13b . 3 13c . 3 5d . 8 5，以下过程段的运行结果为x1=20 x2=30 set UDF parms toX1，x2 procedure test parameters a，b x=a=b b=x end pro，a) 3020b) 3020c) 20d) 20 30，变量的范围表示变量的有效范围。VFP变量分为公共变量(全局变量)、个人变量、局部变量等。公共变量(public):适用于所有模块。公共变量在创建后有效，并且仅在发出clear memory、release、quit等命令后发布。Private:可用于设置此变量的模块和子模块。设置的模块程序运行完毕后，将自动清