InvisibleApp.DrawingPaths 属性 (Visio)

获取或设置 Microsoft Visio 查找绘图的路径。 读/写。

语法

表达式DrawingPaths

表达 一个代表 InvisibleApp 对象的变量。

返回值

String

备注

默认情况下,DrawingPaths 属性设置为空字符串 ("")。

传递给 DrawingPaths 属性并从中接收的字符串与“ 文件位置 ”对话框中显示的字符串相同, (“ 文件 ”选项卡“ >选项>”“高级>常规>文件位置 ”) 。 此字符串存储在 HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Visio\Application\DrawingsPath 子项中。

Visio 在 DrawingPaths 属性中指定的所有路径及其所有子文件夹中查找绘图。 如果将 DrawingPaths 属性传递给 EnumDirectories 方法,它将返回传入的文件夹中的完全限定路径的完整列表。

设置 DrawingPaths 属性将替换“文件位置”对话框中 DrawingPaths 的现有值。 若要保留现有值,请获取现有字符串,然后将新文件路径追加到该字符串,如以下代码所示。

Application.DrawingPaths = Application.DrawingPaths & ";" & "newpath".

警告

以任何方式修改 Windows 注册表(无论是在注册表编辑器中还是在以编程方式)始终都会带来一定程度的风险。 不正确的修改会导致严重的问题,可能需要重新安装操作系统。 最好在修改计算机的注册表之前始终对其进行备份。

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。