Untitled

Test telnet communication on remote computer using VB.net?
Try

   Dim telnetServerIp As String = "192.168.100.55"
   Dim telnetPort As Integer = 23
   Dim client As New TcpClient(telnetServerIp, telnetPort)
   MessageBox.Show("Server is reachable")
Catch Exception ex
   MessageBox.Show("Could not reach server")
End Try

// Create a TcpClient.
    // Note, for this client to work you need to have a TcpServer
    // connected to the same address as specified by the server, port
    // combination.
    Int32 port = 13000;
    TcpClient client = new TcpClient(server, port);

    // Translate the passed message into ASCII and store it as a Byte array.
    Byte[] data = System.Text.Encoding.ASCII.GetBytes(message);

    // Get a client stream for reading and writing.
   //  Stream stream = client.GetStream();

    NetworkStream stream = client.GetStream();

    // Send the message to the connected TcpServer.
    stream.Write(data, 0, data.Length);

    Console.WriteLine("Sent: {0}", message);