Informática
VBA III
Ano Lectivo de 2003/2004
7. Construa um formulário idêntico ao que se segue:
- No editor do Visual Basic comece por criar um novo formulário
(menu <Inserir> seguido da opção <UserForm>) e adicione
os controlos que se indicam para estruturar o aspecto do formulário:
- Um rótulo com o texto (propriedade Caption) 'A1:'.
- Duas caixas de texto de nomes (propriedade Name)
'CaixaValor' e 'CaixaResultado'.
- Uma caixa de combinação de nome 'ListaFunções'.
- Um botão de comando de nome 'BotãoCancelar' com o
texto 'Cancelar'.
- Em seguida, defina os procedimentos necessários para obter a seguinte
funcionalidade:
- O activar do formulário deve copiar para 'CaixaValor' o
conteúdo da célula A1 e deve iniciar 'ListaFunções' com
os itens Sinal e Paridade.
- A selecção de um item em 'ListaFunções' deve apresentar
em 'CaixaResultado' o resultado da aplicação do item
seleccionado sobre o valor em 'CaixaValor'. O item Sinal
deve ter como resultado a palavra positivo, negativo
ou zero. O item Paridade deve ter como resultado
a palavra par ou ímpar.
- O pressionar do 'BotãoCancelar' deve fechar o formulário.
- Para executar o formulário a partir de um botão de comando
faça o seguinte:
- Mude para a janela do Excel e utilizando a caixa de
ferramentas dos controlos da barra do Visual Basic insira
um botão de comando na primeira folha de cálculo.
- Em seguida, mude para o editor do Visual Basic e na caixa
Project seleccione a folha de cálculo onde
introduziu o botão.
- Na caixa Properties seleccione o botão de comando e
defina as propriedades Name e Caption
respectivamente como 'BotãoIniciar' e
'Sinal/Paridade'.
- Por fim active o módulo da folha de cálculo e introduza o
seguinte código:
Private Sub BotãoIniciar_Click()
Form1.Show
End Sub
- No final desta operação, ao premir o botão da folha de
cálculo deverá ser apresentado o formulário.