[Resolvido]Titulo da MsgBox

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

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.

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"

Obrigado Amigos

Ótimo que deu certo Assis!

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