How to cycle through each of property and its value of Class?
 

Hi all,

I just wonder a way to go through all the properties and each value.

I have a Class called clsFund and in it:
++++
Dim m_szName As String
Dim m_szID As String

Property Let pName(szName As String)
m_szName = szName
End Property

Property Get pName() As String
pName = m_szName
End Property

Property Let pID(szID As String)
m_szID = szID
End Property

Property Get pID() As String
pID = m_szID
End Property
++++

Then I want a For Each... loop like method to invoke in order to cycle
through each property (pName and pID) and it's value!

Thanks for your time.
---
Tetsuya Oguma, Singapore

How to cycle through each of property and its value of Class?
 

There is no built-in to list all the properties and methods of a class. You
would need to write something that read the class module and extracted it.

You can get it via Intellisense. Write some code that references the class,
then type the class object name and a . (dot) and the intellisense drop-down
shows you all the properties and methods.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Tetsuya Oguma" wrote in message
...
Hi all,

I just wonder a way to go through all the properties and each value.

I have a Class called clsFund and in it:
++++
Dim m_szName As String
Dim m_szID As String

Property Let pName(szName As String)
m_szName = szName
End Property

Property Get pName() As String
pName = m_szName
End Property

Property Let pID(szID As String)
m_szID = szID
End Property

Property Get pID() As String
pID = m_szID
End Property
++++

Then I want a For Each... loop like method to invoke in order to cycle
through each property (pName and pID) and it's value!

Thanks for your time.
---
Tetsuya Oguma, Singapore