hutao722 发表于 2006-5-19 22:48:00

请教如何由鼠标点击块得到其句柄？

仿照《 vba 二次开发》中第14章，写了一个窗体模块，主要用来通过鼠标点击块，获取块的句柄。主要用到以下代码，但发现句柄为空，而且程序也不认点击的块，请高手指点，谢谢
ThisDrawing.Utility.GetEntity obj,basepnt,vbCrLf & "选择"
entHandle=obj.Handle
If Not Typeof obj Is AcadBlock Then Exit Sub
页: [1]
查看完整版本: 请教如何由鼠标点击块得到其句柄？