⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 用vb6.0开发activex控件,如何填加一个数组属性.txt

📁 以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题.对一些VB初学者很用.
💻 TXT
字号:
MSDN中 介 绍 的 方 式 和 ChartData属 性 是 不 同 的 。 
    如 果 你 象 使 用 MSDN中 这 样 方 式 , 通 常 你 的 控 件 中 应 该 有 一 个 数 组 来 保 存 用 户 的 设 置 , 例 如 : 
    Dim m_Things(10, 10) 
    Public Property Let Things(ByVal X As Integer, _ 
    ByVal Y As Integer, ByVal Thing As Variant) 
     m_Things(X, Y) = Thing 
    End Property 
    Public Property Get Things(ByVal X As Integer, _ByVal Y As Integer) As Variant 
     Things = m_Things(X, Y) 
    End Property 
    如 果 你 要 使 用 MSChart的 ChartData方 式 , 只 需 要 将 属 性 类 型 声 明 为 Variant就 可 以 了 。 
    Dim m_ChartData As Variant 
    Public Property Get ChartData() As Variant 
     ChartData = m_ChartData 
    End Property 
    Public Property Let ChartData(ByVal data As Variant) 
     m_ChartData = data 
    End Property 
    如 果 你 需 要 访 问 m_ChartData中 的 元 素 , 可 以 这 样 : 
    Print m_ChartData(0) 
<END>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -