官方的帮助内，合并数据代码里，怎么格式化日期列 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

有时excel文件内日期列填写格式不正确，是否可以在以下代码里把日期列格化成DATE

Dim Book As New XLS.Book("c:\test\订单.xls")

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

Tables("订单").StopRedraw()

'注意以下数组中列名称的顺序,必须和Excel表中的列顺序一致

Dim nms() As String = {"编号","产品","客户","雇员","单价","折扣","数量","日期"}

'注意下面的循环变量从1开始，而不是从0开始，因为Excel表的第一行是标题

For n As Integer = 1 To Sheet.Rows.Count -1

Dim r As Row = Tables("订单").AddNew()

For m As Integer = 0 To nms.Length - 1

r(nms(m)) = Sheet(n,m).Value

Tables("订单").ResumeRedraw()

主题：官方的帮助内，合并数据代码里，怎么格式化日期列