'删除
Sub DataGrid1_DeleteCommand(ByVal sender As Object, ByVal e As DataGridCommandEventArgs) Handles DataGrid1.DeleteCommand
Dim deleteCmd As String
Dim deCommand As SqlCommand
deleteCmd = "DELETE FROM liuyan WHERE id=" & Int32.Parse(DataGrid1.Items(Int32.Parse(e.Item.ItemIndex.ToString())).Cells(0).Text)
deCommand = New SqlCommand(deleteCmd, SqlConnection1)
Try
deCommand.Connection.Open()
deCommand.ExecuteNonQuery()
Catch ex As SqlException
lblError.Text = "ERROR: Could not delete record from Orders Details table"
deCommand.Connection.Close()
Exit Sub
End Try
deCommand.Connection.Close()
End Sub