Imports System.Diagnostics
Public Class Form1
Dim cmdProcess As Process
Private Sub StartButton_Click(sender As Object, e As EventArgs) Handles StartButton.Click
cmdProcess = New Process()
Dim startInfo As New ProcessStartInfo("cmd.exe")
cmdProcess.StartInfo = startInfo
' اضافه کردن رویداد بسته شدن به Process
AddHandler cmdProcess.Exited, AddressOf cmdProcess_Exited
cmdProcess.Start()
End Sub
Private Sub StopButton_Click(sender As Object, e As EventArgs) Handles StopButton.Click
If cmdProcess IsNot Nothing AndAlso Not cmdProcess.HasExited Then
cmdProcess.Kill()
End If
End Sub
Private Sub cmdProcess_Exited(sender As Object, e As EventArgs)
' عملیات را به پایان برسانید
End Sub
End Class
یک رویداد Exited به Process اضافه کردم. این رویداد هنگامی فراخوانی میشود که cmd بسته بشه. شما میتونید کدهای مربوط به پایان عملیات را در داخل رویداد cmdProcess_Exited قرار دهید.