试试强制关闭
Dim ps As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("Foxtable")
ps(0).kill
-------------------------
Dim ps As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("Foxtable")
For Each p As System.Diagnostics.Process In ps
If p.MainWindowTitle.Contains("你的项目名") Then
p.kill
End If
Next