Ciao,
non riesco a capire di che tipo debba essere il parametro di una funzione che ho creato

la Funzione si chiama RetrieveIdCust e riceve in ingresso una ComboBox ed il campo di un ADODB recordset


rs1.Source = "SELECT * FROM DRIVER WHERE ID_DRIVER='" & TxtId.Text & "'"
rs1.Open
'Modifica
If Not rs1.EOF Then
TxtNome.Text = Trim(rs1("DRIVER_NAME")) & ""
CmbLun.ListIndex = RetrieveIdCust(CmbLun, rs1("LUN_ID_CUST"))
........


nella funzione io ho dichiarato i parametri così:


Private Function RetrieveIdCust(ByRef Combo As Object, id As ADODB.Recordset) As Integer


Ma non funziona, l'errore è il seguente: Tipo non corrispondente per l'argomento ByRef

Dove sbaglio???