# Re: Active X Dll 的问题

Posted by Sephiroth on June 24, 1999 at 16:57:17:

In Reply to: Active X Dll 的问题 posted by ling on June 24, 1999 at 13:17:37:

: 在form 我们可以将控制项贴到
: 上面然后使用那个控制项的属性及方法等,那在没有form
: 里时如何来使用呢? 这个问题困扰了我很久我问过别人
: 说要Call 最底层的但是我不太明白可否烦请站长解答
: 一下小妹感激不尽

你的问题问的不太清楚, 姑且认为是:"在 Class Module 中要如何使用 Control 的属性, 方法, 事件吧"

可以在 Class 中这么写:

Option Explicit

Private WithEvents mobjTreeView As TreeView ' 或 As Object, 至于有何不同不在此赘述

Public Property Set oControl(ByVal vData As TreeVoew)
Set mobjTreeView = vData
End Property

Private mobjTreeView_NodeClick(ByVal Node As ...)
...
End Sub

程式大概就是这样, 不过马赛克好像打太多了 ^_^
我都是用这种方式来再包装控制项, 再进一步把 Class 包到 UserControl中, 让 UserControl 去
Bind TreeView, 这样不就完成了一个高生产力的 Class 了吗?

Follow Ups: