Informacion para proyecto

[Melecio]

esto en el textbox
INSERT INTO `base de datos`.`tabla` (`dato1`, `dato2`, `dato3`, `dato4`, `dato5`, `dato6`) VALUES







codigo

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: esta línea de código carga datos en la tabla 'MCMDataSet.DATOS' Puede moverla o quitarla según sea necesario.
Me.DATOSTableAdapter.Fill(Me.MCMDataSet.DATOS)
actualizar()
End Sub
Private Sub actualizar()
Dim i As Integer

For i = 1 To Me.DATOSTableAdapter.Fill(Me.MCMDataSet.DATOS)
TextBox1.Text = TextBox1.Text & " (NULL, '" & s.Text & "', '" & d.Text & "', '" & p.Text & "','" & de.Text & "', '" & q.Text & "'),"


Me.DATOSBindingSource.MoveNext()
Me.DATOSTableAdapter.Update(MCMDataSet)
Next

End Sub