폼필터를 적용하는 예제

www.softwaredevelopmentdeveloper.com

옥션 아이폰/아이팟 집에서 즐기기 롯데마트 11번가 주민등록번호 도용사실이 있는지 확인해 보세요! CJmall 회원가입 도메인 NO.1-호스팅 NO.1 든든한 웹파트너 가비아 ! 건담 전문몰 건담샵 No.1 중고차 쇼핑몰! SK엔카

아래출처는 http://ad.web2r.net/r.php?c=shop 입니다.If IsNull(Me.txtStartPo) Then If IsNull(Me.txtEndPo) Then 'nothing entered Me.FilterOn = False Else 'End but no start Me.Filter = "SomeField <= " & Me.txtEndPo Me.FilterOn = True End If Else If IsNull(Me.txtEndPo) Then 'Start, but no end Me.Filter = "SomeField >= " & Me.txtStartPo Me.FilterOn = True Else 'Both start and end Me.FilterOn = "SomeField Between " & Me.txtStartPo & " And " & _ Me.txtEndPo Me.FilterOn = True End If End If

크리에이티브 커먼즈 라이선스

이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-변경금지 2.0 대한민국 라이선스에 따라 이용하실 수 있습니다.

Share |