USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Estruturas
kairos
IPATINGA
MG - BRASIL
ENUNCIADA !
Postada em 07/02/2011 14:36 hs         
E ai galera,
Eu estava querendo fazer um Enum ou um Type de strings e não consigo
 
Tipo assim:
Enum TesteString
  EnumAprovado = "APROVADO"
  EnumRecuperação = "RECUPERAÇÂO"
  EnumReprovado = "REPROVADO" 
End Enum
Ou assim
Type TesteString
  TypeAprovado = "APROVADO"
  TypeRecuperação = "RECUPERAÇÂO"
  TypeReprovado = "REPROVADO" 
End Type
 
E nenhum dos dois funcionam.
O que eu queria seria o seguinte...
uma estrutura onde eu declare minhas consatantes string
dentro de um bloco para ser utilizado em todo meu sistema
EX:
  MeuExemplo.APROVADO
  MeuExemplo.RECUPERACAO
  MeuExemplo.REPROVADO
E retornaria o valor da string
 
se alguem tiver alguma ideia será bem vindo
valeu galera!!!!
 
   
Juan Carlos R.A
Pontos: 2843
MACEIO
AL - BRASIL
ENUNCIADA !
Postada em 08/02/2011 11:49 hs            
usando constantes pode ser?

Const NOMEINICIAL = "Carlos"
Const NOMEINICIAL1 = "Maria"
Const NOMEINICIAL2 = "Fernanda"
   
kairos
IPATINGA
MG - BRASIL
ENUNCIADA !
Postada em 08/02/2011 13:46 hs         
Valeu Carlos,
 
Mas eu não queria por constantes, queria saber se tem um modo tipo
o Enum que vc coloca o nome do enum .(ponto) o item que está lá dentro.
 
Com enum ele retorna o indice da variével, sera teria como fazer um que retorne
o nome da variavel?
 
Obrigado!!!
 
 
   
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
ENUNCIADA !
Postada em 11/02/2011 18:33 hs            
veja como funciona

com type se procede assim

Public Type ResultFinal
Aprovado As Boolean
Recuperacao As Boolean
Reprovado As Boolean
End Type

Dim lista As ResultFinal
lista.Aprovado = True
lista.Recuperacao = False
lista.Reprovado = False

com enum seria assim, lembre-se enum é ppara numerar.

Public Enum ResultFinal
Aprovado = 1
Recuperacao = 2
Reprovado = 3
End Type

Dim lista As ResultFinal
lista = Aprovado
' ou
lista = Recuperacao
' ou
lista = Reprovado



TÓPICO EDITADO
 
Página(s): 1/1    

CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página