Folders.GetNext 方法 (Outlook)
返回 Folders 集合中的下一个对象。
语法
expression。 GetNext
表达 一个代表 Folders 对象的变量。
返回值
一个表示集合包含的下一个对象的 Folder 对象。
备注
如果不存在下一个对象(例如,如果已定位在集合的末尾),则返回 Nothing。若要确保在大型集合中正确操作 GetFirst、GetLast、GetNext 和 GetPrevious 方法,请在调用该集合上的 GetNext 之前调用 GetFirst,并在调用 GetPrevious 之前调用 GetLast。 要确保您始终在同一集合下生成的调用,请创建引用在进入循环前该集合的显式变量。
示例
下面的 Visual Basic for Applications 示例将在 "收件箱" 的子文件夹中搜索名为 MyPersonalEmails 的文件夹,并向用户显示消息。 如果收件箱文件夹中没有名为 MyPersonalEmails 的子文件夹,则本示例将不显示任何内容。
Sub TestGetNext()
Dim nsp As Outlook.NameSpace
Dim mpf As Outlook.Folder
Dim mpfSubFolder As Outlook.Folder
Dim flds As Outlook.Folders
Dim idx As Integer
Set nsp = Application.GetNamespace("MAPI")
Set mpf = nsp.GetDefaultFolder(olFolderInbox)
Set flds = mpf.Folders
Set mpfSubFolder = flds.GetFirst
Do While Not mpfSubFolder Is Nothing
If mpfSubFolder.Name = "MyPersonalEmails" Then
MsgBox "The folder was found."
Exit Do
End If
Set mpfSubFolder = flds.GetNext
Loop
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback.
Coming soon: Throughout 2024 we will be phasing out GitHub Issues as the feedback mechanism for content and replacing it with a new feedback system. For more information see:提交和查看相关反馈