Foxtable(狐表)用户栏目专家坐堂 → 如何弄排班表?


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

主题:如何弄排班表?

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


加好友 发短信
等级:小狐 帖子:334 积分:2370 威望:0 精华:0 注册:2014/3/15 16:25:00
如何弄排班表?  发帖心情 Post By:2014/6/14 10:20:00 [显示全部帖子]

想弄下图那样的排班表,如何弄?

图片点击可在新窗口打开查看此主题相关图片如下:2014-06-14_10-18-38.jpg
图片点击可在新窗口打开查看


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


加好友 发短信
等级:小狐 帖子:334 积分:2370 威望:0 精华:0 注册:2014/3/15 16:25:00
  发帖心情 Post By:2014/6/14 12:34:00 [显示全部帖子]

给个思路色
是不是一个作数据表,
用窗口设计?

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


加好友 发短信
等级:小狐 帖子:334 积分:2370 威望:0 精华:0 注册:2014/3/15 16:25:00
  发帖心情 Post By:2014/6/14 18:11:00 [显示全部帖子]

能不能像日历那样子弄啊

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


加好友 发短信
等级:小狐 帖子:334 积分:2370 威望:0 精华:0 注册:2014/3/15 16:25:00
  发帖心情 Post By:2014/9/7 23:22:00 [显示全部帖子]

有没有人能给点例子?

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


加好友 发短信
等级:小狐 帖子:334 积分:2370 威望:0 精华:0 注册:2014/3/15 16:25:00
  发帖心情 Post By:2014/11/27 13:00:00 [显示全部帖子]

横排如何换成竖排?给点代码,我是菜鸟,谢谢

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


加好友 发短信
等级:小狐 帖子:334 积分:2370 威望:0 精华:0 注册:2014/3/15 16:25:00
  发帖心情 Post By:2014/12/1 21:29:00 [显示全部帖子]

转换中数字如何换成中文,还有如何自动调1周的数据。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.foxdb


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


加好友 发短信
等级:小狐 帖子:334 积分:2370 威望:0 精华:0 注册:2014/3/15 16:25:00
  发帖心情 Post By:2014/12/2 13:23:00 [显示全部帖子]

谢了,但有几个问题:
1、上面的月份能不能换成具体日期:2014.12.01或12.01都行; 
2、中间统计的数字能不能换成: 行、值、或等; 
3、在生成的表中能不能进行修改或增加数据,如增加人员名单等。谢谢了

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


加好友 发短信
等级:小狐 帖子:334 积分:2370 威望:0 精华:0 注册:2014/3/15 16:25:00
  发帖心情 Post By:2014/12/3 12:51:00 [显示全部帖子]

1、g.VGroups.AddDef("日期",DateGroupEnum.Day,"{0}日")

只能生成5日,我想要生成2014.12.05 ,如何修改; 
2、还有就是在临时表中能不能用代码编写编写drawcell事件

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


加好友 发短信
等级:小狐 帖子:334 积分:2370 威望:0 精华:0 注册:2014/3/15 16:25:00
  发帖心情 Post By:2014/12/3 23:01:00 [显示全部帖子]

1、排班表中窗口表中修改数据如何在排班中的同步,在统计表中可以同步?
2、统计表中的数字如何换成中文的,窗口表中的可以了?
3、窗口表中如何从排班类别中选数据进行填写?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:排班表.rar



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


加好友 发短信
等级:小狐 帖子:334 积分:2370 威望:0 精华:0 注册:2014/3/15 16:25:00
  发帖心情 Post By:2014/12/4 23:34:00 [显示全部帖子]

Dim y As Integer = Date.Today.Year
Dim w As Integer = Date.Today.DayOfWeek '算出今天是星期几
Dim dt1 As Date = Date.Today.AddDays(-w) '获取本周的第一天
Dim dt2 As Date = Date.Today.AddDays(6 - w) '获取本周的最后一天

Dim ndt As new DataTableBuilder("排版表")
ndt.AddDef("姓名", Gettype(String))
Dim dt_temp = dt1
Do While dt_temp <= dt2
    ndt.AddDef(dt_temp, Gettype(String), 32, "", dt_temp & "_" & WeekDayName(dt_temp.DayOfWeek+1))
    dt_temp = dt_temp.AddDays(1)
Loop


实际的日期和星期不一至,相差一天,是那里的问题?

 回到顶部
总数 18 1 2 下一页