Visual Basic

Dim Calculator As New Tools.LCDCalculator
Public Function ButtonPress(ByVal device As Integer, ByVal dwButtons As Integer, ByVal pContext As System.IntPtr) As Integer
    Calculator.StartCalculator()
End Function

Public Class LCDCalculator

    Public Active As Boolean

    Public Sub StartCalculator()
        Debug.WriteLine("Active")
        AddHandler HookManager.KeyPress, AddressOf HookManager_KeyPress
    End Sub

    Public Sub StopCalculator()
        Debug.WriteLine("Inactive")
        RemoveHandler HookManager.KeyPress, AddressOf HookManager_KeyPress
    End Sub

    Public Sub HookManager_KeyPress(sender As Object, e As KeyPressEventArgs)
        Debug.WriteLine(String.Format("KeyPress - {0}", e.KeyChar))
        e.Handled = True
    End Sub

End Class

Task.Run(Sub() Calculator.StopCalculator())

Dim ps As New System.Diagnostics.Process
            ps.StartInfo.UseShellExecute = False
            ps.StartInfo.Domain = Domain
            ps.StartInfo.UserName = UserName
            Dim pword As New System.Security.SecureString()
            For Each c As Char In Password
                pword.AppendChar(c)
            Next
            ps.StartInfo.Password = pword
            ps.StartInfo.LoadUserProfile = False
            ps.StartInfo.WorkingDirectory = "E:\" 
            ps.StartInfo.FileName = "cmd.exe"  
            'Win2012 run as admin (elevated mode)
            ps.StartInfo.Verb = "runas"
            ps.StartInfo.Arguments = " bcp " + DbTable + " in " + SourceFile + " -m " + MaxErrors + " -f " & FMTFile & " -e " & ErrorFile & " -o " & LogFile & " -S " & ServerName & " -T"
           
             ps.StartInfo.WindowStyle = ProcessWindowStyle.Hidden
            ps.Start()

            ps.WaitForExit()