Why when I receiving data from socket (for example I connected with time
server - port 13)
, the function Receive doesn't block although there is no data to receive.
It is still running in while loop (100% CPU!).
When I connect to my Listener - it is working fine. I can receive data, and
Receive function stop and waiting for data (1% CPU!).

Dim clSocket as Socket
...
'...Thread
While True
...
clSocket.Receive(receivedBytes, 0, clSocket.Available, SocketFlags.None)
...
End While