一.在Outlook中可以用 Debug.Pring + 内容 直接输出运行结果。不过需要用 ctrl+G 打开Immediate Window
二.下面的程序可以用来将一个 Date 类型转换为 String
Sub DateToString()
Dim d As Date
d = Now
Debug.Print (d)
Dim s As String
s = Format([d], "yyyymmddhhnnss")
Debug.Print (s)
End Sub
format具体用法可以参考 http://msdn.microsoft.com/en-us/library/gg251755.aspx