office交流網(wǎng)--QQ交流群號(hào)

Access培訓(xùn)群:792054000         Excel免費(fèi)交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

access啟用篩選后,需要禁止篩選器

2020-02-20 08:00:00
tmtony8
原創(chuàng)
6002

如果記錄集很大,而你只希望查看與需求匹配的記錄子集,那么篩選器時(shí)很好的選擇

但是啟用篩選器后,最好提供一種禁用該篩選器的方式。將窗體的Filter屬性設(shè)置位空字符串時(shí)一種非常好的做法


Private Sub cmdClearFilter_Click()
  
  Me.Filter = vbNullString
  Me.FilterOn = False
  Me.cboQuickSearch.Value = Null
      
End Sub



在窗體中放置按鈕設(shè)置篩選器為禁用


如果創(chuàng)建窗體篩選器,然后保存設(shè)置了篩選器的窗體設(shè)計(jì),該篩選器將于窗體一起保存。

下次打開該窗體時(shí),保存的篩選器將處于活動(dòng)狀態(tài)。所以當(dāng)窗體關(guān)閉時(shí),也可以按上面的方法設(shè)置位空字符串


Private Sub Form_Close()
  
  ResetFilter
  
End Sub

Private Sub ResetFilter()
  
  Me.Filter = vbNullString
  Me.FilterOn = False
  
End Sub
    分享
    文章分類
    聯(lián)系我們
    聯(lián)系人: 王先生
    Email: 18449932@qq.com
    QQ: 18449932
    微博: officecn01
    移動(dòng)訪問