主题：请问如何批量输入日期？

 方法一，用序列填充。

 新增足够多的行，然后填入2013-1-1，2013-1-2，然后选中该列的全部行，点序列填充。

http://www.foxtable.com/help/topics/0140.htm

 方法二，用代码

Dim d_start As Date = #1/1/2013#
Dim d_end As Date = d_start.AddYears(1)
Dim days As Integer = (d_end - d_start).TotalDays - 1

For i As Integer = 0 To days
    Dim r As Row = Tables("xxx").AddNew
    r("日期") = d_start.AddDays(i)
Next