一个课表高亮显示问题

雨滴 · 发表于 2014-1-23 10:54

本帖最后由雨滴于 2014-1-23 11:48 编辑

要求：通过这个下拉列表，能在周一到周五的课程用颜色显示教师所教的班级的课程，目的是为了检查课表有无重复或进行微调。
排课软件排出来的课还要微调才能满足要求的，没办法，帮别人的，请高手帮助！要不工作量太多，且繁。

antlia · 发表于 2014-1-24 16:45

用程序实现了。中间自己走了点弯路，懒得改回来了，反正速度没问题。
测试了一下也没问题。

参考附件吧，点查询就会自动高亮显示该老师所授的课和总课时数。

雨滴 · 发表于 2014-1-24 23:38

谢谢啦，我基本能看懂程序意思，但有几个还是有问题，比如第四个人就能不高亮，能不能再改改。再次谢。

antlia · 发表于 2014-1-25 13:57

雨滴发表于 2014-1-24 23:38
谢谢啦，我基本能看懂程序意思，但有几个还是有问题，比如第四个人就能不高亮，能不能再改改。再次谢。

我看的全都高亮，不知道你说的什么问题。

雨滴 · 发表于 2014-1-25 13:59

节数不对呀。比如第四个人的就不能全部显示，总数应是12节，可只有9节课，有个别班没有高亮出来的。

antlia · 发表于 2014-1-25 14:55

高一下课表.zip (25.59 KB, 下载次数: 13)

雨滴发表于 2014-1-25 13:59
节数不对呀。比如第四个人的就不能全部显示，总数应是12节，可只有9节课，有个别班没有高亮出来的。

已经修改代码，已经能正确统计班级为17，18班的教师的授课课程高亮和节数合计。
具体参考附件

雨滴 · 发表于 2014-1-26 13:06

谢谢，还是不行，还是有个别教师的课不能高亮。

antlia · 发表于 2014-1-26 16:54

雨滴发表于 2014-1-26 13:06
谢谢，还是不行，还是有个别教师的课不能高亮。

已经知道问题所在了。是判断第16，17，18班级的授课教师在星期二、星期三、星期五的课表的时候出现的班级判断算法有误。上面的附件已经解决了17，18班的判断问题，但是16班的任课老师有问题。
这个从根本上解决了问题，即将来你这个表再扩展，只要表格逻辑不变，都不用修改代码了。
参考附件

Hilite_Z · 发表于 2014-1-26 21:34

antlia 发表于 2014-1-26 16:54
已经知道问题所在了。是判断第16，17，18班级的授课教师在星期二、星期三、星期五的课表的时候出现的班级 ...

大神，你啥都会啊？

雨滴 · 发表于 2014-1-29 16:23

谢谢呀，就是这几句不知是什么意思呢。
For Each r In lrng
         If r.Column <= 20 Then
            class = r.Column - 2
         Else
            class = r.Column Mod 18 - 2

         End If
         If class < 1 Then class = 18 + class

		自动登录	找回密码
密码			免费注册