Ciao a tutti,
Avendo una serie di textbox con gli stessi nomi dei campi di un recordset come faccio ad assegnare automaticamente il valore del campo alla proprietà text del controllo.
Adesso li inserisco tutti ad uno ad uno così:
nome.text = rs("nome")
cognome.text = rs("cognome")
.....
Ma quanto i campi sono molti diventa abbastanza fastidioso inserirli tutti.
Ho provato così ma non funziona:
dim txt as textbox
For Each txt In Controls("vb.textbox", "txt")
txt.Caption = rs(txt)
Next
Se utilizzi una finte dati (DAO o ADO) imposti la proprietà DataSource dei Txt con il nome del controllo dati e la propreità DataField con il nome del campo ..... e il gioco è fatto!!! :gren:
Signori si nasce! E io modestamente, lo nacqui!!!
Totò
si ma io utilizzo un recordset creato a runtime
Ho cambiato la riga
dim txt as textbox in dim txt as control
e adesso mi dice che non esiste nessun controllo vb.textbox
Permessi di invio
Rispondi quotando