3 participantes
[Resolvido]MsgBox Personalizado
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009
- Mensagem nº1
[Resolvido]MsgBox Personalizado
Última edição por Alexandre Neves em 2/12/2018, 13:02, editado 1 vez(es) (Motivo da edição : corrigido título, de 'MsgBox Personalzado' para 'MsgBox Personalizado')
.................................................................................
*** Só sei que nada sei ***
FranklinJSP- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 479
Registrado : 25/02/2016
- Mensagem nº2
Re: [Resolvido]MsgBox Personalizado
Oi Assis
Saludos
- 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
"Access... minha paixão"
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009
- Mensagem nº3
Re: [Resolvido]MsgBox Personalizado
Não
Fiz um registo da Conta com IdCaixa =2.
Mas o ContaX devolveu a Conta com NBanco = 1
Fiz um registo da Conta com IdCaixa =2.
Mas o ContaX devolveu a Conta com NBanco = 1
.................................................................................
*** Só sei que nada sei ***
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009
- Mensagem nº4
Re: [Resolvido]MsgBox Personalizado
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 &
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- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 8496
Registrado : 05/11/2009
- Mensagem nº5
Re: [Resolvido]MsgBox Personalizado
Boa noite
Será
MsgBox "Foi Lançado Um Movimento Pendente Registado " & vbNewLine & "Na Conta" & vbNewLine & Dlookup("Conta","Banco","NBanco=" & rst.Fields("idcaixa").Value) &
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- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009
- Mensagem nº6
Re: [Resolvido]MsgBox Personalizado
Boa noite Alexandre Neves
É
Obrigado Bom domingo.
É
Obrigado Bom domingo.
.................................................................................
*** Só sei que nada sei ***