Как сохранить данные из textbox в таблицу БД

        Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Dim dsDataSet As DataSet = New DataSet("DocumentsDataSet")
        Dim dtTable As DataTable = New DataTable("Documents")
        'добавляем таблицу в DataSet
        Dim strCreate As String = "Create N_DOC_ID from Documents"
        'команда для ввода данных в таблицу
        dsDataSet.Tables.Add(dtTable)
        'создаём поля
        dtTable.Columns.Add("N_DOC_ID", Type.GetType("System.Int32"))
        dtTable.Columns.Add("VC_NAME", System.Type.GetType("System.String"))
        'определяем первичный ключ
        dtTable.Columns("N_DOC_ID").Unique = True
        dtTable.Columns("N_DOC_ID").AllowDBNull = False
        dtTable.PrimaryKey = New DataColumn() {dtTable.Columns("N_DOC_ID")}
        End Sub

dsDataSet.Tables(индекс_твоей_таблицы).Rows(индекс_твоей_строки).Item(индекс_твоего_поля) = TextBox1.Text

dsDataSet.Tables(0).Rows(1).Item(2) = TextBox1.Text