主题：菜单设计问题

 

一段一段注释你项目事件的代码，看哪一句有问题。

 不是每次都弹出？那固定什么操作后弹出吗？你先卸载重装foxtable。

 

 如果还弹出，那就删掉AfterOpenProject、BeforeCloseProject的代码测试。

退出系统的代码你怎样写的？贴出代码

 

试试改成 basemainform.close

 

或者

 

Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("foxtable")
For Each p As System.Diagnostics.Process In ps

    p.kill
Next

退出系统的代码

 

Syscmd.Project.Exit(false)

 

改成 basemainform.close

 

或者 Syscmd.Project.Exit(false)

 

或者 

 

Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("foxtable")
For Each p As System.Diagnostics.Process In ps

    p.kill
Next

在登陆窗口？你通过什么方式关闭系统的？那句代码怎么写的？

 

改成29楼的。

改成 Syscmd.Project.Exit()

 

或者 

 

Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("foxtable")
For Each p As System.Diagnostics.Process In ps

    p.kill
Next