GetFirst 方法

GetFirst 方法返回指定集合中的第一个对象。如果不存在第一个对象（例如，集合中不存在对象），将返回 Nothing。

注意  为确保 GetFirst、GetLast、GetNext 和 GetPrevious 方法在大集合中的正确操作，请在集合中调用 GetNext 方法前调用 GetFirst，并且在调用 GetPrevious 前调用 GetLast。为确保总是在同一集合中调用这些方法，请在进入循环前创建引用该集合的显式变量。

expression  必选。该表达式返回“应用于”列表中的一个对象。

示例

本 Visual Basic for Applications 示例使用 GetFirst 方法查找“任务”文件夹中的第一个文件夹，然后使用 Delete 方法删除该文件夹。

Set myOlApp = CreateObject("Outlook.Application")
Set myNameSpace = myOlApp.GetNameSpace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderTasks)
Set myOldFolder = myFolder.Folders.GetFirst
myOldFolder.Delete

如果使用 VBScript，则不创建 Application 对象，而且也不能使用命名常量。本示例说明如何使用 VBScript 执行相同任务。

Set myNameSpace = Application.GetNameSpace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(13)
Set myOldFolder = myFolder.Folders.GetFirst
myOldFolder.Delete