主题：[求助]自动新增一行

在最末一行输入字符或从下拉列表中选择值时，自动增加一行，有点类似于【高级筛选】

谢

以下是引用有点蓝在2017/1/13 23:02:00的发言：
自动增加行设置为true

不是这个意思。

''''自动增加行
If e.DataCol.Name = "编号组成" OrElse e.DataCol.Name = "格式设置" Then
    If e.DataRow.IsNull("编号组成") = False OrElse e.DataRow.IsNull("格式设置") = False
        Dim t As Table = Tables(e.DataTable.Name)
        If t.Current.Index = t.Rows.Count - 1 Then t.AddNew
    End If
End If

上述代码：增加2行，不知是什么原因