MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]Utilização do comando Enum....

    avatar
    Convidado
    Convidado


    [Resolvido]Utilização do comando Enum.... Empty Utilização do comando Enum....

    Mensagem  Convidado Qui 06 Dez 2012, 17:14

    Bem colegas.. sobre a utilização desse comando, alguem que possa dar uma explicação concisa sobre seu uso...

    Preciso retornar uma data no formato dd/mm/yyyy porém o mes está em formato texto e queria transformá-lo em numero, creio que o comando enum serviria.. não sei se estou certo...

    Algo assim:

    Enum NomeMes
    Janeiro = 1
    Fevereiro = 2
    Março = 3
    Abril = 4
    Maio = 5
    Junho = 6
    Julho = 7
    Agosto = 8
    Setembro = 9
    Outubro = 10
    Novembro = 11
    Dezembro = 12
    End Enum

    Mas como utilizar isso na concatenação da data?


    Cumprimentos.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Utilização do comando Enum.... Empty Re: [Resolvido]Utilização do comando Enum....

    Mensagem  criquio Qui 06 Dez 2012, 18:16

    Quem sabe tambem com as dicas desse tópico Very Happy


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    Convidado
    Convidado


    [Resolvido]Utilização do comando Enum.... Empty Re: [Resolvido]Utilização do comando Enum....

    Mensagem  Convidado Qui 06 Dez 2012, 18:22

    Bem amigos.. consegui da seguinte forma:

    Nas declarações do módulo do form:

    Enum NomeMes
    Janeiro = 1
    Fevereiro = 2
    Março = 3
    Abril = 4
    Maio = 5
    Junho = 6
    Julho = 7
    Agosto = 8
    Setembro = 9
    Outubro = 10
    Novembro = 11
    Dezembro = 12
    End Enum


    No código crio uma variável para receber a data concatenada

    Dim DiaMesAno as Date

    DiaMesAno = CDate(ctrl.Caption & "/" & Me.Month & "/" & Me.Year)

    Onde
    Ctrl.Caption = Dia
    Month = Dezembro (Aqui está o Enum, como a caixa texto Month apresentará o texto Dezembro, e este é o do indice 12 do comando enum, será retornado o valor 12)
    Year = Ano


    Cumprimentos.
    avatar
    Convidado
    Convidado


    [Resolvido]Utilização do comando Enum.... Empty Re: [Resolvido]Utilização do comando Enum....

    Mensagem  Convidado Qui 06 Dez 2012, 18:25

    Boas Meste dos Magos.. não havia visto tua mensagem...

    Te aguardo no Tópico sovre Registros de ddl e ativação de referências.

    Obrigado.

    Conteúdo patrocinado


    [Resolvido]Utilização do comando Enum.... Empty Re: [Resolvido]Utilização do comando Enum....

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Seg 06 maio 2024, 22:28