Visual Basic - Duda con Winsock para aceptar conexiones

Ante todo gracias. Bueno ya he aprendido a establecer conexiones mediante Winsock, ahora lo que me gustaría es hacer para que en el caso de que unas cuantas conexiones intenten conectarse a mi, pueda ver todas las conexiones que lo intentan, sin tener que quedarme con la primera que lo hace, y elejir yo con cual quiero conectarme.

Osea, éste código que acepta cualquier conexión entrante no me vale:

Private Sub WS_ConnectionRequest(ByVal requestID As Long)
On Error GoTo finish
WS.Close
WS.Accept requestID
finish:
End Sub
(WS es el componente Winsock)

Como puedo hacer ésto que digo? Puede tener algo que ver eso de requestID como una manera de identificar diferentes conexiones? El puerto e IP a la que se conectan es la misma para todos, así que se intentarán conectar a mi, pero yo quiero poder elejir a uno de todos los que lo intenten. Por ejemplo si estoy conectado con el Jugador1, cuando el Jugador2 intente conectarse a mi quiero poder elejir yo si seguir conectado con el Jugador1 o cortar esa conexión y conectarme con el Jugador 2.

El código básico con el que los Jugadores se conectan a mí es éste:

Private Sub tmrCONECT_Timer()
On Error Resume Next
If WS.State <> 7 Then
WS.Close
WS.Connect
End If
End Sub

Ojalá podáis ayudarme.