oyy0113 发表于 2009-9-20 21:54:00

求助关于块插入的VBA程序

在论坛几位前辈的帮助下,我写的一个块插入的程序已初见雏形。
现在还有个问题,我用
ptInsert = ThisDrawing.Utility.GetPoint(, "请指定插入点:")
语句获得块的插入点,用
ThisDrawing.ModelSpace.InsertBlock ptInsert, dwgDir, 1, 1, 1, 0
语句插入路径为dwgDir的块是可以的,但是我想在从屏幕上选取插入点的同时让块的图形跟鼠标一起出现和移动,也就是跟系统的块插入命令那样。不知道该怎么办啊?



求助关于块插入的VBA程序


雪山飞狐_lzh 发表于 2009-9-21 18:53:00

VBA是不能直接实现拖动的,Com库没有提供这种做法
有借用Arx的方法,但控制起来并不方便
页: [1]
查看完整版本: 求助关于块插入的VBA程序