对不起了,帖子重开,请重新答复,上次的帖子我问题没有提好,

Question

部分代码如下:Dim Time As Variant
Set Rstemp = m_BillInterface.K3Lib.GetData("Select Distinct FCheckDate From t_BOS220000004 Where Fid = '" & Fid & "'")
Time = Format(Rstemp.Fields("FCheckDate"), "yyyy-mm-dd hh:mm:ss")问题一:我添加监视Rstemp ,FCheckDate的Value是#2009-01-04 AM 08:11:32#,而在立即窗口得到FCheckDate是 
2009-01-04 AM 08:11:32,我现在想搞清楚这条语句 Time = Format(Rstemp.Fields("FCheckDate"), "yyyy-mm-dd hh:mm:ss")中Rstemp.Fields("FCheckDate"), 的值到底是这样#2009-01-04 AM 08:11:32#, 还是2009-01-04 AM 08:11:32 
问题二: 
为什么执行以上语句Time的值仍然是2009-01-04 AM 08:11:32

Answer 1

'在 VB 代码中，两个 # 用来包含一个日期值，就好像字符串两边要用 " 一样，这是语法规则
Const CHECK_DATE = #2009-01-04 AM 08:11:32#'这是将一个日期值用默认（控制面板的设置）文字格式表示
Debug.Print FCheckDate'这是将一个日期值用指定（yyyy-mm-dd hh:mm:s）文字格式表示
Debug.Print Format(Rstemp.Fields("FCheckDate"), "yyyy-mm-dd hh:mm:ss")-- 这是 SQL 中的日期表示方式，不同数据库有不同，有的用 '、有的用 #
Select Distinct FCheckDate From t_BOS220000004 Where Fid = '2009-01-04 08:11:32'一个具体的日期值是一个纯逻辑的概念，可以用不同的文字表示，比如下面几个都等价：
今天下午1点
今年1月4日13点
2009-01-04 01:00:00 PM
2008-01-04 13:00:00