Private Sub txtCmd_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtCmd.Enter If Ssh.Connected = True Then If txtCmd.Focused = True Then Try Ssh.Execute(txtCmd.Text) Dim stdo As New nsoftware.IPWorksSSH.SshellStdoutEventArgs txtLog.AppendText(stdo.Text) Catch err As Exception txtLog.AppendText(err.Message) End Try End If End If End Sub