检查outlook文件夹是否存在

Question

以下 vb.net代码检查Outlook中是否存在ARS文件夹。

以下代码效果很好。

但我需要一个更好的代码。

更好的代码意味着不使用 On error goto 语句。

Answer 1

VBA没有结构化异常处理（在C ++，C＃，VB.Net中尝试/ catch或在Delphi中尝试/删除）。由于如果找不到指定的文件夹，MAPIFolder.Folders.Item会引发异常，因此VBA只能使用“on error goto”来处理异常。

在VBA.Net中，尝试以下内容（在我的脑海中）：

Try
   myNewFolder = myFolder.Folders("ARS")
Catch
  myNewFolder = myFolder.Folders.Add("ARS")
End Try