|
1.Dim objDbx As AxDbDocument 把As AxDbDocument 注释掉可以执行,但不注释掉显示:用户定义类型未定义。
2 objDbx.CopyObjects blkObj, ThisDrawing.ModelSpace
ThisDrawing.ModelSpace.InsertBlock pnt, blkName, 1, 1, 1, 0
这两行不知道是什么意思,象是函数但没有括号.我把第二行改成ThisDrawing.ModelSpace.InsertBlock( pnt, blkName, 1, 1, 1, 0)显示缺少"="号.
3 Me.Hide
这个Me是不是C++里的this的意思,我把Me去掉好象也可以. |
|