理不清且、或、包含不包含的关系

不务实　发表于：2009-10-14 19:06:48 　

            If Not (Me.凭证日期 >= str33 And Me.凭证日期 <= str34 Or Me.凭证日期 >= str35) Then
             这个条件错在哪儿？应怎么写? 我搞了很多次,我搞不清    且、或、包含不包含的关系
            比如str33=2009-2-15 str34=2009-6-18   str35=2009-10-1
            我要求Me.凭证日期在 2009-2-15至2009-6-18 之间或大于2009-10-1 的值都充许，不在此范围的不允许
            MsgBox str33 & "-" & str34 & vbCrLf & "或" & vbCrLf & ">=" & str35, vbExclamation, "当年日期范围4"
            Cancel = True
            Me.凭证日期.Undo
            Exit Sub
            End If

Top

不务实发表于：2009-10-14 21:22:23

怎么没人?

我要求Me.凭证日期在 2009-2-15至2009-6-18 之间或大于2009-10-1 的值都充许，不在此范围的不允许

Top

trynew 发表于：2009-10-15 09:25:20

你的方法和逻辑都没错误，这个应该是数据类型错误，对于字符串类型（string）来说，"2009-8-1"是比"2009-10-1"大，你要比较日期大小，当然要用CDate( )函数转换成日期格式才能正确比较了。改成下面代码再试试：

If Not (CDate(Me.凭证日期) >= CDate(str33) And CDate(Me.凭证日期) <= CDate(str34) Or CDate(Me.凭证日期) >= CDate(str35)) Then

Top

不务实发表于：2009-10-15 10:33:26

我已经设计了Dim str33, str34, str35 As Date 呀

而且str33, str34, str35 的值都是来源于日期格式的