出错了 作者: 海狸先生 时间: 2006-3-9 05:27
time >=#2006-3-8 18:00:03#作者: djhong 时间: 2006-3-9 05:48
不知道怎么对常规日期查询....看不懂了作者: djhong 时间: 2006-3-9 05:57
Private Sub Command6_Click()
Dim str As String
str = ""
If Not IsNull(Me.start) Then
str = str & "(time >= #" & Format(Me.start, "YYYYMMDDHHMMSS") & "#) and "
End If
If Not IsNull(Me.end) Then
str = str & "(time <= #" & Format(Me.end, "YYYYMMDDHHMMSS") & "#) and "
End If
If Len(str) > 0 Then
str = Left(str, Len(str) - 5)
End If
Me!表子窗体.Form.Filter = str
Me!表子窗体.Form.FilterOn = True