你想退出项目?你可以用kill
Dim ps As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("foxtable")For Each p As System.Diagnostics.Process In ps p.killNext