activex控件的对象属性为什么没有出现在属性窗口中.txt

VB技巧问答10000例 VB技巧问答10000例

ADODB.Connection类 型 并 不 是 ActiveX控 件 的 标 准 类 型 ， 而 属 于 对 象 类 型 ， 如 果 一 个 对 象 属 性 出 现 在 属 性 窗 口 中 ， 则 Property Get函 数 在 设 计 时 必 须 返 回 一 个 字 符 串 ， 这 个 字 符 串 将 出 现 在 Visual Basic的 属 性 窗 口 中 。 例 如 Picture属 性 可 以 返 回 "(None)"、 "(Bitmap)"等 字 符 串 表 示 其 状 态 。 如 ： 
    Public Property Get Connection() As Variant 
     If Ambient.UserMode Then 
     ' 按 对 象 处 理 
     Else 
     Connection = "......." 
     End If 
     ......... 
    End Property 
    由 于 无 法 调 用 VB默 认 的 Connection属 性 设 置 属 性 页 ， 所 以 必 须 自 行 编 写 有 关 代 码 ， 这 当 然 比 较 麻 烦 ， 所 以 建 议 实 现 ConnectionString属 性 。 
<END>