Enumeradores

Cantas veces eu tiven que comprobar todo o código para ver porque o programa non estaba en calquera caso, e se ou seleccionar e depurar probra despois podo entender que era un pequeno erro o sexo dunha palabra usada para, por exemplo, ser un estado . Moitas veces se eu tivese usado acuerdaba "entrou" ou "entrou", "Open" ou Open "e afíns. O uso de enumeradores estandarisar realmente axuda a todos estes tipos de datos. E usando enumeradores temos a inestimable axuda de Intelisense nos dará a certeza de que estamos usando o valor correspondente.

 'Crear o TipoComprobante enumerador
 Public Enum TipoComprobante
 Factura = 1
 Consulte = 2
 NCredito = 3
 NDebito = 4
 End Enum

 "Creamos un voucher de clase (obxecto) con todas as súas propiedades
 "Para simplificar este exemplo, moito menos tipo pripiedad
 Proba Public Class
 Como privado _Tipo TipoComprobante

 Tipo de propiedade pública () As TipoComprobante
 Obter
 Volver _Tipo
 Obter End
 Set (ByVal value As TipoComprobante)
 _Tipo = Valor
 Set End
 End Property

 End Class

 "En GrabarComprobante subrotina usar un caso de selección para
 "Identificar o tipo de proba
 Public class Class1

 Public Sub GrabarComprobante (ByVal c como proba)

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

 Sub grabarFactura (ByVal c como proba)
 'Código para gravar a factura
 End Sub

 Sub grabarNCredito (ByVal c como proba)
 'Código para rexistrar a nota de crédito
 End Sub

 Sub grabarNDebito (ByVal c como proba)
 'Código para gravar a nota de cargo
 End Sub
 End Class

Agora non ser confundido co uso de enumeradores e IntelliSense no Visual Studio. Observe a Figura 1 e ver como mostra os distintos tipos que definimos no inicio. Isto acontecerá cando requirir empregar calquera valor definido polo tipo "TipoComprobante"