see sample below

Class employeeclass
    Private m_first
    Private m_last
    Private m_salary

    Public Property Get first
        first = m_first
    End Property
    Public Property Let first(value)
        m_first = value
    End Property

    Public Property Set first(Value)
        set m_salary = value
    End Property
    
    Public sub List(value)
           Wscript.echo value
    end sub
    
    Public Function Combine(First, Last)
           Combine = trim(First) & " " & trim(last)
    end function
End Class

The code explorer finds everything except the [color=#0000FF]Get[/color]
Property.

-- 
<http://forum.pspad.com/read.php?2,61077,61094>
PSPad freeware editor http://www.pspad.com

Odpovedet emailem