Drop Down Properties

[Xavier]

Hi

How do you create drop down properties, eg. the Apperance property. You
know how it has two options:

0 - Flat
1 - 3D

Any help would be appreciated.

Thanks
Xavier

[Mattias Sjögren]

>How do you create drop down properties, eg. the Apperance property.

Xavier,

Use a public Enum as the property datatype.


Public Enum MyEnum
Yes
No
End Type

Public Property Get MyProp() As MyEnum
....
End Property

Public Property Let MyProp(ByVal RHS As MyEnum)
....
End Property


Mattias

__________________________________________________
Mattias Sjögren (MCP) - mattiass @ hem.passagen.se
VB+ http://hem.spray.se/mattias.sjogren/
Please send questions/replies to the newsgroups