高校问答远古巫灵最新皮肤:vf if语句
来源：百度文库 编辑：高校问答 时间：2024/04/28 04:06:35
set talk off
clea
clea all
use 职工
@2,2 say "1.新建表格"
@3,2 say "2.修改表"
@4,2 say"3.添加记录"
@5,2 say"4.显示"
@6,2 say"5.打印"
@7,2 say"6.修改密码"
@8,2 say"7.退出"
input "请输入相应数字:" to x
if x=1
create 新建1.dbf
else
if x=2
browse
else
if x=3
append blank
else
if x=4
list
else
if x=5
print
else
if x=6
quit
endif
endif
endif
endif
endif
use
set talk on
不知道哪里出错了.望高手指点啊.
我用CASE做过的.
象楼上那样做过.
但朋友请你试下.
那样VF会出现对话框说缺少语句..
clea
clea all
use 职工
@2,2 say "1.新建表格"
@3,2 say "2.修改表"
@4,2 say"3.添加记录"
@5,2 say"4.显示"
@6,2 say"5.打印"
@7,2 say"6.修改密码"
@8,2 say"7.退出"
input "请输入相应数字:" to x
if x=1
create 新建1.dbf
else
if x=2
browse
else
if x=3
append blank
else
if x=4
list
else
if x=5
else
if x=6
quit
endif
endif
endif
endif
endif
use
set talk on
不知道哪里出错了.望高手指点啊.
我用CASE做过的.
象楼上那样做过.
但朋友请你试下.
那样VF会出现对话框说缺少语句..
vf if语句就是往下执行，只有循环(如enddo)才会返回上面重新执行。
具体参考下图：
endif少了一个
哪有像你这样if不断的往里套的？
就是用if，也不用每个都else，这样不行吗？：
if x=1...endif
if x=2...endif
推荐case，把这个修改以后的复制过去：
set talk off
clea
clea all
use 职工
@2,2 say"1.新建表格"
@3,2 say"2.修改表"
@4,2 say"3.添加记录"
@5,2 say"4.显示"
@6,2 say"5.打印"
@7,2 say"6.修改密码"
@8,2 say"7.退出"
input "请输入相应数字:" to x
do case
case x=1
create 新建1.dbf
case x=2
browse
case x=3
append blank
case x=4
list
case x=5
print
case x=6
quit
endcase
use
set talk on
IF与ENDIF数目不对应，6个IF，只有5个ENDIF
用CASE ENDCASE比较好。