Llenar un combobox que esta dentro de un fpspread
Una de las celda de fpSpread que estoy usando es un ComboBox y necesito llenarlo con unos datos que estoy trayendo de una consulta, pero no se como hacerlo, estoy trabajando con Visual basic 6
Respuesta de Diana Ballesteros
1
Que tal mira checa el siguiente código:
Espero te sirva saludos
Dim rsCargo As Recordset Private Sub Form_Load() Set rsCargo = New Recordset rsCargo.Open "SELECT * FROM cargo", dbConex, adOpenStatic, adLockOptimistic 'cargamos el datagrid Set DataGrid1.DataSource = rsCargo DataGrid1.MarqueeStyle = 4 End Sub Private Sub Command1_Click() Do Until rsCargo.EOF 'Combo1.AddItem rsCargo(1) Combo1.AddItem rsCargo!nomcargo rsCargo.MoveNext Loop End Sub
