窗口1中,插入一个Table控件,类型为
Normal表,插入一个 DropDownBox控件,Click事件代码
Dim Filter As String
With e.Form.Controls("dropBox1")
If .Value IsNot Nothing Then
Filter = "类别 = '" & .Value & "'"
End If
End With
If Filter > "" Then
Tables("窗口1_Table1").Filter = Filter
End If
当我对窗口1_Table1筛选后,新增一行,新增的一行为什么也被筛选掉了,我新增行的时候不是没点击控件吗,应该没启动Filter。