主题：如何让新建的空行不参与排序？

表的CurrentChanged事件中有如下代码，如何修改让新增加的空行不参与排序呢？

If e.Table.Name = "订单窗口_Table1" Then
    Dim t As Table = Tables("订单窗口_Table2")
    With e.Table
        If .Current Is Nothing Then
            t.Filter = "False"
        Else
            t.Filter = "Cid = " & .Current("Cid")
            t.Sort="SubDivision,Mandator,OrDate"
        End If
    End With
End If