SUBMARINO: Fácil ! Rápido ! Seguro !

Parceria RicardoHorta.Net + SUBMARINO

• Você quer me ajudar ?
  Microsoftiano(a):
  Comprando no SUBMARINO, através do meu site, você me ajuda a preservar o meu projeto: Site pessoal com tutoriais sobre o Office microsoftiano, com acesso livre e gratuito.
  Pense nisto.
  Para acessar a Livraria SUBMARINO, clique aqui

Newsletter

Objeto.

• Font.

Função

• Ativa / desativa o sublinhado do texto exibido pelo controle.

Sintaxe no VBA.

• Font + . + Underline + = + True / False.

Como ativar / desativar.

• Para ativar a propriedade Underline, selecione o controle.

• Clique em Font,...

• ... ative Sublinhado, e clique em OK.

• Fechar ficará assim.

• Para desativar o sublinhado, abra, novamente, a caixa de diálogo Fonte, desmarque a opção e clique em OK.

• O padrão será retornado.

Manipulando Underline durante a execução do aplicativo - 1ª parte.

• Insira um Botão de comando no formulário.
• Defina Name ( CommandButton_Fechar ) e Caption ( Fechar ).

• Abra o código do botão e,...

• ... em Procedimento,...

• ... selecione MouseMove.

• Crie o bloco With CommandButton_Fechar... End With.

• Digite um ponto e selecione o objeto Font.

• Outro ponto e escolha a propriedade Underline.

• Símbolo de igual e escolha True.

Manipulando Underline durante a execução do aplicativo - 2ª parte.

• Clique, novamente, em Objeto e...

• ... escolha UserForm.

• Crie a proc relativa ao evento MouseMove.

• Com este código, desative a propriedade.

Teste.

• Pressione F5 ou clique no botão Executar Sub.

• Com o ponteiro do mouse sobre o formulário, o texto do botão será exibido na formatação padrão.

• Mova o ponteiro sobre Fechar e MouseMove entrará em ação, ativando o sublinhado.

• Com o ponteiro, novamente, sobre o UserForm, a propriedade Underline será desativada.

SUBMARINO: Fácil ! Rápido ! Seguro !

SUBMARINO: Fácil ! Rápido ! Seguro !

www.ricardohorta.net - Direitos adquiridos - Autor: Ricardo Horta