Ya logré hacerlo:
Lo que hice fue crear un tipo de datos enum, as:
Código:
Public Enum Estilo
Numerico = 1
Texto = 2
End Enum
Entonces creé mi subrutina asi:
Private Sub nombre(param as Estilo)
end sub
y cuando llamé la subrutina, me salieron los parámetros numerico y texto
