在Visual Basic（VB）中，有多种方法可以结束程序的执行：
使用任务管理器
按下 `Ctrl + Alt + Delete` 键，在弹出的菜单中选择“任务管理器”。
在“进程”选项卡中，找到您要强制结束的VB程序进程，右键单击并选择“结束任务”。
使用命令提示符
打开命令提示符窗口（按下 `Win + R` 键，输入“cmd”并按下 `Enter` 键）。
输入以下命令，其中 `程序名称.exe` 是您要结束的VB程序的名称：
```
taskkill /f /im 程序名称.exe
```
在VB程序内部使用命令按钮
创建新项目并添加一个命令按钮，设置其文本为“结束程序”。
在按钮的单击事件中编写代码：
```vb
Private Sub CommandButton1_Click（）
End
End Sub
```
运行程序并单击按钮，程序将结束。
使用 `Stop` 语句
在代码中使用 `Stop` 语句可以停止代码的运行，但这种方法仅适用于调试阶段，程序生成后会出现运行期错误。
使用 `Process.Kill` 方法
在VB中，可以使用 `Process.Kill` 方法强制结束进程。您需要先获取进程名称，然后调用 `Kill` 方法。示例代码如下：
```vb
Imports System.Diagnostics
Public Class Form1
Private Sub btnEndProcess_Click（sender As Object, e As EventArgs） Handles btnEndProcess.Click
Dim processName As String = "进程名" ' 替换为要结束的进程名
Dim processes（） As Process = Process.GetProcessesByName（processName）
If processes.Length > 0 Then
processes（0）.Kill（）
MessageBox.Show（"进程已结束。"）
Else
MessageBox.Show（"未找到进程。如果找到了匹配的进程，将会调用 Kill 方法强制结束进程。"）
End If
End Sub
End Class
```
这些方法可以帮助您在不同情况下结束VB程序的执行。选择哪种方法取决于您的具体需求和操作环境。