主题：关闭窗口前判断如何实现？

试试

'根据DataTable获取一个System.Data.DataTable类型变量
Dim t As System.Data.DataTable = CurrentTable.DataTable.BaseTable
'获取新增行数
Dim t1 As System.Data.DataTable = t.GetChanges(System.Data.DataRowState.Added )   '新增行
If t1 IsNot Nothing Then Output.Show("新增" & t1.Rows.Count)
'获取修改行数
Dim t2 As System.Data.DataTable = t.GetChanges(System.Data.DataRowState.Modified )   '修改行
If t2 IsNot Nothing Then Output.Show("修改" & t2.Rows.Count)
'获取已删除行数
Dim t3 As System.Data.DataTable = t.GetChanges(System.Data.DataRowState.Deleted )   '已删除行
If t3 IsNot Nothing Then Output.Show("删除" & t3.Rows.Count)