初始的属性值:btn1.enable=.t. ,其他都为: .f.
btn1.click() : btn2.enable=.t. refresh
btn2.click() : btn3.enable=.t. refresh
btn3.click() : btn4.enable=.t. refresh
这样就可以按顺序显示表单了。
可设一个公共变量或给表单集增加一个公共属性,默认值为0,通过本变量来实现控制,现假设按钮1,2,3,4分别对应表单1,2,3,4;在按钮中如下代码:
假设控制公共变量为:m.lnCurShowWindow=0
按钮1,Click事件:if m.lnCurShowWindow>0
return .f.
else
m.lnCurShowWindow=1
表单1.show
endif
按钮2,Click事件:if m.lnCurShowWindow!=1
if m.lnCurShowWindow<1
messagebox("请先点击按钮1打开表单1,再点击本按钮打开表单2,谢谢!")
endif
return .f.
else
m.lnCurShowWindow=1
表单1.hide&&隐藏表单1,如果需要的话
表单2.show
endif
按钮3\4依此类推.
按钮可以输入如下命令来运行表单,可以考虑设置按钮的enable属性。来控制是否可以点击
do form 表单名