阅读下一篇
谁能把vb语言翻译成VC呢Public Function Connect_ACAD() As Boolean Set ACADapp = CreateObject("AutoCad.application") Select Case VarType(ACADapp) Case vbEmpty Or vbNull Or vbError Connect_ACAD = False Case vbObject Set ACADdoc = ACADapp.Documents.Add()
回帖成功
经验值 +10
全部回复(3 )
只看楼主 我来说两句回复 举报
回复 举报