用代码说话，假如一个星期八天，今天星期一，10000天后是星期几？
用代码说话，假如一个星期八天，今天星期一，10000天后是星期几？
星期一，二，三，四，五，六，七，八
请用vb说明
今天2005.4.4
八天一个周期，1000天后，是周期的第几天？
问题点数：0、回复次数：12Top
1 楼wuyazhe（wyz&xyl）回复于 2005-04-04 19:32:43 得分 0
System.DateTime dt = System.DateTime.Today;
dt.AddDays(10000);
string strDate = dt.DayOfWeek.ToString();
MessageBox.Show(strDate);Top
2 楼wuyazhe（wyz&xyl）回复于 2005-04-04 19:34:08 得分 0
Dim dt As New System.DateTime()
dt = System.DateTime.Today
dt.AddDays(10000)
Dim strDate as String
strDate = dt.DayOfWeek.ToString()
MessageBox.Show(strDate)Top
3 楼wuyazhe（wyz&xyl）回复于 2005-04-04 19:47:28 得分 0
没仔细看，是8天一周啊。好说。当是8进制的就可以了
System.DateTime dt = System.DateTime.Today;
int nStartDay = (int)dt.DayOfWeek;
nStartDay+=10000;
string str = Convert.ToString(nStartDay,8);
nStartDay = int.Parse(str.Substring(str.Length-1,1));
System.DayOfWeek DAY = (System.DayOfWeek)nStartDay;
MessageBox.Show(DAY.ToString());Top
4 楼ncca（ncca）回复于 2005-04-05 08:09:18 得分 0
代码出错阿
也就是说用算法算出任意两天相隔的天数，然后除以八
重点是任意两天相隔的天数Top
5 楼qing_zhou（轻舟）回复于 2005-04-05 08:22:11 得分 0
10000对每周的天数（8）取模再加上当星期（1）就是那天的星期数Top
6 楼weiljj（）回复于 2005-04-05 08:29:01 得分 0
qing_zhou(轻舟)說得對呀,我昨晚就在看這道題,很奇怪為什麼所有的人都采用加上10000天這麼煩的方法.轻舟和我的想法一樣.Top
7 楼hamadou（闵峰--为了理想而奋斗）回复于 2005-04-05 08:31:13 得分 0
呵呵，有那么复杂吗？Top
8 楼syeerzy（快乐永远*先天下之乐而乐*后天下之忧而忧*）回复于 2005-04-05 08:39:30 得分 0
10000对每周的天数（8）取模再加上当星期（1）就是那天的星期数Top
9 楼wuyazhe（wyz&xyl）回复于 2005-04-05 08:52:59 得分 0
-_-
我错了。的确。取模就行了Top
10 楼tl_pear（飘叶寻梦）回复于 2005-04-05 09:44:15 得分 0
Dim arr As New ArrayList
arr.Add("星期一")
arr.Add("星期二")
arr.Add("星期三")
arr.Add("星期四")
arr.Add("星期五")
arr.Add("星期六")
arr.Add("星期七")
arr.Add("星期八")
MsgBox(arr(10000 Mod 8).ToString)Top
11 楼tl_pear（飘叶寻梦）回复于 2005-04-05 09:45:53 得分 0
哪一天为第一天，你可以调整一下顺序就可以了！Top
12 楼vzxq（灵感人）回复于 2005-04-05 10:14:14 得分 0
取模最简单了Top
