以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 怎么写周期循环代码 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=87674) |
-- 作者:飞云 -- 发布时间:2016/7/16 16:52:00 -- 怎么写周期循环代码 您好,比如在一段时间内(7月15日至9月15日)每周三、五或二、四、六(不固定,自己选)等做为循环的重复提醒的日期,那么代码要怎么写,我用CheckedListBox控件,然后添加到表中,谢谢。 |
-- 作者:Hyphen -- 发布时间:2016/7/16 17:05:00 -- 比较当前日期的周数是否在选择的周数内,如果是就提醒 Dim lst As new List(of Integer) lst.Add(3) lst.Add(5) If lst.Contains( Date.Today.DayOfWeek) Then msgbox("提醒") |