如何封装treeview

Question

几次封装treeview成dll都有问题，
请问各位大侠，封装treeview需要注意什么，谢谢．

Answer 1

以下程序在EXCEL-VBA中运行正常
Option Explicit
Private Sub UserForm_Initialize()
  Dim i As Long
  Dim j As Long
  Dim k As Long
  Dim Title As String
  Dim xNode As Node
  Dim NodeKey As String
  Dim NodeKey2 As String  With Me.TreeView1
    For i = 1 To 5
      Set xNode = .Nodes.Add
      NodeKey = "Node - " & i
      With xNode
        .Key = NodeKey
        .Text = "Node - " & i
        .Expanded = False
      End With
      For j = 1 To 7
        Set xNode = .Nodes.Add(NodeKey, tvwChild)
        NodeKey2 = "Node - Child - " & i & j
        With xNode
          .Key = NodeKey2
          .Text = "Child - " & j
        End With
        For k = 1 To 10
          Set xNode = .Nodes.Add(NodeKey2, tvwChild)
          With xNode
            .Text = "Child2 - " & k
          End With
        Next k
      Next j
    Next i
  End With  Set xNode = Nothing
End SubPrivate Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
  Me.Caption = Node.Text
End Sub
但封装dll时在这里出错．
  Dim xNode As Node

Answer 2

http://topic.csdn.net/t/20020711/09/865498.html
关于封装标准控件的问题
从这个帖子看，好像需要做点准备工作才能实现．请问需要什么准备工作．

Answer 3

添加对Microsoft Common Controls 5.0或者6.0（具体看你用的版本）的引用