Aula 3 - Programação - 1º Bimestre

Código para o joguinho "Acerte o número"
Copie o código abaixo:

Dim acertos As Integer
Dim erros As Integer
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
    pc = Int(Rnd() * 5) + 1
    Text2 = pc
    vc = Val(Text1.Text)
    If pc = vc Then
        acertos = acertos + 1
        Label2.Caption = acertos
    Else
        erros = erros + 1
        Label3.Caption = erros
    End If
End If
Text1.Text = ""
End Sub

Aula 2 - 1º Bimestre - Programação

Criando uma pequena Central de Aplicativos com o Visual Basic

1- Desenhando a Interface

2 - Programando

Após o desenho da interface, clique duas vezes no botão "Calculadora" e digite o código a seguir:

Repita o processo para os dois outros botões:

Teste o seu projeto teclando "F5" ou clicando em Run ==> Start. Se tudo foi digitado corretamente os botões devem abrir, respectivamente, a Calculadora, o Bloco de Notas e o Paint.

3 - Salvando o Projeto

Para transformar o seu projeto em aplicativo é necessário clicar em Run ==> End (Caso o mesmo ainda esteja funcionando). Em seguida vá em File ==> Make Project1.exe.

Salve na pasta indicada pelo professor.

Aula 1 - 1º Bimestre - 2º Ano

Criando o seu primeiro aplicativo para PC

Nesta aula você estará apto para:

• Iniciar o programa e alternar entre as telas de Designer e Code;
• Criar um aplicativo que altera sua cor de fundo (backcolor);
• Transformar o projeto em um aplicativo pronto.

Iniciando o Programa Visual Basic

Inicie o programa e escolha a opção Standard na caixa de diálogo.

Em seguida surgirá a tela do Visual Basic conforme figura abaixo:

Criando o seu primeiro programa

Fase 1 - Desenho

1. Alterar o título do formulário ( Na janela de propriedades vá até Caption e escreva seu "nome - a data de hoje".
2. Deixar apenas o botão para fechar o formulário (Na janela de propriedades vá até BorderStyle e escolha a opção 3.
3. Criar um Botão de comando CommandButton e do do lado direito, na janela de propriedades, alterar o Caption para "Alterar a aparência do aplicativo",
4. Alterar o Estilo do botão para Graphical (Vá em propriedades, Style e escolha a opção Graphical )
5. Seu projeto deverá ficar parecido com o desenho abaixo:

Fase 2 - Programação

Agora que o desenho está pronto, faremos a programação do aplicativo. A função deste aplicativo é alterar a cor do fundo e do botão para umas das cores disponíveis no sistema. Acompanhe:

Clique duas vezes no botão que você acabou de criar e digite o código a seguir:

As cores disponíveis são:
vbBlack, vbRed, vbGreen, vbYellow, vbBlue, vbMagenta, vbCyan e vbWhite.

Testando o seu projeto

Para testar o seu aplicativo aperte a tecla F5!

Transformando o seu projeto em aplicativo

Após a conclusão do seu projeto, é hora de transformá-lo em aplicativo final. Para isso, vá até o menu File e clique em Make Project1. O local e o nome do seu arquivo será definido durante a aula.