有两个表单：表单1、表单2。表单1中有command1、command2。
command1代码如下：
USE qj.dbf
DO FORM 表单2.scx
command2代码如下：
USE xj.dbf
DO FORM 表单2.scx
想要实现功能：点击command1时，首先检测表单2是否运行，如果运行了就提示“请先关闭表单2”，如果没有表单2没有运行，就直接打开表单2。点击command2同理。
测试文件如下

[此贴子已经被作者于2023-1-14 17:29编辑过]

请问command1代码如何更改？

此方法可行。
如果用wexist()函数，怎么编写代码呢？

我测试了一下，这个代码不行。
根据你的思路，我调整为如下代码，可行：
IF VARTYPE(asd)='O'
    MESSAGEBOX('请先关闭“查看”窗口')
ELSE
    PUBLIC asd   &&创建全局变量asd
    USE qj.dbf
    DO FORM 表单2.scx NAME asd linked
ENDIF
原因不知道

表单2的destroy中加上  release asd  可以达到效果，不加也可以达到效果。
原因也不知道


感谢提供新思路。

没有提示，就是点击command1后，闪一下，没有显示表单2。