bsp; offset = offset + Temp Next Else ''''在闰月后 If mvarIsLeap = False Then ''''用户要计算非闰月的月份 For i = 1 To m - 1 Temp = lMonthDays(y, i) ''''计算非闰月天数 offset = offset + Temp Next If m > leap Then Temp = leapDays(y) ''''计算闰月天数 offset = offset + Temp End If
Else ''''此时只有mvarisleap=ture, For i = 1 To m Temp = lMonthDays(y, i) ''''计算非闰月天数 offset = offset + Temp Next End If End If
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
