Dim Book As New XLS.BookDim Sheet As XLS.Sheet = Book.Sheets(0)
Dim ifo As new FileInfo("d:\test.xls")Sheet(0,0).Value = Ifo.CreationTimeDim st As XLS.style = book.NewStylest.Format = "yyyy-MM-dd HH:mm:ss"
Sheet(0,0).style = stbook.Save("d:\abc.xls")