MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Titulo da MsgBox

    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

    [Resolvido]Titulo da MsgBox Empty [Resolvido]Titulo da MsgBox

    Mensagem  Assis em 28/8/2020, 12:19

    Boa tarde

    Neste código mudar o titulo da MsgBox como mostra a Imagem.

    Obrigado

    Public Function RequiredCharsDialog(RequiredCode As Integer)
    Dim NotPresent As String
    'Tratamento de erros na password
       If RequiredCode <> 0 Then
           NotPresent = "Requisitos obrigatórios:" & vbNewLine & vbNewLine
           If (RequiredCode And Not 15) = 16 Then: NotPresent = NotPresent & "Password Tem que ter no Mínimo 6 Caracteres" & vbNewLine & vbNewLine
           If (RequiredCode And Not 23) = 8 Then: NotPresent = NotPresent & "Password 1 Caracter Especial" & vbNewLine & vbNewLine
           If (RequiredCode And Not 27) = 4 Then: NotPresent = NotPresent & "Password 1 Letra Maiuscula" & vbNewLine & vbNewLine
           If (RequiredCode And Not 29) = 2 Then: NotPresent = NotPresent & "Password 1 Letra Minuscula" & vbNewLine & vbNewLine
           If (RequiredCode And Not 30) = 1 Then: NotPresent = NotPresent & "Password 1 Número" & vbNewLine & vbNewLine
     
           MsgBox NotPresent

       End If

    End Function

    [Resolvido]Titulo da MsgBox Sem_t159


    .................................................................................
    *** Só sei que nada sei ***
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3167
    Registrado : 21/04/2011

    [Resolvido]Titulo da MsgBox Empty Re: [Resolvido]Titulo da MsgBox

    Mensagem  Marcelo David em 28/8/2020, 13:22

    Grande Assis, confesso que pelo o tempo que lhe conheço aqui no Fórum, você já dominasse as MsgBox. Realmente surpreso.
    No entanto estamos aqui para aprender uns com os outros. Very Happy

    A sintaxe é muito simples:

    MsgBox "Sua mensagem aqui",vbInformation,"Título"

    vbInformation exibe um "I", vbQuestion uma "?", etc...

    Também como combinar um ícone com grupo de botões...

    Mas para o que você quer, basta fazer assim:

    MsgBox NotPresent,,"Aviso"


    Última edição por Marcelo David em 28/8/2020, 13:25, editado 1 vez(es)


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1148
    Registrado : 13/12/2016

    [Resolvido]Titulo da MsgBox Empty Re: [Resolvido]Titulo da MsgBox

    Mensagem  Alexandre Fim em 28/8/2020, 13:24

    Bom dia Assis,

    Coloque assim:

    MsgBox NotPresent, vbInformation, "Aviso"


    Boa sorte


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

    [Resolvido]Titulo da MsgBox Empty Re: [Resolvido]Titulo da MsgBox

    Mensagem  Assis em 28/8/2020, 13:33

    Obrigado Amigos


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

    Marcelo David gosta desta mensagem

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1148
    Registrado : 13/12/2016

    [Resolvido]Titulo da MsgBox Empty Re: [Resolvido]Titulo da MsgBox

    Mensagem  Alexandre Fim em 28/8/2020, 13:36

    Valeu Assis...boa sorte!!!

    Marcelo, enquanto eu estava mandando a mensagem, vc já tinha enviado...não vi..me desculpe



    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.

    Marcelo David gosta desta mensagem

    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3167
    Registrado : 21/04/2011

    [Resolvido]Titulo da MsgBox Empty Re: [Resolvido]Titulo da MsgBox

    Mensagem  Marcelo David em 28/8/2020, 13:41

    Ótimo que deu certo Assis! Very Happy

    Alexandre, esse Fórum
    é tão bom o quanto é devido a pessoas iguais a você.
    Tem conhecimento e repassa as informações! Parabéns!


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)

    Kaynan gosta desta mensagem

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1148
    Registrado : 13/12/2016

    [Resolvido]Titulo da MsgBox Empty Re: [Resolvido]Titulo da MsgBox

    Mensagem  Alexandre Fim em 28/8/2020, 14:34

    Marcelo,
    Não é a toa que vc é um Moderador.
    Sempre atento às dúvidas dos membros do fórum.
    Além de resolver a questão do amigo Assis, ainda sugeriu outras formas de exibir a mensagem.
    Isso chama-se Excelência.

    Parabéns !!!



    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.

    Marcelo David e Kaynan gostam desta mensagem


      Data/hora atual: 28/9/2020, 10:14