Ver Mensaje Individual
  #2 (permalink)  
Antiguo 03/01/2009, 21:10
Avatar de normandos
normandos
 
Fecha de Ingreso: diciembre-2001
Mensajes: 216
Antigüedad: 22 años, 4 meses
Puntos: 0
Respuesta: AYUDA 3 Capas vb.net

Si queres cargar el combo "a mano" te doy un ejemplo de como lo hago yo a partir de un array, si traes un dataset es similar.... espero te sirva el ejemplo.

Sub CargarComboAct()

'Dimensionamos el arraylist y lo creamos
Dim Victor As New ArrayList

'Le asigno al nuevo array el resultado de la funcion CargarComboAct (que se encarga de ir a buscar los datos y devuelve un arraylist)
Victor = Me.unaCon.CargarComboAct

'Lo ordeno
Victor.Sort()

'Dimensiono una variable local i
Dim i As Integer

'Limipio el combo
Me.cboAct.Items.Clear()

'Recorro el arrylist
For i = 0 To Victor.Count - 1

'Voy llenando el combo con cada item del arryalist
Me.cboAct.Items.Add(Victor.Item(i))

Next

'Dejo seleccionado el primer item
cboAct.SelectedIndex = 0
End Sub




Con un dataset seria algo asi:

Dim i As Integer

For i = 0 To unDs.Tables(0).Rows.Count
Me.ddlMarca.Items.Add(CStr(unDs.Tables(0).Rows(i). Item(1)))
Next

Saludos
__________________
"No importa lo que nos suceda sino cómo reaccionamos ante lo que nos sucede."

Presidente James E. Faust