Propósito

✔ Programação GLOBAL® - Quaisquer soluções e/ou desenvolvimento de aplicações pessoais, ou da empresa, que não constem neste Blog devem ser tratados como consultoria freelance. Queiram contatar-nos: brazilsalesforceeffectiveness@gmail.com | ESTE BLOG NÃO SE RESPONSABILIZA POR QUAISQUER DANOS PROVENIENTES DO USO DOS CÓDIGOS AQUI POSTADOS EM APLICAÇÕES PESSOAIS OU DE TERCEIROS.

VBA Access - Alterando a Barra de Status - Message in Status bar




Sim, alterar a mensagem que é mostrada na Barra de Status da sua aplicação MS Access pode ser algo que desejará um dia. Como? Segue código abaixo.

Function ChageStatusBar
     Dim nStatus As Variant
       Dim nMess As String

     Let nMess = "Copyright 2012 - A&A - In Any Place"

     ' Mostra a mensagem.
     Let nStatus = SysCmd(acSysCmdSetStatus, nMess) 


     ' Limpa a mensagem.
     Let nStatus = SysCmd(acSysCmdClearStatus) 


Tags: VBA. Access, Bar, StatusBar, message, mensagem, barra de status,



Tags: , , , , ,

Nenhum comentário:

Postar um comentário

Assinar: Postar comentários (Atom)
diHITT - Notícias