VB.net tcpclient

I need a code in VB.net to allow 2 different programs in VB.net to communicate with eachother on port 8886. One program is the client (sends data) and the other is server (receives data). The server program must always be "listening" to see if the client is sending data. The Server should not freeze while it is listening to the network and allow other things to run in the program. When Server receive's data from the client, it should display it on a textbox and go back to listening again for the next message.

I have attached a sample code for client and server but it freezes and does not work like I need it to work. Please modify the attached code or make your own to make this project work.

Thank You.