发信人: zhxudong()
整理人: cobe(2000-11-25 21:22:12), 站内信件
|
【 在 smallsyw (麦子) 的大作中提到: 】
: 多谢！
: 请在回复时打勾！！！
dim strYear as string
dim iYear as integer
strYear=""
if (iYear mod 4=0 and iYear mod 100 <>0) or (iYear mod 400=0 ) then
strYear="闰年"
endif
--
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.100.73.242]
|
|