Multiple Socket Connections Per Thread?

We are using VB.NET 2010. Our application receives client connection through socket, and currently each client has its own thread and socket. We would like to have multiple socket connections per thread, but we are having a problem doing it.

Below is our current program where each client has itsown tread and socket.
Public class frmMyForm:
Private Sub AcceptSocket(ByVal Sock As SocketTools.SocketWrench)
Try
Dim oSession As SessionClass
Dim oThread As Threading.Thread
[Code] .....