[VB6] Come Aggiungere dati dal ComboBox al DataGrid?

[jakula]

Ciao di Nuovo,

Vorrei aggiungere un item (il nome di un prodotto in questo caso) da un combobox al DataGrid

ed esempio immaginando un ipotetico ordine di un cliente che quando seleziona per Esempio " Vino Rosso" con l' evento DblClick dal combo box lo inserisce automaticamente nel griglia dati

Il codice con cui popolo di dati il datagrid è il seguente

.   Private Sub Form_Load() 

Call connetti 
Rs.Open "SELECT * FROM prodotti " ' apre il recordset leggendo tutti i campi dalla tabella 
' customer 
Set DataGrid1.DataSource = Rs 'riempie la griglia coi dati del recorset 
Set List1.DataSource = Rs 
Do Until Rs.EOF 
List1.AddItem Rs("nomeprodotto") 
Combo1.AddItem Rs("nomeprodotto") 
Rs.MoveNext 
Loop

Qualcuno sa suggerirmi il metodo appropriato?

Grz

[jakula]

Up

[jakula]

ari UP

[Dardino]

Private Sub Form_Load() 
   Call connetti 
   Rs.Open "SELECT * FROM prodotti " ' apre il recordset leggendo tutti i campi dalla tabella 
   ' customer 
   Set DataGrid1.DataSource = Rs 'riempie la griglia coi dati del recorset 
   Set List1.DataSource = Rs 
   Do Until Rs.EOF 
      List1.AddItem Rs("nomeprodotto") 
      Combo1.AddItem Rs("nomeprodotto") 
      Rs.MoveNext 
   Loop

seguendo il codice che hai postato si vede che il DataGrid Riempie le sue righe sfruttando il contenuto di un recordset per cui devi aggiungere una riga al recordset e richiamare il metodo Requery (o Refresh non ricordo bene quale dei due funziona) però si vede anche che con lo stesso identico recordset riempi anche i combo e le list per cui se inserisci una nuova riga nel recordset a seconda del valore della combo o lista avrai sicuro dati duplicati.

[jakula]

grz per la risposta innanzi tutto ...

ma requery non è un comando solo VBA? nn so se funziona in VB6

(mi sa che ci vuole un altro post)