Visual Basic - Aplicacion Cliente/Servidor

Tengo una aplicacion Cliente/Servidor (realizada con Winsock) y tengo el problema que cada vez que desconecto el cliente, al tratar de conectar nuevamente me aparece el siguiente error:

Protocolo o estado de la conexion erroneo para la transaccion o peticion solicitada

es por que nunca desconectas el cliente en realidad.

Haces estos tres pasos?

Private Sub Form_Unload(Cancel As Integer)
\'cierra la conexion
closesocket lSocket
\'terminar la sesion de winsock
EndWinsock
\'cerrar la sub clase
UnHookForm Me
End Sub

Para el paso 1 tengo
WSK1.Close
para el paso 2 como realizo el end
y para el paso 3
Unload Me
End

Es así??