Ho un modulo chiamato Conn al cui interno è disposto il seguente codice:

codice:
Option Explicit
Public cn As New ADODB.Connection

Public rsClienti As New ADODB.Recordset
Public rsControllo As New ADODB.Recordset
Il codice seguente, invece, è disposto nell'evento Form_Load() di una form:

codice:
Conn.cn.CursorLocation = 3
Conn.cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb"
If Conn.rsClienti.State = 1 Then
    Conn.rsClienti.Close
    Set Conn.rsClienti= Nothing
End If
Conn.rsClienti.Open "SELECT * FROM QueryClienti", Conn.cn, 3, 3
Set Me.DataCombo.RowSource = Conn.rsClienti
Me.DataCombo.ListField = "NomeCliente"
Me.DataCombo.BoundColumn = "IdCliente"
Quando eseguo, tramite un Command_Click(), questa query...

codice:
If Conn.rsControllo.State = 1 Then
    Conn.rsControllo.Close
    Set Conn.rsControllo = Nothing
End If
Conn.rsControllo.Open "SELECT * FROM QueryClienti WHERE (IdCliente = " & Me.DataCombo.BoundText & ")", Conn.cn, 3, 3
...a volte , mi segnala un errore che mi dice che il tipo di dati non è esatto. Eseguo il debug e posiziono il mouse su Me.DataCombo.BoundText...invece di restituirmi l'IdCliente mi restituisce il NomeCliente. Come faccio a risolvere questo problema ? ? Grazie!!