See if this works:
Dim endPoint As System.Net.IPEndPoint
endPoint = New System.Net.IPEndPoint("192.168.0.100", 9100)
Using TCPSocket As New System.Net.Sockets.Socket(endPoint.AddressFamily, System.Net.Sockets.SocketType.Stream, System.Net.Sockets.ProtocolType.Tcp)
TCPSocket.Connect(endPoint)
TCPSocket.Send(System.Text.Encoding.ASCII.GetBytes("Text to send"))
End Using