MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Variável = caixa de texto com valor nulo (erro)

    Compartilhe

    Tobiasfranca
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 33
    Registrado : 08/05/2013

    [Resolvido]Variável = caixa de texto com valor nulo (erro)

    Mensagem  Tobiasfranca em Qua 02 Jul 2014, 15:21

    Mais uma vez estou aqui precisando da ajuda de vocês, dessa vez o problema é o seguinte: estou desenvolvendo um sistema que emite RPA (recibo de pagamento de autônomo), tenho um formulário que contém algumas caixas de texto com uma fórmulas que somam os dados de campos de um subformulário, até ai tudo bem, nesse formulário também tenho um botão vinculado a um código que calcula o valor do IRRF, no inicio do código declarei as variáveis que irei utilizar e logo abaixo coloquei o vinculo das variáveis com as caixas de texto, exemplo:

    Private Sub bt_irrf_Click()

    Dim v_acumulado As Currency
    Dim v_atual As Currency
    Dim v_inss As Currency
    Dim v_subtotal As Currency
    Dim v_irrfdesc As Currency
    Dim v_dep As Integer
    Dim v_irrf As Currency
    Dim v_terceiros As Currency

    'Extração de dados so formulário para iniciar o calculo
    v_atual = Me.txt_valor
    v_inss = Me.txt_inss
    v_dep = Me.txt_dep
    v_irrfdesc = Me.txt_acumirrf
    v_terceiros = Me.txt_sestsenat
    (continuação do código...)

    quando clico no botão para rodar o código, ocorre um erro devido a algumas caixas de texto estarem com valor null e por esse motivo o código não continua sua execução. o que devo fazer?

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3195
    Registrado : 15/03/2013

    Re: [Resolvido]Variável = caixa de texto com valor nulo (erro)

    Mensagem  ahteixeira em Qua 02 Jul 2014, 16:17

    Ola,

    Antes efetuares a atribuição podes verificar se é nulo e fazer o tratamento do erro

    poderá ser

    Código:

    If IsNull(Me.txt_valor) then
       v_atual = 0
    else
       v_atual = Me.txt_valor
    endif

    No entanto verifica os comentários seguintes


    Última edição por ahteixeira em Qua 02 Jul 2014, 22:40, editado 1 vez(es)

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: [Resolvido]Variável = caixa de texto com valor nulo (erro)

    Mensagem  JPaulo em Qua 02 Jul 2014, 20:36

    As boas práticas da programação ditam o uso da função interna Nz para tratamento de nulos.

    Nz (SuaCaixaTexto. Value), 0



    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 920
    Registrado : 05/02/2010

    Variável=caixa de texto com valor nulo(erro)

    Mensagem  good guy em Qua 02 Jul 2014, 21:17

    Está corretíssimo nosso nobre moderador João Paulo.

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3195
    Registrado : 15/03/2013

    Re: [Resolvido]Variável = caixa de texto com valor nulo (erro)

    Mensagem  ahteixeira em Qua 02 Jul 2014, 22:38

    Obrigado colegas.
    Não tenho utilizado essa função nos meus projetos.
    Estamos sempre aprender.

    Tobiasfranca
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 33
    Registrado : 08/05/2013

    Re: [Resolvido]Variável = caixa de texto com valor nulo (erro)

    Mensagem  Tobiasfranca em Sex 11 Jul 2014, 11:51

    Consegui resolver esse problema, apesar da minha fórmula para calcular o IRRF não ter funcionado, agradeço a ajuda.

      Data/hora atual: Sab 03 Dez 2016, 04:37