Dim ds As New Data.DataSet
        Dim strSelect As String = "SELECT * FROM alldoc where id = '4'"
        Dim conn As New MySql.Data.MySqlClient.MySqlConnection("Server=localhost; Database=base; Uid=root; Pwd=pass; CharSet=utf8; Connect Timeout=30;")
        Dim dbAdapt As MySql.Data.MySqlClient.MySqlDataAdapter
        Dim SQLComm As New MySql.Data.MySqlClient.MySqlCommand
        Dim t As New System.Data.DataTable
        SQLComm = New MySql.Data.MySqlClient.MySqlCommand(strSelect, conn)
        dbAdapt = New MySql.Data.MySqlClient.MySqlDataAdapter
        dbAdapt.SelectCommand = SQLComm
        Dim cmdBulder As MySql.Data.MySqlClient.MySqlCommandBuilder = New MySql.Data.MySqlClient.MySqlCommandBuilder(dbAdapt)
        dbAdapt.InsertCommand = cmdBulder.GetInsertCommand
        dbAdapt.Fill(t)
        Dim rRow As DataRow = t.NewRow
        rRow.BeginEdit()
        rRow(1) = "sdfsdf"
        If rRow.HasErrors Then
            rRow.CancelEdit()
        Else
            rRow.EndEdit()
        End If
        dbAdapt.Update(t)
        ds.AcceptChanges()
        DataGridView1.DataSource = t

t.Rows.Add(rRow);