1o2y3j4f
发表于 2009-11-25 08:47:00
不错不错。谢谢啦!
tiantiansayy
发表于 2009-12-21 15:57:00
非常感谢,学习下
jixiecad2004
发表于 2010-5-25 18:14:00
<p>这个东西非常好</p>
xiaowen
发表于 2010-6-9 16:08:00
多谢楼主无私分享,学习中
zuehuo
发表于 2010-7-1 10:56:00
<p>好谢谢!</p>
haomeiqin
发表于 2011-12-12 20:50:41
非常感谢
很强大!很简单!
灰色轨迹
发表于 2012-4-27 15:38:14
高手,谢谢谢谢!
Real_King
发表于 2013-4-8 03:23:49
这个玩意儿大大的好!
陈亚娣
发表于 2013-4-8 07:37:52
不错,顶一下!!!
efan2000
发表于 2013-12-4 17:23:05
可以通过ARX的COM函数来实现,祥见其它主题。
Sub testAcedGetFileNavDialog()
Dim result As String
Debug.Print AcedGetFileNavDialog("选择文件", "图形 (*.dwg)", "dwg", "", 32, result)
End Sub
效果如下: