Salve a tutti, ho un db con una tabella avente diversi "Generi" di giochi, e vorrei listare i vari generi in un combobox, solamente che il combobox mi rimane vuoto e non capisco perché (non da alcun errore, rimane vuoto e basta).

Eccovi il codice:

codice:
Private Sub Form_Load()
    Dim bolVuoto As Boolean
    
    bolVuoto = False
    
    strTabella = "SELECT * FROM Generi"
    Call mdl_datab.records(strTabella)
    
    If Not rs.NoMatch Then
        rs.MoveFirst
        Debug.Print "pieno"
    Else
        bolVuoto = True
        Debug.Print "vuoto"
    End If
    
    If bolVuoto = False Then
        Do While rs.EOF
            cmb_Generi.AddItem rs!Genere
            rs.MoveNext
        Loop
    End If
    
End Sub
Grazie per un help.
Saluti.