VB写的记事本 语法高亮部分出现的问题:编译错误 未找到方法或数据成员 求指点

如题，点击高亮按钮时下拉菜单是空白的没有内容，运行程序提示：编译错误 未找到方法或数据成员
不知道哪里出错了，请高手指点！

Private iLngCount As Integer
Private cd As New CDlg

Private Sub Highlighters_GetHighlighters(HighlighterName As String, HighlighterExt As String)
  AddMenu HighlighterName, HighlighterName, iLngCount
  iLngCount = iLngCount + 1
End Sub

Private Sub MDIForm_Load()     //运行到这里就停止了,提示出现错误//
  Highlighters.HighlighterDir = App.Path & "\highlighters"
  Highlighters.LoadHighlighters
  iLngCount = 0
  cd.MaxFileSize = 5000
End Sub --------------------编程问答-------------------- “highlighters”是什么东西。
highlighters.txt   ?
highlighters.mdb   ? --------------------编程问答-------------------- highlighters是一个文件夹,里面是语法高亮列表,包括vb c java等
是引用错误吗,还是别的什么,自己弄不明白了 --------------------编程问答-------------------- 应该是问你Highlighters.HighlighterDir中的对象变量Highlighters是什么控件或别的什么的吧 --------------------编程问答-------------------- 估计你是下了个高亮控件的范例，然后又没有注册那个控件就直接看源代码，结果就运行不起来了。你最好找一下有什么 .ocx 文件在你的范例里，找到了就注册一下，再开你的范例来看。
注册方法：
regsvr32 你的ocx控件路径，如：
regsvr32 c:\windows\system32\highlighters.ocx --------------------编程问答--------------------

引用 3 楼 bcrun 的回复:

应该是问你Highlighters.HighlighterDir中的对象变量Highlighters是什么控件或别的什么的吧

完整的代码发 给你帮我看看,可以吗,我也是从别的地方弄来的

补充：VB ,  基础类