我需要一个msgbox，它会向我显示Outlook中收件箱中最早的电子邮件的日期，但是我已经找不到它了，但我已经粗略地尝试过了。
我知道它必须是一个简单的句子，但我无法找到它。
请有人给我任何暗示吗？只是一个简单的代码...
提前致谢。
答案 0 :(得分：0)
set folder = Application.Session.GetDefaultFolder(olFolderInbox)
set items = folder.Items
items.Sort "[ReceivedTime]", false
set oldestMessage = items.GetFirst
Msgbox oldestMessage.Subject & " " & oldestMessage.ReceivedTime