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