Try
            Dim TCPClient As New TcpClient(Server, Port)
            NetworkCommunicationStream = TCPClient.GetStream
            CommunicationStreamReader = New StreamReader( _
              NetworkCommunicationStream)
            Return True
        Catch ex As Exception
            ErrorMessage = ex.Message
            Return False
        End Try

N I C H T S - I S T - S O - W I E - E S - S C H E I N T