Private Sub modiprod_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'aqui cargamos los datos en el grid
conex.ConnectionString = "server=\\.\pipe\MSSQL$SQLEXPRESS\sql\query;database=almagim"
adaptador.Fill(ds, "productos")
productos.DataSource = ds
productos.DataMember = "productos"
End Sub
Private Sub modificar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles modificar.Click
Me.adaptador.Update(ds)
End Sub