关于vb.net关闭exe的信息

vb.net 怎么结束进程

好像不难吧vb.net关闭exe？

vb.net关闭exe我放进了Button1的Click事件里。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

On Error GoTo Errmessages '在做系统操作时加排错标签是个好习惯

Dim TargetName As String = "ibmdict" '存储进程名为文本型，注：进程名不加扩展名

Dim TargetKill() As Process = Process.GetProcessesByName(TargetName) '从进程名获取进程

Dim TargetPath As String '存储进程路径为文本型

If TargetKill.Length 1 Then '判断进程名的数量，如果同名进程数量在2个以上，用For循环关闭进程。

For i = 0 To TargetKill.Length - 1

TargetPath = TargetKill(i).MainModule.FileName

TargetKill(i).Kill()

Next

ElseIf TargetKill.Length = 0 Then '判断进程名的数量，没有发现进程直接弹窗。不需要的，可直接删掉该If子句

MsgBox("没有发现进程！")

Exit Sub

ElseIf TargetKill.Length = 1 Then '判断进程名的数量，如果只有一个，就不用For循环

TargetKill(0).Kill()

End If

MsgBox("已终止" TargetKill.Length "个进程") '弹窗提示已终止多少个进程

Errmessages: ‘定义排错标签

If Err.Description Nothing Then ’判断有无错误，如果有，则 ↓

MsgBox(Err.Description) '当出现错误时，弹窗提示

End If

End Sub

可根据需要自行修改，这个备注够完善了吧？不会的再Hivb.net关闭exe我。

相关问答

Q1: 怎样才能用VB.NET的代码来关闭一个在运行的程序

软糖来回答罗：通过System.Diagnostics命名空间下的Process类来关闭程序的进程

        Dim 进程集合 = Process.GetProcessesByName("进程名称")

        For Each 进程 In 进程集合

            进程.Kill()

            '进程.Close() '或者使用关闭

        Next

也可以先获取所有进程，再来判断这些进程的名称ProcessName

 Dim 获取本地所有进程 = Process.GetProcesses()

        For Each 进程 In 获取本地所有进程

            If 进程.ProcessName = "explorer.exe" Then 进程.Kill()

        Next

Q2: vb.net2010关闭excel问题

使用 ADO 连接到 Excel

ADO 使用 MDAC 中以下两个 OLE DB 提供程序中的任何一个都可以连接到 Excel 数据文件。

Microsoft Jet OLE DB Provider — 或 —Microsoft OLE DB Provider for ODBC Drivers

使用 Microsoft Jet OLE DB Provider

Jet 提供程序只需要两条信息就可以连接到 Excel 数据源：路径（包括文件名），和 Excel 文件版本。

Jet 提供程序使用连接字符串

Dim cn as ADODB.Connection

Set cn = New ADODB.Connection

With cn

.Provider = "Microsoft.Jet.OLEDB.4.0"

.ConnectionString = "Data Source=C:\MyFolder\MyWorkbook.xls;" _

"Extended Properties=Excel 8.0;"

.Open

End With

提供程序版本：必须使用 Jet 4.0 提供程序；Jet 3.51 提供程序不支持 Jet ISAM 驱动程序。如果指定了 Jet 3.51 提供程序，在运行时会出现以下错误信息：

Couldn't find installable ISAM.

Excel 版本：对于 Excel 95 工作簿（Excel 版本 7.0），应指定 Excel 5.0；对于 Excel 97、Excel 2000 或 Excel 2002 (XP) 工作簿（Excel 版本 8.0、9.0 和 10.0），应指定 Excel 8.0 版本。

使用“数据链接属性”对话框的 Jet 提供程序

如果在应用程序中使用“ADO 数据控件”或“数据环境”，就会出现数据链接属性对话框来收集必要的连接设置。

在提供程序选项卡上，选择 Jet 4.0 提供程序；Jet 3.51 提供程序不支持 Jet ISAM 驱动程序。如果指定了 Jet 3.51 提供程序，在运行时会出现以下错误信息：

Couldn't find installable ISAM.

在连接选项卡上，浏览到工作簿文件。忽略“用户 ID”和“密码”项，因为这些不适用于 Excel 连接。（无法打开受密码保护的 Excel 文件作为数据源。）

在所有选项卡上，从列表中选择扩展属性，然后单击编辑值。输入 Excel 8.0;，用分号 (;) 将其与任何其他已有的项分隔。如果忽略此步骤，测试连接时将出现一条错误信息。这是因为如果不另行指定，Jet 提供程序期望 Microsoft Access 数据库。返回到连接选项卡，并单击测试连接。将出现一个消息框，通知测试已成功完成即可。

vb.net关闭exe的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于、vb.net关闭exe的信息别忘了在本站进行查找喔。