1. 程式人生 > >CAD2014 VBA 窗體動態新增元件事件程式碼的報錯方法

CAD2014 VBA 窗體動態新增元件事件程式碼的報錯方法

  今天嘗試用VBA來給CAD的使用者窗體動態新增元件,看了網上很多教程,總是提示:無法找到工程或庫,很頭疼。

  程式設計環境W7 64bit + CAD2014。

  參考了很多網上的例子,也引用了關鍵的執行庫,總是報錯:無法找到工程或庫。

  經過一段時間的摸索,關鍵點就在於,VBE的引用的問題。

下面例子裡的紅色高亮的欄位就是需要大家注意的。

Sub AddCode()
  With VBE.ActiveVBProject.VBComponents("模組2").CodeModule
    .InsertLines 1, "Public sub cb_Click()"
    .InsertLines 2, "msgbox ""Hello"""
    .InsertLines 3, "end sub"
  End With
End Sub