我是这样做的，
在设计菜单时，有一个 “跳过 ”你发现了吗？
如果 这个 跳过 为.t.时，菜单选项为灰色，既不可用。
你在设计菜单时，在跳过里输入一个变量名如：skipmark 
这个变量在主程序里用 publ skipmark 定义一下，初始值为.f.
在菜单 的跳过 里输入 skipmark 
在每个表单的init 里输入skipmark = .t. 表单的unload 里输入 skipmark = .f.
这样，你打开表单，主菜单为灰色，当然打不开其它 的表单了，

不知道我说清楚没有

谢谢兄弟的答复，你哪个办法应该是可行的！
我昨天通过查阅书籍，找到了一个更简单的办法：
哪就是把要调用的表单属性　windowstype　设为　1－模式　就行了。