SQL DATE - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → SQL DATE

共有2671人关注过本帖树形打印复制链接主题：SQL DATE

大红袍

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/19 10:38:00 [显示全部帖子]

Day(日期) As 日

http://www.foxtable.com/help/topics/0692.htm

http://www.foxtable.com/help/topics/1827.htm

大红袍

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/19 11:03:00 [显示全部帖子]

报什么错，有什么问题？

大红袍

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/20 9:26:00 [显示全部帖子]

cmd.CommandText = "Select Distinct Year(日期) As 年, Month(日期) As 月, Day(日期) As 日 Fro m {工作列表}"

大红袍

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/20 10:28:00 [显示全部帖子]

Case 2
            d1 = New Date(Year, Month, Day) '取得该月的第一天
            d2 = d1.AddDays(1)
            Filter = "日期 >= #" & d1 & "# And 日期 < #" & d2 & "#"

大红袍

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/20 19:24:00 [显示全部帖子]

DataColChanged事件

If e.DataCol.name = "第三列" Then
    If e.NewValue <> nothing Then
        e.DataRow("第四列") = format(e.NewValue, "dddd")
    Else
        e.DataRow("第四列") = Nothing
    End If
End If

下一主题 >> << 上一主题

主题：SQL DATE