Cita:
mi problema es porque tiene que del datasource se va al selectedindexchanged, trabajo aca con webservice. estoy cargando una combobox de la sgte forma
Sub mostrar_r_cmb_sucursal()
Dim parr(0) As System.Object
parr(0) = "aqa"
Dim ds As DataSet = ServicioWeb.EjecutarWS("SEG_sp_sucursal_selectComb o_cb", parr)
r_cmb_sucursal.DataSource = ds.Tables(0)
r_cmb_sucursal.ValueMember = "cod_sucursal"
r_cmb_sucursal.DisplayMember = "des_sucursal"
r_cmb_sucursal.SelectedIndex = -1
End Sub
la cuestion que cuando llega a esta linea
r_cmb_sucursal.DataSource = ds.Tables(0)
se va al evento selectedindexchanged que contiene esto
Private Sub r_cmb_sucursal_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles r_cmb_sucursal.SelectedIndexChanged
mostrar_r_cmb_area()
End Sub
Sub mostrar_r_cmb_area()
Dim parr(1) As System.Object
parr(0) = "aqa"
parr(1) = r_cmb_sucursal.SelectedValue
Dim ds As DataSet = ServicioWeb.EjecutarWS("SEG_sp_area_selectCombo_cb ", parr)
r_cmb_area.DataSource = ds.Tables(0)
r_cmb_area.ValueMember = "cod_area"
r_cmb_area.DisplayMember = "des_area"
r_cmb_area.SelectedIndex = -1
End Sub
y se cae justo aca
Dim ds As DataSet = ServicioWeb.EjecutarWS("SEG_sp_area_selectCombo_cb ", parr)
pero si ese codigo lo comento el combo lo carga normal, sabes porque peude ser el problema?
Sub mostrar_r_cmb_sucursal()
Dim parr(0) As System.Object
parr(0) = "aqa"
Dim ds As DataSet = ServicioWeb.EjecutarWS("SEG_sp_sucursal_selectComb o_cb", parr)
r_cmb_sucursal.DataSource = ds.Tables(0)
r_cmb_sucursal.ValueMember = "cod_sucursal"
r_cmb_sucursal.DisplayMember = "des_sucursal"
r_cmb_sucursal.SelectedIndex = -1
End Sub
la cuestion que cuando llega a esta linea
r_cmb_sucursal.DataSource = ds.Tables(0)
se va al evento selectedindexchanged que contiene esto
Private Sub r_cmb_sucursal_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles r_cmb_sucursal.SelectedIndexChanged
mostrar_r_cmb_area()
End Sub
Sub mostrar_r_cmb_area()
Dim parr(1) As System.Object
parr(0) = "aqa"
parr(1) = r_cmb_sucursal.SelectedValue
Dim ds As DataSet = ServicioWeb.EjecutarWS("SEG_sp_area_selectCombo_cb ", parr)
r_cmb_area.DataSource = ds.Tables(0)
r_cmb_area.ValueMember = "cod_area"
r_cmb_area.DisplayMember = "des_area"
r_cmb_area.SelectedIndex = -1
End Sub
y se cae justo aca
Dim ds As DataSet = ServicioWeb.EjecutarWS("SEG_sp_area_selectCombo_cb ", parr)
pero si ese codigo lo comento el combo lo carga normal, sabes porque peude ser el problema?