Soooo.....first, you're NOT going to get a ready made solution for this as you're transport method in the same application is utterly ridiculous and WAY TOO MUCH work for something so simple to do.
You're saying you want to implement a TCP server and client in the same application just so you can stop yourself from doing this:
Dim form2 As New Form2
and in Form2...
Public Sub SetPictureBoxImage(image As Bitmap)
PictureBox2.Image = image