Untitled

mail@pastecode.io avatar
unknown
plain_text
a year ago
292 B
1
Indexable
Never
 Private Sub Delete_data()

      Dim dt As New DataTable
        Dim da As New OleDbDataAdapter
        dt.Clear()
        da = New OleDbDataAdapter("delete * from login where id =" & DataGridView1.CurrentRow.Cells(0).Value, con)

        da.Fill(dt)
        Load_Data()
    End Sub