以下是引用vfp60菜鸟在2017-2-27 08:27:25的发言:
菜单过程里添加如下
IF _SCREEN.FORMCOUNT>0
MESSAGEBOX('请先退出当前表单界面!',64,'提示')
ELSE
WAIT WINDOW('正在搜集資料,请稍候 . . . ') NOCLEA NOWAIT
DO FORM gysqhx.scx
WAIT CLEA
ENDIF
菜单过程里添加如下
IF _SCREEN.FORMCOUNT>0
MESSAGEBOX('请先退出当前表单界面!',64,'提示')
ELSE
WAIT WINDOW('正在搜集資料,请稍候 . . . ') NOCLEA NOWAIT
DO FORM gysqhx.scx
WAIT CLEA
ENDIF
都说了,用模式表单,就可以了。。。