主题：插入行和删除行的全局事件怎么改写

甜哥，蓝老师：

给您作揖了！

以下是两个按钮，目的是保持序号不变，全局事件该怎么改写，另外，插入行写在全局那个事件下面

插入行

Tables("表A").InsertNew()
For i As Integer = 0 To Tables("表A").Rows.count -1
    Tables("表A").Rows(i)("序号") = i + 1
Next

删除行

Tables("表A").Current.Delete
For i As Integer = 0 To Tables("表A").Rows.count -1
    Tables("表A").Rows(i)("序号") = i + 1
Next