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

    MsgBox com "parte" em negrito

    Compartilhe

    CARNIEL
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 04/07/2012

    MsgBox com "parte" em negrito

    Mensagem  CARNIEL em Qui 02 Jan 2014, 13:52

    Srs. bom dia;

    Como negritar uma string dentro de  uma msgbox ?

    Estou usando o seguinte código:

    DoCmd.Beep
    If MsgBox("Pagamento MENOR que o vencimento !!!" & Chr(13) & Chr(13) & "Deseja gerar novo pagamento com o saldo restante ? " & Chr(13) & Chr(13) & "R$ " & Format(SaldoBx, "0.00"), vbYesNo, "Aviso de Baixa Parcial") = vbYes Then
    End If

    Queria que a parte "Format(SaldoBx, "0.00")" ficasse destacada em negrito !

    Achei aqui no fórum um ótima contribuição do Sr. JPAULO a função:

    Public Function FormattedMsgBox(Prompt As String, _
    Optional Buttons As VbMsgBoxStyle = vbOKOnly, _
    Optional Title As String = vbNullString, _
    Optional HelpFile As Variant, _
    Optional Context As Variant) As VbMsgBoxResult
       If IsMissing(HelpFile) Or IsMissing(Context) Then
           FormattedMsgBox = Eval("MsgBox(""" & Prompt & _
            """, " & Buttons & ", """ & Title & """)")
       Else
           FormattedMsgBox = Eval("MsgBox(""" & Prompt & _
            """, " & Buttons & ", """ & Title & """, """ & _
            HelpFile & """, " & Context & ")")
       End If
    End Function

    Porem, não estou conseguindo adaptar na minha msgbox, alguma dica ?

    Grato

    Carniel

    gilberlanio
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 597
    Registrado : 30/08/2010

    Re: MsgBox com "parte" em negrito

    Mensagem  gilberlanio em Qui 02 Jan 2014, 15:03

    Você já viu esse tópico.

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


    .................................................................................
    VIDEO CURSO DE ACCESS - Criando um sistema de vendas

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

    Loja virtual - Gilberlânio Rocha

    CARNIEL
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 04/07/2012

    Re: MsgBox com "parte" em negrito

    Mensagem  CARNIEL em Qui 02 Jan 2014, 17:48

    Obrigado pela atenção amigo;

    Ví sim, logo abaixo tem uma forma "menor" que parece faz o mesmo efeito feito pelo JPAULO (autor de vários Helps);

    Se possível gostaria de usar essa forma mais simplificada, estou aguardando ou o JPAULO ou alguém que tenha passado pela mesma situação me ajudar;

    Por hora muito obrigado;

    Carniel

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: MsgBox com "parte" em negrito

    Mensagem  HARYSOHN em Qui 23 Jan 2014, 00:01

    Csrniel, atente para colocar sua dúvida na sala correta.

    Este tópico será movido.


    Moderação


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    Avelino Sampaio
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3348
    Registrado : 04/04/2010

    Re: MsgBox com "parte" em negrito

    Mensagem  Avelino Sampaio em Qui 23 Jan 2014, 10:06

    Ola!

    Sugiro que crie um formulário para exibir a mensagem. No campo texto do formulário use o formato RICH TEXT

    Sucesso!


    .................................................................................
    ============ Quer aprender Access em alta velocidade ? ============

    || [Você precisa estar registrado e conectado para ver esta imagem.] Acesse o site UsandoAccess.com.br e veja um ótimo kit de ensino que tenho para você.

    ===========================================================

      Data/hora atual: Qua 07 Dez 2016, 18:15