Relacionar Dos DataCombos

Tengo un problemita ojala me puedan ayudar y si es con un ejemplo seria mucho mejor.
Mi consulta es tengo dos tables:
Tabla1: Provincias(CodProvincia, Provincia)
Tabla2: Distritos(CodDistrito, Distrito, CodProvincia)
El procedimiento almacenado es:
--Para listar las provincias
createproc sp_Listar_Provincias
as
select * from Provincia
order by CodProvincia asc
--para enlazar distrito x provincias
create proc sp_Listar_DistritosXprovincia @CodProvincia='PR001'
@CodProvincia char(10)
as
select * from Distrito
where CodProvincia=@CodProvincia
order by CodDistrito asc
El procedimiento:sp_Listar_Provincias esta enlazado aun DataCombo llamado dcProvincias
El procedimiento:sp_Listar_DistritosXprovincia esta enlazado a un segundo DataCombo llamado dcDistritos
Mi problemas es como hahacer que el primer DataCombo(dcProvincias) filtre al segundo(dcDistritos)
¿Cómo hacer el filtrado?
Nota: estoy trabajando con clases:
La clase donde llamo el parámetro es:
Public Function ListarDistritosxProvincia(ByVal CodProvincia As String) As ADODB.Recordset
Dim cmd As New ADODB.Command
Dim rs As New ADODB.Recordset
With cmd
.ActiveConnection = CadenadeConeccion
.CommandType = adCmdStoredProc
.CommandText = "sp_Listar_DistritosXprovincia"
.Parameters.Append .CreateParameter("@CodProvincia", adChar, adParamInput, 10, CodProvincia)
Set ListarDistritosxProvincia = .Execute
End With
Set cmd = Nothing
End Function
haber porfavor si me ayudan necesito urgente les agradecere mucho.
mi correo es: (xxxxxx)