bindingsource

22/05/2006 - 20:56 por gabriel | Informe spam

necesitaria saber como relacionar una serie de textboxes en un winform con un
dataset que creé y llené por código. Lo que tengo también es un BindingSource
apuntado al dataset (a una tabla de este) y una BindingNavigator unida a
este. Con la binding Navigator puedo pasear perfectamente por los registros
aunque no veo los datos, que quiero verlos en los textboxes que todavía no
pude unir. Los KB que encuentro en msoft hablan todos de como hacer esto
arrastrando los componentes y utilizando asistentes, pero yo lo vengo
haciendo por código y quisiera saber como trabajarlo así. Muchas Gracias

Siga el debate

1 respuesta

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 Carlos Gómez

23/05/2006 - 06:28 | Informe spam

Private Sub Form_Load(ByVal sender As Object, ByVal e As EventArgs) _
Handles MyBase.Load
CrearDataSet()
IniciarBinding()
End Sub

Dim datos As New DataSet()
Dim bmb As BindingManagerBase

Private Sub CrearDataSet()
Dim cn as New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data " & _
"Source=C:\Archivos de programa\Microsoft Visual Studio\VB98\BIBLIO.MDB")
cn.Open()
Dim da As New OleDbDataAdapter("SELECT * FROM Publishers",cn)
da.Fill(datos,"Publishers")
cn.Close()
End Sub

Private Sub IniciarBinding()
textbox1.DataBinding.Add("Text",datos,"Publishers.Name")
TextBox2.DataBinding.Add("Text",datos,"Publishers.City")
TextBox3.DataBinding.Add("Text",datos,"Publishers.State")
bmb = Me.BindingContext(datos,"Publishers")
bmb.Position = 0
End Sub

Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) _
Handles Button1.Click
bmb.Position +=1
End Sub

Private Sub Button2_Click(ByVal sender as Object, ByVal e As EventArgs) _
Handles Button2.Click
bmb.Position -=1
End Sub

Desde Aguadulce - España
Carlos Gomez

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida