foxpro常用编程命令

《foxpro常用编程命令》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、FOXPRO常用编程命令假设(if...endif)[日期：2005-09-17]来源：虾盟教程基地作者：未知[字体：大中小]注：在语法中如用方括号“[]”括起来的词句，表示可以不用。假设语句根据一逻辑表达式的值，有条件的执行一组命令。语法：IF逻辑表达式[THEN]程序组1[ELSE程序组2]ENDIF参数：逻辑表达式代表一逻辑值，如果这逻辑值为真，系统执行程序组1，否则不执行程序组1，如果有else及程序组2的话，则执行程序组2，如没有则什么也不执行，直接执行endif后面的语句。备注：在if...endif之间还可以有i

2、f...endif，即该命令是可以嵌套的。then可以有也可以没有，对程序没有影响。else及程序组2可以有也可以没有，但如果有的话，在逻辑表达式的值为假时，程序组2将被执行。if与endif必须配对使用，即有一个if必须有一个endif，否则程序会出错。举例：例1：假如分数字段的值大于等于90，则让等级字段的值为“优”，并显示该记录。程序如下：if分数>=90replace等级with'优'displayendif例2：在数据库中可以把性别字段设为逻辑型，“真”代表“男”，“假”代表“女”，但显示时不能显示真、假，否则别人看

3、不懂，而应显示男、女，因此我们设一变量xb，根据性别字段的具体值，将xb的值设为男或女，然后在需要的时候显示xb的值即可。程序如下：if性别xb='男'elsexb='女'endif其中第一句：if性别，表示“假如性别为真”的意思，不要写成“if性别=.t.”。以上程序也可以写成如下形式，效果相同：if.not.性别xb='女'elsexb='男'endif即，假如性别不为真的话，xb的值就为女，否则为男。循环(dowhile...enddo)[日期：2005-09-17]来源：虾盟教程基地作者：未知[字体：大中小]循环语句(

4、dowhile...enddo)根据条件重复执行一组程序。语法：DOWHILElExpressionCommands[LOOP][EXIT]ENDDO参数：lExpression为一逻辑表达式，其值如果是“真”，即执行commands程序组，如果表达的值为“假”，则跳过该段程序组，执行enddo后面的语句。Commands当表达式lExpression值为真时所要执行的程序组。LOOP此为dowhile...enddo命令的一个子句，它可以放在commands程序组中间的任何地方，当程序一旦执行到该子句时，则返回dowhile

5、重新执行。此子句根据需要可以有，也可以没有。EXIT与loop一样是dowhile...enddo命令的一个子句，它可以放在commands程序组中间的任何地方，当程序一旦执行到该子句时，则跳出循环，执行enddo后面的语句。此子句根据需要可以有，也可以没有。备注：程序一旦执行到dowhile语句，如果lExpression的值为真，则执行commands程序组，该程序组执行完后，就到enddo语句，enddo会将程序返回dowhile再次验证lExpression是否为真，如仍是，则又一次执行commands，如此循环往复，

6、直到lExpression为假，或遇上exit语句。该语句可以嵌套，即循环中还可以有循环。dowhile与enddo必须配对使用，即有一个dowhile必须有一个enddo否则程序会出错。举例：例1：在数据库中不断将记录指针往下移，直到数据库结尾。程序如下：dowhile.not.eof()skipenddo例2：在上面的例子加入此功能，当遇到性别字段为“女”时，跳出循环。程序如下：dowhile.not.eof()if性别='女'exitendifskipenddo例3：不断将记录指针往下移，当遇到数量字段的值大于等于600

7、时退出循环，如遇到值小于400的，将其值乘2，然后再检验一次是否大于600，如是则退出循环。程序如下：dowhile数量<600if数量<400replace数量with数量*2loopendifskipenddo分支(docase...endcase)[日期：2005-09-17]来源：虾盟教程基地作者：未知[字体：大中小]分支语句(docase...endcase)根据不同的条件执行不同的程序组。语法：DOCASECASE逻辑表达式1程序组1[CASE逻辑表达式2程序组2...CASE逻辑表达式n程序组n][OTHERWI

8、SE程序组0]ENDCASE参数：CASE逻辑表达式程序组...当程序执行到docase时，便检验第一个case的逻辑表达式（逻辑表达式1）是否为真，如不为真，接着检验第二个case的逻辑表达式，以此类推直到逻辑表达式n。当检测到第一个为真的逻辑表达式时，便执行跟随在其后面的