专家坐堂-导出EXCEL的问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

-- 导出EXCEL的问题

Dim ks As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")

Dim js As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker2")

Dim gys As String = "ABC"

Dim Book As New XLS.Book(ProjectPath & "Attachments\\入库报表.xls") \'打开模板

Dim Sheet As XLS.Sheet = Book.Sheets(0)

sheet(0,1).value = ""& ks.value &"至"& js.value &"入库明细"

Sheet(3,14).Value = "<[入库日期] >= \'" & ks.value & "\' And [入库日期] <= \'#" & js.value & "#\' and [供应商名称] = \'#" & gys & "#\' >"

Book.Build() \'生成细节区

Book.Save(ProjectPath & "Reports\\商品入库报表.xls") \'保存工作簿

Dim Proc As New Process \'打开工作簿

Proc.File = ProjectPath & "Reports\\商品入库报表.xls"

Proc.Start()

请问如果我导出指定了两个日期区间，想再加上一个条件这样写是不是不行？

另外，为什么我导出的数据里面序列号为什么不是从1开始的呢？