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


2 participantes

    [Resolvido]Verificar se variavel foi atribuído valor

    avatar
    Claudemir P
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 27/06/2013

    [Resolvido]Verificar se variavel foi atribuído valor Empty [Resolvido]Verificar se variavel foi atribuído valor

    Mensagem  Claudemir P 31/12/2013, 02:24

    Ao verificar em módulo se uma variável "CodiCli" tem valor programa retorna ao terceiro segundo formulário sempre o registro 11.

    Código utilizado é:
    If IsNull(CodCli) = False Then
    Form_Form_AssistDet.Selecao_CodCliente = Form_Form_ClienteDetalhes.CodCliente
    CodCli = Null
    End If

    A variável num formulário anterior tem o valor atribuído pelo comando:
    CodCli = Form_Form_ClienteDetalhes.CodCliente

    Essa variável é explicita e também gera erro ao tentar limpar ela com:
    CodCli = Null

    Acredito que tenha alguns erros de ordem conceitual.
    avatar
    Mrsilva
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 123
    Registrado : 03/11/2011

    [Resolvido]Verificar se variavel foi atribuído valor Empty Re: [Resolvido]Verificar se variavel foi atribuído valor

    Mensagem  Mrsilva 31/12/2013, 03:12

    Olá.

    Verifique o tipo dessa variável, caso ela seja declarada com string (texto) não será aceito null, terá que limpar com ""

    Exemplo

    CodCli = ""

    Outra coisa se a variável for do tipo string essa parte do seu código abaixo pode falhar, caso ela seja verificada por esse código após ela ser limpa:

    If IsNull(CodCli) = False Then

    sempre vai retornar verdadeiro porque as aspas não é null

    Caso for string você pode verificar dessa forma

    If  Len(CodCli & vbNullString) > 0 then
    Form_Form_AssistDet.Selecao_CodCliente = Form_Form_ClienteDetalhes.CodCliente
    CodCli = ""
    End If

    Se a sua variável for do tipo numérica não será aceito null  você terá que colocar o valor zero é poderá fazer a verificação dessa forma
    If  CodCli > 0 then
    Form_Form_AssistDet.Selecao_CodCliente = Form_Form_ClienteDetalhes.CodCliente
    CodCli = 0
    End If

    Caso não resolva poste mais detalhes do seu código principalmente a declaração da variável,  exemplo:
    Dim CodCli as ?

    Até mais.
    avatar
    Claudemir P
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 27/06/2013

    [Resolvido]Verificar se variavel foi atribuído valor Empty Re: [Resolvido]Verificar se variavel foi atribuído valor

    Mensagem  Claudemir P 31/12/2013, 11:37

    Obrigado MrSilva, realmente a causa do problema residia nos conceitos da linguagem. Utilizava a variável pública tipo inteiro e passei a verificar se o valor é maior do que zero. Agora o problema é que quando ele executa o código informa variável não declarada, apesar de estar declarada no botão de chamada:

    Option Compare Database
    Option Explicit
    Public CodCli As Integer

    E utilizar a variável no módulo de verificação sem declarar, estou tentando encontrar a causa antes de postar um novo tópico, mas se tiver sugestão agradeço.
    avatar
    Mrsilva
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 123
    Registrado : 03/11/2011

    [Resolvido]Verificar se variavel foi atribuído valor Empty Re: [Resolvido]Verificar se variavel foi atribuído valor

    Mensagem  Mrsilva 31/12/2013, 11:59

    Olá.

    Tem necessidade da variável CodCli ser uma variável Publica?

    Caso sim

    Crie um modulo somente para isso e declare dentro do modulo exemplo:

    Option Compare Database
    Public CodCli As integer

    O erro ocorre porque você está declarando dentro de sub o restante do sistema não consegue ver essa informação

    Poste os códigos envolvidos para poder lhe ajudar melhor.

    Até mais.


    avatar
    Claudemir P
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 27/06/2013

    [Resolvido]Verificar se variavel foi atribuído valor Empty Re: [Resolvido]Verificar se variavel foi atribuído valor

    Mensagem  Claudemir P 6/1/2014, 12:07

    Olá.

    Mais uma vez funcionou, declarei a variável no módulo.
    Option Compare Database
    Public CodCli As integer

    E utilizei na rotina do botão novo:
    CodCli = 0

    Grato

    Conteúdo patrocinado


    [Resolvido]Verificar se variavel foi atribuído valor Empty Re: [Resolvido]Verificar se variavel foi atribuído valor

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 6/5/2024, 22:23