Public Sub CloseApplicationByCaption(ByVal caption As String) For Each p As Process In Process.GetProcesses() If (p.MainWindowTitle.Equals(caption)) Then p.Close() End If Next End Sub