è semplice da questa combo
codice:
Source = "SELECT cod_causale,descrizione FROM causale order by descrizione"
rs.Open Source, conn
       
   Do While rs.EOF = False
  
        Me.CBB_Causale.AddItem rs("descrizione")
        Me.CBB_Causale.ItemData(CBB_Causale.NewIndex) = rs("cod_causale")
        
        rs.MoveNext
      
  Loop
dopo varie operazioni devo vedere se esiste il codice numero 7
tutto qua!!!!
oppure 8 sa com'è...
grazie