locked
Variavel Publica RRS feed

  • Pergunta

  • OLA A TODOS,

    ALGUÉM PODERIA ME EXPLICAR COMO EU DECLARO UMA VARIÁVEL PUBLICA (EM NÍVEL DE MÓDULO). EU DEVO CRIAR UMA SUB OU UMA FUNCTION ??

    AGRADEÇO A TODOS

    FORTE ABRAÇO PAULO

    quinta-feira, 17 de julho de 2008 00:29

Respostas

  • Olá,

     

    coloque no início de todos os módulos a opção

     

    Option Explicit

     

    e mande Depurar > Compilar, logo verá os erros.

     

    Use

     

    me.teste = Forms!Form1.SUBTOTAL1

     

    O Form1 deve estar aberto.

    terça-feira, 22 de julho de 2008 00:25
    Moderador

Todas as Respostas

  • Uma variável pública não fica dentro de um Sub ou Function. Deve declarar fora deles, deste modo:

     

    Public MinhaVariavel As String

     

    quinta-feira, 17 de julho de 2008 21:13
  • Paullo,

     

    Como já mencionado, o fato de vc declarar fora da Function ou Sub além de atender a sua necessidade, lhe dá o melhor método de organização de código, pois mostra justamente que aquela variável será usada em qualquer parte do código.

     

    [ ]s.

     

    sexta-feira, 18 de julho de 2008 20:01
  • Agradeço a atenção dos amigos

     

    O problema é que eu não consigo recuperar o valor desta variavel para utilizar num campo calculado em outro formulário

     

    abraços a todos

    Paulo

    domingo, 20 de julho de 2008 23:43
  •  

    Paullo,

     

     

    poste aqui como vc está fazendo..

    poste o código..

     

     

    segunda-feira, 21 de julho de 2008 22:54
  • Ola Douglas

     

    Vou colocar um exemplo de como eu estava fazendo

     

    Em um módulo eu estava declarando

    Dim SUBTOTAL1 as integer

     

    (depois troquei para) - Public SUBTOTAL1 as integer

     

    No FORM1 eu realizava alguns cálculos e o resultado eu atribuia à variável

     

    SUBTOTAL1 = me.tot_form1

     

    no FORM2 eu tentei chamar a variável

     

    me.teste = SUBTOTAL1 e só me retorna em branco a caixa de texto

     

    Obrigado pela ajuda

     

    Paulo

    segunda-feira, 21 de julho de 2008 23:42
  • Olá,

     

    coloque no início de todos os módulos a opção

     

    Option Explicit

     

    e mande Depurar > Compilar, logo verá os erros.

     

    Use

     

    me.teste = Forms!Form1.SUBTOTAL1

     

    O Form1 deve estar aberto.

    terça-feira, 22 de julho de 2008 00:25
    Moderador