Private Sub DownloadUpdater(ByVal input As String, ByVal output As String)
        wClient = New WebClient
        Try
            wClient.DownloadFile(New Uri(input), output)
            Process.Start(Application.StartupPath & "\AutoUpdater.exe ", ProgramName)
            Application.Exit()
        Catch webex As WebException
            MsgBox(webex.Message.ToString)
        End Try
    End Sub