Foxtable(狐表)用户栏目专家坐堂 → 交叉统计时,日期(日)同时显示是星期几


  共有1664人关注过本帖树形打印复制链接

主题:交叉统计时,日期(日)同时显示是星期几

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/19 15:39:00 [显示全部帖子]

……
g.Build()
for each dc as datacol in dataTables("每日工时统计").datacols
if dc.caption like "*日" then
dim ss() as string = dc.caption.split("月")
dim d as date = new date(date.today.year,cint(ss(0)),cint(ss(1).trim("日")))
dc.Caption = dc.Caption & "-" & Format(d, "dddd")
end if
next
dataTables("每日工时统计").BuildHeader()

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/29 8:42:00 [显示全部帖子]

调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm,看哪一句代码出错

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/29 12:06:00 [显示全部帖子]

MessageBox.Show(1)改为MessageBox.Show(dc.caption),看出错时候 的标题名是什么

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/29 13:47:00 [显示全部帖子]

        Dim ss() As String = dc.caption.split("_")
        MessageBox.Show(2)
        Dim d As Date = New Date(Date.today.year, CInt(ss(0).trim("")), CInt(ss(1).trim("日")))

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/29 14:20:00 [显示全部帖子]

        dc.Caption = dc.Caption & "-" & Format(d, "dddd")
        MessageBox.Show(dc.Caption)

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/29 16:25:00 [显示全部帖子]

请上传实例说明

 回到顶部