我想最簡單的辦法，是讓DT1 可以有自己的事件來處理

Dim WithEvents dt1 As New DataTable (這句話就將 DT1 變成有事件的物件了)

然後就有 以下事件可以用了
Private Sub dt1_ColumnChanged(sender As Object, e As DataColumnChangeEventArgs) Handles dt1.ColumnChanged End Sub Private Sub dt1_ColumnChanging(sender As Object, e As DataColumnChangeEventArgs) Handles dt1.ColumnChanging ' 備份修改前資料 請自行處理 有問題再提出來討論 End Sub Private Sub dt1_RowDeleting(sender As Object, e As DataRowChangeEventArgs) Handles dt1.RowDeleting ' 備份修改前資料 End Sub Private Sub dt1_RowDeleted(sender As Object, e As DataRowChangeEventArgs) Handles dt1.RowDeleted End Sub