首先感謝基姆拉爾森帶來這麼好的計算公式，本文采自《基姆拉爾森計算公式》百度百科。
算法如下：
基姆拉爾森計算公式(C++與VB.Net整數除法和取餘運算符不同)
W= (d+2*m+3*(m+1)/5+y+y/4-y/100+y/400)%7 //C++計算公式
W = (D + 2 * M + 3 * (M + 1) \ 5 + Y + Y \ 4 - Y \ 100 + Y \ 400) Mod 7 'VB.Net計算公式
在公式中d表示日期中的日數，m表示月份數，y表示年數。
注意：在公式中有個與其他公式不同的地方：
把一月和二月看成是上一年的十三月和十四月，例：如果是2004-1-10則換算成：2003-13-10來代入公式計算。
程序：
https://github.com/LifeSimpleLwq/calc_week
經抽象測試，計算結果正確。