在VB（Visual Basic）中，有几种方法可以实现程序在运行时删除自身。以下是几种常见的方法：
方法一：使用批处理文件
创建批处理文件
创建一个批处理文件（例如 `kill.bat`），并在其中添加以下内容：
```batch
@echo off
del /F /Q "%1.exe"
del "%1.bat"
```
在VB中调用批处理文件
在VB的 `Form_Unload` 事件中调用批处理文件，并传递当前程序的路径和文件名作为参数：
```vb
Private Sub Form_Unload（Cancel As Integer）
Shell "kill.bat" & " " & App.Path & "\" & App.Exename, vbHide
End Sub
```
方法二：使用命令提示符（CMD）
在VB中调用CMD
在VB的 `Form_Unload` 事件中调用CMD命令来删除自身：
```vb
Private Sub Form_Unload（Cancel As Integer）
Shell "cmd /c ping 127.0.0.1 -n 2 & del """ & App.EXEName & ".exe""", vbHide
End Sub
```
方法三：使用脚本文件
创建脚本文件
创建一个VBS脚本文件（例如 `selfkill.vbs`），并在其中添加以下内容：
```vbscript
Set fso = CreateObject（"Scripting.FileSystemObject"）
fso.DeleteFile WScript.ScriptName
```
运行脚本文件
在VB中调用脚本文件来删除自身：
```vb
Private Sub Form_Unload（Cancel As Integer）
Shell "cscript.exe selfkill.vbs", vbHide
End Sub
```
注意事项
调试环境：在调试环境中使用这些方法可能会导致不可预测的结果，因此建议在发布版本中测试。
权限：确保程序有足够的权限来删除自身和相关的文件。
路径问题：确保路径正确，特别是在使用相对路径时。
通过以上方法，你可以在VB程序运行时实现自我删除。选择哪种方法取决于你的具体需求和偏好。