Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:日期能否循环?

1楼
floor2 发表于:2010/4/8 16:34:00
 能否对日期进行循环?

dim i as date =#01/01/2010#
 for i to date.today()
........
next

这样错误,有什么办法对日期进行循环?谢谢

2楼
foxor 发表于:2010/4/8 16:43:00
没有问题,例如:
Dim d As Date = #2/28/2008#
for i as integer =1 to 3
Dim d1 As Date = d.AddDays(i)
messagebox.show(d1)
next
3楼
lxl 发表于:2010/4/8 17:14:00
Dim d As Date = #01/01/2010#
do while( d < Date.Today)
    '代码
    d = d.AddDays(1)
Loop
共3 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .08008 s, 2 queries.