以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  该字符串未被识别为有效的 DateTime。有一个从索引 11 处开始的未知字。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=59187)
--  作者：华琴
--  发布时间：2014/10/30 15:25:00
--  该字符串未被识别为有效的 DateTime。有一个从索引 11 处开始的未知字。

该字符串未被识别为有效的 DateTime。有一个从索引 11 处开始的未知字。

 

为什么有关日期的代码   突然都出现了这个错误？？

之前一直用的好好的   突然就成这个样子了……

 

代码 :

Dim Filter As String

With e.Form.Controls("交货日期1")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "交货日期 = #" & .Value & "#"
    End If
End With

If Filter > "" Then
    Tables("查询_订单表1").Filter = Filter
End If
--  作者：Bin
--  发布时间：2014/10/30 15:28:00
--  
Filter = Filter & "交货日期 = #" & format(.Value,"yyyy-MM-dd") & "#"
--  作者：华琴
--  发布时间：2014/11/3 9:00:00
--  
之前  那个代码  用的好好的  为什么突然都不能用了    要换成这个呀?
--  作者：有点甜
--  发布时间：2014/11/3 9:09:00
--  
以下是引用华琴在2014-11-3 9:00:00的发言：
之前  那个代码  用的好好的  为什么突然都不能用了    要换成这个呀?

 

 设置成短日期 http://jingyan.baidu.com/article/6dad5075f16e60a123e36e11.html