Visual Basic - Crear Propiedades adicionales a un ActiveX

Tengo una inquietud :

He creado mi ActiveX ocx ...pero quiero crearle una propiedad q me permita ingresar un valor numerico pero solo entre 0 y 4
por ejemplo donde diga :
(que se muestre en las propiedades del control)

0 - significado0
1 - significado0
2 - significado0
3 - significado0
4 - significado0

Algo analogo a esto:
Asi como la propiedad BorderStyle de un formulario que cuando entras a cambiarle la propiedad se abre un combito y te sale

0- None
1-Fixed Single
2-Sizable
3-Fixed Dialog
4-....
5-.....

Como hago?
me podiran mostrar el codigo parahacer esto?

En el Modulo del OCX:
Option Explicit

Public Enum TipoPropiedad
Uno = 1
Dos = 2
Tres = 3
End Enum

Private mvarPropiedad As TipoPropiedad

Public Property Get Propiedad() As TipoPropiedad
Propiedad = mvarPropiedad
End Property

Public Property Let Propiedad(ByVal x As TipoPropiedad)
mvarPropiedad = x
End Property

Naturalmente deberías sustituir los valores por los que tu necesitas.