主题：请教:计新增了多少行

Dim dt As DataTable = DataTables("订单")
Dim sum As Long
For Each dr As DataRow In dt.DataRows
If dr.RowState = DataRowState.Added Then
sum = sum + dr("数量")
End If
Next
Output.Show(Sum)

这是统计新增行的数量部总和.

我想统计新增了多少行.应该怎么做