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]Alinhamento em MsgBox

    avatar
    Antonio Aurélio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 29/01/2014

    [Resolvido]Alinhamento em MsgBox Empty [Resolvido]Alinhamento em MsgBox

    Mensagem  Antonio Aurélio em 19/12/2018, 19:10

    Senhores, boa tarde.

    Deparei com uma dúvida e gostaria de saber se é possível ou não:

    Ao utilizar o msgbox, é possível alinhar as linhas uma abaixo da outro (linhas curtas), p. exemplo:


    If (me.Usuário) = 1 then
    Msbox "Valores disponíveis para o usuário ' - Teste: "
    " 2353 - Aplicação em Madeira"
    " 2380 - Aplicação em Plástico"
    " 2410 - Solvente"
    end if

    Isso pode ser útil para informar ao usuário os valores ou códigos ele pode utilizar sem recorrer a lista impressa.

    Agradeço.

    Abraços,

    Antonio Aurélio
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

    [Resolvido]Alinhamento em MsgBox Empty Re: [Resolvido]Alinhamento em MsgBox

    Mensagem  Assis em 19/12/2018, 20:39

    Assim

    [Resolvido]Alinhamento em MsgBox Sem_tz45


    .................................................................................
    *** Só sei que nada sei ***
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido]Alinhamento em MsgBox Empty Re: [Resolvido]Alinhamento em MsgBox

    Mensagem  vieirasoft em 19/12/2018, 21:48

    Di a As String

    If (me.Usuário) = 1 then
    a=Msbox ("Valores disponíveis para o usuário - Teste: & vbNewLine & 2353 - Aplicação em Madeira " & vbNewLine & 2380 - Aplicação em Plástico & vbNewLine & 2380 - Aplicação em Plástico & vbNewLine & 2410 - Solvente",vbYesNo,"Aviso")
    if a=vbYes Then
    seucódigo....

    end if
    avatar
    Antonio Aurélio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 29/01/2014

    [Resolvido]Alinhamento em MsgBox Empty Alinhamento em MsgBox

    Mensagem  Antonio Aurélio em 20/12/2018, 18:21

    Senhores, boa tarde.

    Sr. Assis, Sr. Vieira

    Agradeço suas orientações.

    O exemplo do Sr. Assis funcionará bem quando houver a necessidade de confirmação ou não de determinado lançamento (muito bom e oportuno).

    A orientação do Sr. Vieira era a minha dúvida.
    Assim, não haverá necessidade de se ter uma lista impressa.

    Agradeço pela atenção dispensada.

    Muito obrigado.

    Estou encerrando o tópico como resolvido.

    Abraços,

    Antonio Aurélio

    Conteúdo patrocinado

    [Resolvido]Alinhamento em MsgBox Empty Re: [Resolvido]Alinhamento em MsgBox

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 24/8/2019, 23:30