本人想参照帮助（http://www.foxtable.com/help/topics/1148.htm）最后部分，关于用代码控制日期列的命令，
来控制使用模板文件的日期列格式，代码如下，但没有效果，请帮助修改。
Dim dt As Table = Tables("交货记录")
Dim Book As New XLS.Book(ProjectPath & "Attachments\交货记录.xls") '使用模板导出
Dim Sheet As XLS.Sheet = Book.Sheets(0) '引用工作簿的第一个工作表
Dim dlg As new SaveFileDialog
dlg.Filter="excel文件|*.xls"
If dlg.ShowDialog = DialogResult.OK Then
Dim fl As String = dlg.FileName
'以下三行参照帮助中控制日期列导出
代码
Dim Style As XLS.Style = Book.NewStyle '定义新样式
Style.Format = "yyyy-MM-dd"
Sheet.Cols(dt.Cols("制单日期").Index).Style = Style
'Sheet.Cols(dt.Cols("制单日期").Index+1).Style = Style '改成这样也无效
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()
Else
Return 'Nothing
End If
[此贴子已经被作者于2014-6-2 23:00:17编辑过]
加好友 
发短信
Post By：2014/6/2 8:56:00 [只看该作者]
