1、可以用kill
Dim ps As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("foxtable")
For Each p As System.Diagnostics.Process In ps
If p.MainWindowTitle = Nothing OrElse p.MainWindowTitle = basemainform.Text Then
p.kill
Exit For
End If
Next
2、关闭代码
Syscmd.Project.Exit() |
正常退出Foxtable |
Syscmd.Project.Exit(True) |
先保存数据,然后退出Foxtable |
Syscmd.Project.Exit(False) |
不保存数据,强行退出Foxtable |