在应用程序中, 我们都需要筛选窗体或者子窗体上的数据。如下面的示例,筛选选中的值
《按选中的字段值筛选子窗体上的数据》
当然我们也可以反向选择,筛选非选中的值的数据。通过排除与上一个选定的字段数据匹配的来筛选窗体上的数据
如下图,选中子窗体中的数据,筛选其没有匹配的数据,详细代码如下
Private Sub cmdCmdFilterExcludingSelection_Click() On Error GoTo ErrHandler Screen.PreviousControl.SetFocus DoCmd.RunCommand acCmdFilterExcludingSelection Exit SubErrHandler: Select Case Err.Number Case 2046 'Filter not available at moment MsgBox "Command not available" Case Else MsgBox Err.Number & vbCrLf & Err.Description End SelectEnd Sub
学习更多的access技巧源码,请关注office交流网:http://www.office-cn.net