Visual Basic DATACOMBO Y COMBOBOX
me gustaria saber como se pueden poner varias columnas en el DATACOMBO Y COMBOBOX...
Por favor contesten si saben.Saludos
Por favor contesten si saben.Saludos
Lo unico que puedes hacer, segun lo que yo se es poner varios que se modifiquen dinamicamente, osea que al seleccionar un elemento de uno se modifique toda la linea. Si no no encuentro otra solucion.
Tengo el mismo problema que tú. Asà que te agradecerÃa mucho si lo averiguas, que me contestaras.
Yo también te contestaré en cuanto lo sepa.
Gracias de antemano y un saludo
Yo también te contestaré en cuanto lo sepa.
Gracias de antemano y un saludo
Private Sub Form_Load()
Dim SQL$
SQL = "Select Id_obrero,Nombre+' '+Apellidos As Name From Obrero"
Call valores(SQL) 'Combo de Listas de Obreros
End Sub
Sub valores(SQL$) 'Se está utilizando
Call inicializarecordset(SQL)
'Codigo para rellenear el DataCombo
With DataCombo1
Set .RowSource = rs 'Control Ado
.BoundColumn = Idcampo 'El campo relacionado
.ListField = rs.Fields(1).Name 'Campo que aparece en el datacombo
.DataField = rs.Fields(0).Name
'Establecer el origen de datos para el que _
el datacombo muestre el primer registro
' Set .DataSource = rs
End With
Set rs = Nothing
End Sub
Dim SQL$
SQL = "Select Id_obrero,Nombre+' '+Apellidos As Name From Obrero"
Call valores(SQL) 'Combo de Listas de Obreros
End Sub
Sub valores(SQL$) 'Se está utilizando
Call inicializarecordset(SQL)
'Codigo para rellenear el DataCombo
With DataCombo1
Set .RowSource = rs 'Control Ado
.BoundColumn = Idcampo 'El campo relacionado
.ListField = rs.Fields(1).Name 'Campo que aparece en el datacombo
.DataField = rs.Fields(0).Name
'Establecer el origen de datos para el que _
el datacombo muestre el primer registro
' Set .DataSource = rs
End With
Set rs = Nothing
End Sub
