领悟:
PRivateSUbcommand1_click()'首先引用aCAD2009objectliBrary类型库dimmyaCADappasAutoCAD.aCADapplication,activedocasAutoCAD.aCADdocument,acmsasAutoCAD.aCADmodelspaceonerrorreSUmenextsetmyaCADapp=getobject(,"AutoCAD.application")'检查AutoCAD是否已经打开iferr0then....