RicardoHorta.Net - Word XP: Controles: CommandButton
SUBMARINO: Fácil ! Rápido ! Seguro !
O controle.
- É um botão de comando que ao ser clicado pode ser utilizado para abrir
formulários, imprimir documentos, abrir uma janela, fechar o Word XP e assim por diante.
O evento padrão de um CommandButton é o Click. O que for inserido neste evento
será executado quando o usuário clicar sobre ele com o botão esquerdo do mouse.
Propriedades.
- Acelerator, AutoSize, BackColor, BorderColor, BorderStyle,
BoundColumn, Cancel, Caption, ControlTipText, Default, Enabled, Font, ForeColor,
Height, HelpContextID, IntegralHeight, Left, Locked, Picture, PicturePosition,
MouseIcon, MousePointer, TabIndex, TabStop, Tag, TakeFocusOnClick,
Top, Visible, Width, WordWrap.
Métodos.
Eventos.
- BeforeDragOver, BeforeDropOrPaste, BeforeUpdate,
Click, DblClick, Error, KeyPress, MouseMove, Enter, Exit, KeyDown, KeyUp,
MouseDown, MouseUp.
Como inserir ?
- Para inserir um controle CommandButton no formulário, abra
Caixa de ferramentas e clique em Botão de comando.
- Em seguida, clique no UserForm.
A propriedade Accelerator.
- Accelerator permite que você atribua uma tecla de atalho
a um CommandButton. O usuário poderá escolher entre clicar no botão ou utilizar
[ Alt ] + [ a tecla que você especificar ].
- Como padrão, esta propriedade está vazia. Isto significa que o
usuário precisará clicar no botão para executar o evento Click.
Escolhendo a tecla de atalho.
- Crie um UserForm
e adicione 3 controles: Rótulo,
Caixa de Listagem e
Botão de comando.
- Selecione o UserForm e altere a sua propriedade Name: UserForm_Sites.
- Na propriedade Caption do Rótulo, digite o texto: Escolha os
seus sites favoritos. Clique na seta à direita da proprieadade Font,
e escolha Arial para o tipo de letra e 12 para o tamanho.
- Em seguida, clique na seta à direita de ForeColor e escolha Azul para a cor da fonte.
- Insira o botão de comando e...
- ...digite Fechar na propriedade Caption.
- E altere o valor da propriedade Name para CommandButton_Fechar.
- Neste momento, os controles estarão assim.
Criando a lista de opções da ListBox.
- Insira as linhas de código abaixo no evento
Initialize
do formulário.
- Em seguida, clique na seta à direita da caixa Objetos e escolha
CommandButton_Fechar.
- A procedure relativa ao evento padrão do controle será criada.
- Você irá utilizar este botão para fechar o formulário. A sintaxe
do comando é: Unload UserForm_Sites.
- Como você não definiu a propriedade Accelerator do CommandButton,
para fechar o formulário será preciso clicar no botão. Algumas pessoas, no entanto,
preferem o teclado, utilizando um conjunto de teclas. [ Alt ] e [ mais alguma coisa ].
- Na janela Propriedades, selecione o controle CommandButton_Fechar.
- E defina a letra H como a tecla aceleradora. E aí você me pergunta:
Como o usuário irá descobrir qual letra é a aceleradora ? O pessoal do Bill Gates também
pensou nisso. A letra H de Fechar ficará sublinhada.
Testando a propriedade Accelerator.
- Clique uma vez apenas com o botão esquerdo dentro do evento
Initialize e pressione F5.
- Agora, meu ( minha ) jovem, o seu usuário poderá clicar no botão para
fechar o formulário ou utilizar o conjunto de teclas [ Alt ] + [ H ] ( Observe a letra sublinhada ).
A propriedade Picture.
- Como padrão, os botões de comando são inseridos sem imagem.
- Utilize a propriedade Picture para exibir imagem e texto nos botões.
- ...a caixa de diálogo Carregar figura será exibida.
Aqui é com você.
Localize no seu computador uma imagem e clique no botão Abrir. Dê preferência
a imagens pequenas, pois o botão, também, é pequeno.
- O resultado será este aí.
A propriedade PicturePosition.
- Você deve estar se perguntando: Ué, cadê o texto ? Calma.
Como padrão, a imagem é posicionada acima do texto ( fmPicturePositionAboveCenter ).
Como a altura do botão é pequena, o valor da propriedade Caption ficou escondido.
Calma. Tem solução prá tudo
nesse mundo. E é para isto que existe PicturePosition.
- Selecione a opção fmPicturePositionLeftCenter e...
- ... a imagem ficará à esquerda do texto.
A propriedade Cancel.
- Você deve utilizar no mínimo 2 botões em cada UserForm. Um para lhe
informar que o usuário fechou o formulário e deseja continuar o processamento. Com o segundo
botão, o usuário tem a opção de cancelar a tarefa. Sabendo qual botão foi clicado, você
poderá definir qual ação será executada.
- É aí que entra a propriedade Cancel.
- Cancel pode assumir 2 valores: True e False. Como padrão,
o seu valor é False. Quando a propriedade Cancel de um botão é igual a True, se o
usuário pressionar a tecla [ Esc ], o evento Click deste botão será executado.
- Insira outro botão no seu formulário e altere as seguintes propriedades:
- Name: CommandButton_Cancelar.
- Caption: Cancelar.
- Cancel: True.
- Em seguida, clique nele 2 vezes com o botão esquerdo para...
- ...criar o código do evento Click: Unload UserForm_Sites.
Testando a tecla [ Esc ].
- Clique uma vez apenas com o botão esquerdo dentro do evento
Initialize e pressione F5.
- Agora, o usuário tem 2 opções para fechar o formulário. E você tem
como saber se ele, após escolher uma das opções da caixa de listagem, deseja continuar ou
interromper o processamento.
- Pressione [ Esc ] e o formulário será fechado. É o evento Click do controle
CommandButton_Cancelar trabalhando.
A propriedade Default.
- Como padrão, os botões de comando têm a mesma hierarquia, ou seja,
nenhum deles tem preferência para ser executado.
- No entanto, se você alterar o valor da propriedade Default
de um CommandButton
para True, quando o usuário teclar [ Enter ], o evento Click
deste botão será executado.
- Exceção à regra: se, por exemplo, o foco estiver no botão Cancelar e o usuário teclar [ Enter ],
será executado o evento Click do botão focado. E como você altera o foco dos controles ?
Ora... utilizando a tecla [ Tab ]. Mas isto é assunto para outro módulo ( Benza Deus, haja assunto ! ).
- Vamos fazer um teste. Selecione o controle CommandButton_Fechar e ...
- ... faça a sua propriedade Default igual a True.
- O botão default de um formulário apresenta as bordas mais grossas, tanto
no modo de design...
- ... quanto no modo de execução. Compare os 2 CommandButton.
- O usuário poderá escolher as opções na caixa de listagem e teclar [ Enter ].
O formulário será fechado.
- Se quiser, faça o
download do arquivo .doc com as macros acima.
SUBMARINO: Fácil ! Rápido ! Seguro !
SUBMARINO: Fácil ! Rápido ! Seguro !
04/06/2002 - www.ricardohorta.net - Direitos adquiridos - Autor: Ricardo Horta