28,376
社区成员




s = "11,22,33,44,55" ‘经理的字串
ar = split(s, ",") ’把经理们转成数组
FirstDate = CDate("2014-12-31") ‘第一天的前一天
CurrentDate = CDate("2015-02-12") ‘今天谁值班的日子
Diff = datediff("d", FirstDate, CurrentDate)
Pos = Round(Diff/7.0000000001+0.5)
arIndex = (Pos-1) mod 5
msgbox ar(arIndex) ’获得今天谁值班