MaximoAccess

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

Obrigado

Administração do MaximoAccess

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


    [Resolvido]MsgBox Personalizado

    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3964
    Registrado : 06/11/2009

    [Resolvido]MsgBox Personalizado Empty [Resolvido]MsgBox Personalizado

    Mensagem  Assis em Sab 1 Dez - 16:48

    Boa noite Amigos


    A explicação está na imagem.

    Obrigado

    [Resolvido]MsgBox Personalizado Sem_ty67


    Relação entre as tabelas

    [Resolvido]MsgBox Personalizado 2sem_t12


    Última edição por Alexandre Neves em Dom 2 Dez - 10:02, editado 1 vez(es) (Razão : corrigido título, de 'MsgBox Personalzado' para 'MsgBox Personalizado')


    .................................................................................
    *** Só sei que nada sei ***
    FranklinJSP
    FranklinJSP
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 312
    Registrado : 25/02/2016

    [Resolvido]MsgBox Personalizado Empty Re: [Resolvido]MsgBox Personalizado

    Mensagem  FranklinJSP em Sab 1 Dez - 17:56

    Oi Assis

    Código:
    Dim ContaX
    ContaX = Dlookup("Conta","Banco","NBanco=" & Me.IDCaixa)
    MsgBox "Foi lançado......" & vbNewLine & "" & ContaX & "" & vbNewLine & "" & rst.Fields

    Saludos


    .................................................................................
    Meu Português não é muito bom,
    mas eu gosto de colaborar... em qualquer idioma
    Smile "Access... minha paixão"
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3964
    Registrado : 06/11/2009

    [Resolvido]MsgBox Personalizado Empty Re: [Resolvido]MsgBox Personalizado

    Mensagem  Assis em Sab 1 Dez - 18:36

    Não

    Fiz um registo da Conta com IdCaixa =2.

    Mas o ContaX devolveu a Conta com NBanco = 1


    .................................................................................
    *** Só sei que nada sei ***
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3964
    Registrado : 06/11/2009

    [Resolvido]MsgBox Personalizado Empty Re: [Resolvido]MsgBox Personalizado

    Mensagem  Assis em Sab 1 Dez - 19:00

    FranklinJSP

    Assim devolve o idCaixa certinho . 1; 2; 3 etc, porque o "idcaixa" está na tabela.

    MsgBox "Foi Lançado Um Movimento Pendente Registado " & vbNewLine & "Na Conta" & vbNewLine & "" & rst.Fields("idcaixa").Value &


    .................................................................................
    *** Só sei que nada sei ***
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]MsgBox Personalizado Empty Re: [Resolvido]MsgBox Personalizado

    Mensagem  Alexandre Neves em Sab 1 Dez - 19:59

    Boa noite
    Será
    MsgBox "Foi Lançado Um Movimento Pendente Registado " & vbNewLine & "Na Conta" & vbNewLine & Dlookup("Conta","Banco","NBanco=" & rst.Fields("idcaixa").Value) &


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3964
    Registrado : 06/11/2009

    [Resolvido]MsgBox Personalizado Empty Re: [Resolvido]MsgBox Personalizado

    Mensagem  Assis em Sab 1 Dez - 20:59

    Boa noite Alexandre Neves

    É

    Obrigado Bom domingo.


    .................................................................................
    *** Só sei que nada sei ***

    Conteúdo patrocinado

    [Resolvido]MsgBox Personalizado Empty Re: [Resolvido]MsgBox Personalizado

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Qua 11 Dez - 22:17