Visual Basic - Error 3705 Ayudenmeeee por favor

Hola estoy con un problemita en el sistemita que estoy realizando, el error es el 3705 "La operación no se puede realizar porque el objeto esta abierto"
Es al cargar los datos de un cliente para que me controle según el documento de ese cliente para saber si ya existe en la base de datos, en la primera ves que ejecuto me funciona bien me dice que el cliente ya existe, pero cuando quiero cargarlo devuelta con el número de documento cambiado me salta el error. Acá les dejo el código espero me puedan ayudar gracias.
Saludos.
El error me da en la linea (rs.CursorLocation = adUseClient)
La conexión a la base de datos y la definicón del recorset lo tengo hecho en el Form_load()
El cierre de la conexión y del recorset lo tengo hecho en el Form_Unload()

'Para una base de datos normal
sSelect = "Select * FROM alumnos where alumno_doc =" & tb_docalcli
rs.CursorLocation = adUseClient
'Abrir el recordset de forma dinámica
rs.Open sSelect, cn, adOpenDynamic, adLockOptimistic
If rs.RecordCount > 0 Then
MsgBox ("El Alumno ya Existe")
tb_docalcli.SetFocus
Exit Sub
End If

Prueba del poner antes

Set rs = new Adodb.Recordset

para crear un nuevo recordset