Enumeradores

Cuantas veces tuve que revisar todo el codigo para ver porque el programa no entraba en alguna if o select case y despues de probra y depurar me daba cuenta que era un error menor como el genero de una palabra utilizada para, por ejemplo, guardar un estado. Muchas veces no me acuerdaba si había usado “ingresado” o “ingresada”, “Abierto” o Abierta” y cosas por el estilo. El uso de enumeradores ayuda mucho a estandarisar todos estos tipos de datos. Y al usar enumeradores contamos con la invaluable ayuda del intelisense que nos dará la certeza de que estamos usando el valor que corresponde.

'Creamos el enumerador TipoComprobante
Public Enum TipoComprobante
Factura = 1
Remito = 2
NCredito = 3
NDebito = 4
End Enum

'Creamos un (objeto) clase comprobante con todas las propiedades del mismo
'para simplificar este ejemplo solo dejé la pripiedad Tipo
Public Class Comprobante
Private _Tipo As TipoComprobante

Public Property Tipo() As TipoComprobante
Get
Return _Tipo
End Get
Set(ByVal value As TipoComprobante)
_Tipo = value
End Set
End Property

End Class

'En la subrutina GrabarComprobante usamos un select case para
'identificar el tipo de comprobante
Public Class Class1

Public Sub GrabarComprobante(ByVal c As Comprobante)

Select Case c.Tipo
Case TipoComprobante.Factura
grabarFactura(c)
Case TipoComprobante.NCredito
grabarNCredito(c)
Case
grabarNDebito(c)
End Select
End Sub

Sub grabarFactura(ByVal c As Comprobante)
'Código para grabar la factura
End Sub

Sub grabarNCredito(ByVal c As Comprobante)
'Código para grabar la Nota de Crédito
End Sub

Sub grabarNDebito(ByVal c As Comprobante)
'Código para grabar la Nota de Débito
End Sub
End Class

Ahora nunca más te vas a poder confundir gracias a la utilización de enumeradores y al intellisense de visual studio. Observa la Figura 1 y veras como se muestran los distintos tipo que definimos al principio. Esto sucederá siempre que necesitemos utilizar algun valor definido con el tipo “TipoComprobante”