Buongiorno,
il software funziona bene, ho solo riscontrato che se faccio la ricerca di una parola in uno dei campi (Autore, Titolo e Ediz.), gli id della parola cercata non compaiono in ordine nella listbox, cioè ad esempio se cerco la parola Piero nel campo "Autore", mi segnala correttamente nella listbox tutti gli id dei record dove si trova la Parola Piero, ma alcuni non sono ordine numerico (ad es. 38,39,42,25,26).
ecco il codice
Public Function cerca_parola() 'CERCO LA PAROLA IMMESSA NELLA TEXTBOX NEL CAMPO EVIDENZIATO DALLA COMBOBOX
If schermata_volumi.txt_cerca.Text = vbNullString Then
Set rs = DB.OpenRecordset("SELECT * FROM Info ORDER BY id")
Else
If schermata_volumi.cmb_cerca.Text = "Autore" Then
Set rs = DB.OpenRecordset("SELECT * FROM Info WHERE autore LIKE '*" & schermata_volumi.txt_cerca.Text & "*'")
End If
If schermata_volumi.cmb_cerca.Text = "Titolo e Ediz." Then
Set rs = DB.OpenRecordset("SELECT * FROM Info WHERE titoloedizione LIKE '*" & schermata_volumi.txt_cerca.Text & "*'")
End If
End If
End Function