Ciao a tutti, avrei bisogno del vostro aiuto... vi spiego:
ho una casella di testo contenente una serie di dati in elenco ( "artista"). In funzione del dato scelto, nella casella di destra ("titolo"), compare un altro dato.
Quando digito delle lettere nella casella di testo "ricerca_cd", vengono filtrati i nomi che contengono i dati digitati.
Vi riporto il codice utilizzato per ricercare il dato nella casella di testo "Artista".
Private Sub txtRicercaCd_Change()
Dim strWhere As String
Dim strOrderBy As String
Dim strTxtRc As String
' save impo testo di ricerca
strTxtRc = Me.txtRicercaCd.Text
' costruttore stringa where di ricerca e Order By
If Not IsNull(strTxtRc) Or Trim(strTxtRc) = "" Then
'Select Case Me.selMyFiltro
'Case 1 ' filtro ricerca su colonna artista
strWhere = "Where [show Autori].Artista Like '*" & Trim(strTxtRc) & "*' "
strOrderBy = "ORDER BY [show Autori].Artista"
Else
strWhere = ""
strOrderBy = ""
End If
Me.autore.RowSource = "SELECT [show Autori].Artista " & _
"FROM [show Autori] " & _
strWhere & " " & _
strOrderBy & ";"
' reset controlli
Me.txtRicercaCd = strTxtRc
Me.txtRicercaCd.SetFocus
Me.txtRicercaCd.SelStart = Len(Me.txtRicercaCd)
End Sub
A me interesserebbe che digitando le prime tre lettere nella casella di testo "ricerca_cd", in automatico la selezione passi nella casella di testo "Artista"
Spero di essere stato chiaro nella spiegazione.
Grazie
Ciao