主题：窗口录入与查询

我测试没问题的啊。直接这样写就行了

Dim Book As New XLS.Book(ProjectPath & "Attachments\采购订单一.xls")
Dim fl As String = ProjectPath & "Reports\采购订单一.xls"
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(2,0).Value = "<GroupHeader,订单审核_Table1,采购订单编号,1>"
Sheet(7,0).Value = "<GroupHeader,订单审核_Table1,采购订单编号>"
Sheet(8,0).Value = "<订单审核_Table1,采购订单编号,-20>"
Sheet(9,0).Value = "<GroupFooter,订单审核_Table1,采购订单编号>"
Sheet(12,0).Value = "<GroupFooter,订单审核_Table1,采购订单编号,1>"
Book.Build()
Book.Save(fl)
Dim Proc As New Process
Proc.File = fl
Proc.Start()