1/6加载SUPPORT有菜单文件的路径
1/6加载SUPPORT有菜单文件的路径Private Sub CommandButton37_Click()
' 增加SUPPORT（有菜单）的搜索路径,注意SUPPORT（有菜单）是可以加载两个以上的，如果有相同的，以首先找到的为准
'再有，象我们再加载菜单P时，对话框会显示C盘深深路径的SUPPORT，还是显示本代码加载的路径呢？实际是显示本代码加载的路径。说明菜单文件显示路径与文件夹的加载顺序无关，而是和acad.mnc这个主菜单到底在那个文件夹A中有关，在A则显示A
Dim ACADPref
Set ACADPref = ThisDrawing.Application.preferences.Files'文件
ACADPref.SupportPath = ACADPref.SupportPath & ";" & "D:\00邓细木CAD插件汇总\CAD每天都在使用的C盘深处的2005SUPPORT文件夹" '添加文件支持路径
End Sub
页:
[1]