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

    MsgBox's padrão

    avatar
    Convidad
    Convidado

    MsgBox's padrão Empty MsgBox's padrão

    Mensagem  Convidad em 14/10/2011, 20:41

    Saudações!

    É chato ter que definir todos aqueles parâmetros qdo usamos caixas de mensagem.
    Uma ideia pra pular a burocracia é usar algo como isto:
    Em um módulo novo ou de funções:

    ' título da MsgBox (ou para uso onde quiser)
    Global Const NomeAplic = "NomeDaSuaAplicação"

    Public Function Info(strMensagem As String)
    MsgBox strMensagem, vbExclamation, NomeAplic
    End Function

    Depois fica mais fácil: Info "Digite a mensagem entre aspas"
    Dá pra fazer n variações!

    Abraço!


    Última edição por norbs em 7/12/2011, 21:59, editado 1 vez(es)

      Data/hora atual: 29/11/2020, 15:47