Título da Dica: Declarando um tipo de variavel para colocar opcoes de uma assinatura
Postada em 1/3/2005 por :: Renato :: Declarando um tipo de variavel para escolher opcoes de uma assinatura
'Declaracao
Public Enum FuncaoCorOpcoes Azul = 1 Vermelho = 2 Preto = 3 End Enum
'Usando
Private sub FuncaoCor(Optional ByVal opcoesdecor As FuncaoCorOpcoes = FuncaoCorOpcoes.Azul)
select case opcoesdecor case FuncaoCorOpcoes.Azul txtNome.ForeColor = Color.Blue case FuncaoCorOpcoes.Vermelho txtNome.ForeColor = Color.Red case FuncaoCorOpcoes.Preto txtNome.ForeColor = Color.Black end select