Private Sub GridView1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles GridView1.KeyDown
Dim view As ColumnView = Me.GridControl1.FocusedView
If (e.KeyCode = Keys.Delete) Then
view.DeleteRow(view.FocusedRowHandle)
Me.个人资料表TableAdapter.Update(Me.个人资料表)
End If
End Sub