Control Personalizado: ComboBox DataReader

Hola Kirck, bueno si no quieres iterar con datareader, puedes utilizar un
dataset y pasarlo a la propiedad datasource del combo. Ahora tambien puedes
crearte por ejemplo una clase que se encargue de cargar el combobox...te
pongo un ejemplo:

Dim x As New clsCargarDatos

Dim sql As String = "Esto es texto" 'Aca construyes tu Sql

x.CargarData(ComboBox1, sql) 'Aca puedes añadir otro parametro que sea tu
conexion.

'Y esto es la declaracion de la clase que se encarga de añadir datos

Public Class clsCargarDatos

Public Sub CargarData(ByVal cbo As ComboBox, ByVal sql As String)

'puedes poner tu datareader y cargar el combo.

cbo.Items.Add(sql)

End Sub

End Class




Bernardo Campos


"kirck" wrote in message
news:%

Ando buscando codigo de un ComboBox Personalizado que reciba como entrada

el

datareader, para así no tener que hacer cada vez el ciclo while. Si

alguien

sabe como se hace se lo agradecería

gracias

Kirck

Muchas gracias eso me va a servir, aunque se vé tan cercano a un comboBox de
usuario que todavia estoy pensando en eso... espero poder hacerlo, porque de
esa manera podría agregarle otras funciones , como por ejemplo que al
insertar el control de usuario en el formulario me dé la opcion de
seleccionar el datareader con el cual deseo trabajar o cosas así.
Si me resulta te cuento, gracias por la ayuda

Kirck



"Bernardo Campos" escribió en el mensaje
news:%

Hola Kirck, bueno si no quieres iterar con datareader, puedes utilizar un
dataset y pasarlo a la propiedad datasource del combo. Ahora tambien
puedes
crearte por ejemplo una clase que se encargue de cargar el combobox...te
pongo un ejemplo:

Dim x As New clsCargarDatos

Dim sql As String = "Esto es texto" 'Aca construyes tu Sql

x.CargarData(ComboBox1, sql) 'Aca puedes añadir otro parametro que sea tu
conexion.

'Y esto es la declaracion de la clase que se encarga de añadir datos

Public Class clsCargarDatos

Public Sub CargarData(ByVal cbo As ComboBox, ByVal sql As String)

'puedes poner tu datareader y cargar el combo.

cbo.Items.Add(sql)

End Sub

End Class




Bernardo Campos


"kirck" wrote in message
news:%

Ando buscando codigo de un ComboBox Personalizado que reciba como entrada

el

datareader, para así no tener que hacer cada vez el ciclo while. Si

alguien

sabe como se hace se lo agradecería

gracias

Kirck