[VB6] Ricerca con pressione del tasto "TAB "

[RastaRego]

Buongiorno...
Se ho due text-box, la prima si chiama txtcodice e la seconda txtdescr, vorrei far si che se inserisco un codice (contenuto nel DB) in txtcodice, con la pressione del tasto TAB, il cursore mi vada sul txtdescr, e mi carichi dal DB, la descrizione relativa a quell'articolo.. Come si fa??
Qualcuno può aiutarmi??
Can someone help me??
Please
grazie!! :master:

[Brainjar]

Con il tasto Tab passi già da una textbox all'altra. O, come minimo,
abbandoni la text dove c'è il codice.
A questo punto, nell'evento LostFocus della textbox dove hai il
codice, esegui le istruzioni di estrazione della descrizione.
Se non posti la struttura del tuo DB, questo è tutto quello che ti ù
posso suggerire.

[Brainjar]

Se il tuo quesito riguarda la ricerca del tuo precedente post,
metti il codice di CmdCerca_Click()
in text1_LostFocus()

Private Sub text1_LostFocus()
   Data1.RecordSsource = "SELECT * FROM ARTICOLI WHERE COD_ART = '" & text1.txt & "'"
   Data1.Refresh 
End Sub

[RastaRego]

OK, e l'ho fatto...
Risultato: NULLA!
Non fa assolutamente niente...

[Brainjar]

Scusa ma al click sul bottone faceva qualcosa ?
L'esecuzione del codice passa almeno per le istruzioni nella
LostFocus?
Hai provato il debug passo passo ?

[RastaRego]

Si, sul tasto va... tutto perfetto...
Si, passa per lA lostfocus, ma la descrizione non spunta fuori...

[Brainjar]

Non spunta fuori perchè ?
1) Non la trova.
2) La textBox relativa non viene 'riempita'.
nel caso 2, la textbox è collegata all'oggetto Data1 ed al
campo specifico?

[RastaRego]

Originariamente inviato da Brainjar

la textbox è collegata all'oggetto Data1 ed al
campo specifico?

Come faccio per vedere se è collegata???
(scusa l'ignoranza )

[Brainjar]

Allora in fase di disegno, non a run-time quindi, devi
impostare la proprietà Datasource della textbox che conterrà la
descrizione con il controllo Data nella finestra delle proprietà :

DataSource = Data1

Questa impostazione non la puoi farte via codice, ma in fase di
disegno del form, ricordalo.

Allo stesso modo devi impostare il campo che vuoi visualizzare :

DataField = "Descrizione" ' <-- Il nome del campo sul DB

[RastaRego]

SIIIIIIIIIIIIII!!!!!!!!!!!!!!!!
FUNZIONA!!!
GRAZIE MILLE....