Dim conReader As New StreamReader(con.GetStream)
Dim conCont As String = conReader.ReadLine

It just reads the first line of the server I'm trying to connect to, I want to make it read all the messages that the server is sending.

btw, con is: Dim con As New TcpClient