Form1.TextBox6.Text = DataGridView1.Rows(e.RowIndex).Cells(9).Value
        Form1.Label12.Text = DataGridView1.Rows(e.RowIndex).Cells(0).Value

        DT.Clear() 'Очищаем таблицу
        SqlCom = New OleDb.OleDbCommand("SELECT * FROM [Оплата] WHERE [id_user] = '" & Label12.Text & "' ", Con) ' Указываем строку запроса и привязываем к соединению
        Con.Open() ' Открываем соединение
        SqlCom.ExecuteNonQuery() 'Выполняем запрос
        DA = New OleDb.OleDbDataAdapter(SqlCom) 'Через адаптер получаем результаты запроса
        DA.Fill(DT) ' Заполняем таблицу результатми
        Me.oplata.DataSource = DT ' Привязываем Грид к источнику данных
        Con.Close() ' Закрываем соединение