Re: [VB6 ] class的取得或設定要怎麼寫

[blackAIX ()]

※ 引述《noar (小安)》之銘言：
: 我圳盡在寫一個class
: 不過遇到一個問題
: 在VB .NET取得或是設定的寫法是
:             Get
:                 Return m_sPassword
:             End Get
:             Set(ByVal Value As String)
:                 m_sPassword = Value
:             End Set
: 那想請教在VB6要如何達到類似的功能

假設你已經寫好class了

Private m_blnEnabled As Boolean '全域變數

Friend Property Get Enabled() As Boolean
    Enabled = m_blnEnabled
End Property

Friend Property Let Enabled(ByVal blnValue As Boolean)
    m_blnEnabled = blnValue
End Property

這是你要的答案嗎？？

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 218.170.102.41
推 noar:是的，不過我是把Friend改成Public 才可以呼叫到