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


3 participantes

    [Resolvido]Valor de Variável

    avatar
    elemke
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 25/05/2010

    [Resolvido]Valor de Variável Empty [Resolvido]Valor de Variável

    Mensagem  elemke Sex 13 maio - 16:58

    Prezados,

    É possível eu pegar o valor de uma variável de outro módulo?

    Por exemplo: Tenho a variável X no módulo modulo1, quero pegar o valor dessa variável e atribuir para a variável Y do módulo2.

    Modulo1

    Dim X As String
    X = InputBox("Informe a Data Inicial (xx/xx/xxx):", "Informar Data")

    Modulo2
    Dim Y As String
    Y = (quero que ele pegue o valor atribuído a variável X no módulo1)
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8498
    Registrado : 05/11/2009

    [Resolvido]Valor de Variável Empty Re: [Resolvido]Valor de Variável

    Mensagem  Alexandre Neves Sex 13 maio - 18:27

    Boa noite, elemke

    Defina a variável como global
    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]Valor de Variável Empty Re: [Resolvido]Valor de Variável

    Mensagem  criquio Sex 13 maio - 19:11

    Só um lembrete: cuidado para não ter duas variáveis de mesmo nome, uma em um módulo e outra no outro, a menos que essa variável não for ser usada no outro módulo.


    .................................................................................
    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
    elemke
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 25/05/2010

    [Resolvido]Valor de Variável Empty Re: [Resolvido]Valor de Variável

    Mensagem  elemke Sex 13 maio - 21:48

    Senhores,

    Poderiam me ajudar com exemplos? como declaro a variável global?
    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]Valor de Variável Empty Re: [Resolvido]Valor de Variável

    Mensagem  criquio Sex 13 maio - 22:00

    Public Funtion NomeDaFuncao()
    Dim X As String
    X = InputBox("Informe a Data Inicial (xx/xx/xxx):", "Informar Data")
    End Funtion


    Isso pode ser feito dentro do formulário ou em um módulo separado.


    .................................................................................
    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
    elemke
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 25/05/2010

    [Resolvido]Valor de Variável Empty Re: [Resolvido]Valor de Variável

    Mensagem  elemke Sex 13 maio - 22:54

    Criquio,

    Ja tinha declarado a funcao como publica, porem, preciso fazer algo para que os outros módulo reconheçam essa variável? Pois simplesmente declarando ela numa sentenca de SQL nao deu certo.

    Veja meu módulo onde declarei as variáveis:


    Public Function liberacoes()

    Dim dtInicial As String
    Dim dtFinal As String
    dtInicial = InputBox("Informe a Data Inicial (xx/xx/xxx):", "Informar Data")
    dtFinal = InputBox("Informe a Data Final(xx/xx/xxx):", "Informar Data")

    lib_emp.lib_emp - Aqui estou chamando função de outro módulo, que vai utilizar as variáveis acima, preciso fazer algo nesse módulo?


    End Function

    Conteúdo patrocinado


    [Resolvido]Valor de Variável Empty Re: [Resolvido]Valor de Variável

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Sex 22 Nov - 10:42