Trabalharemos hoje com um novo controle do Visual Basic: a Listbox, e algumas de suas propriedades. Para isso vamos ler o enunciado de nossa aplicação.

- Um aplicativo que receba informações de um livro(título, autor, editora) e a partir de um “clique” no botão ‘Adicionar’, cadastre as informações na lista no seguinte formato:

A aplicação conta também com um botão ‘Remover’, responsável por eliminar o item da lista que estiver selecionado.
Segue abaixo, a interface de nosso programa.

Já perceberam que será simples de desenvolver não é mesmo? Afinal, teremos apenas rotinas desenvolvidas para o botão Adicionar e Remover.

Então, mãos na massa.

A partir da IHM descrita acima, desenvolva sua interface de acordo com os objetos utilizados. Pretendo, daqui pra frente deixar a critério de vocês a nomenclatura dos objetos. No entanto, vou explicar o novo controle a ser utilizado: a LISTBOX.

A Listbox, é um controle que nos permite adicionar valores(no formato Texto), separados por linha. Graças a ela, poderemos então ter a nossa primeira idéia de banco de dados, e observar realmente como as disciplinas de nosso curso vão se relacionando mais ainda com o decorrer das aulas. Quanto à sua nomenclatura, vamos nomeá-la com o prefixo ‘LST’. Ex: lstLivros

Lembram-se do conceito de campo? Então, podemos dizer que cada informação a ser preenchida sobre o livro, pode ser considerada como um campo: TITULO, AUTOR, EDITORA.
Melhorando ainda mais o nosso raciocínio, podemos afirmar que se a idéia fosse montar um banco de dados relacionado à nossa aplicação, esses campos fariam parte de uma tabela LIVROS.

Uma vez, pronta a interface, vamos à programação:

Está bem claro pra nós, o que deve acontecer quando clicarmos no Botão Adicionar: Os dados do livro devem ser cadastrados na lista. Mas ainda há um detalhe: o enunciado do programa exige um formato de cadastro para esses dados: Titulo - Autor - Editora.
Talvez isso seja um problema, já que teremos as informações separadas em cada TextBox. Mas lembrem-se: temos o famoso recurso de Concatenação de variáveis (Ch & X). Graças a isso, nosso problema está resolvido mais rápido do que pensamos.

Vamos então à programação do Botão Adicionar.

Private Sub cmdAdd_Click()
Dim sTitulo, sAutor, sEditora, sDados

End Sub

Analisando a codificação acima, temos três variáveis: sTitulo, sAutor, sEditora - responsáveis por armazenar as informações das respectivas caixas de texto, além da variável sDados, que irá guardar a string completa a ser adicionada posteriormente na lista. Observe o recurso de concatenação utilizado para juntar as variáveis:

sDados = sTitulo & ” - ” & sAutor & ” - ” & sEditora

Temos agora um comando novo:

lstLivros.AddItem sDados

Já sabemos que lstLivros é a nossa ListBox. As ListBoxs possuem a propriedade AddItem que adiciona uma string à lista. No nosso caso, a string a ser adicionada é o conteúdo da variável sDados.
Ao executar o programa, preenchendo as caixas de texto e adicionando as informações, podemos observar que a cada adição, os itens são cadastrados em uma nova linha da lista.

Vamos agora ao botão ‘Remover’.

A idéia é remover da lista, o item cuja linha estiver selecionada. A propriedade ListIndex, retorna um valor inteiro referente a linha que estiver selecionada.

-1 - Nenhuma linha selecionada
0 - Primeira linha
1 - Segunda linha
2- Terceira linha
3 - Quarta linha, e assim sucessivamente.

Isto significa que quando nenhuma linha estiver selecionada, ou seja, quando a propriedade ListIndex da lista for igual a -1, devemos exibir uma mensagem de erro e não podemos remover nenhum item.

Vamos desenvolver a lógica:

SE ITEM_SELECIONADO = -1 ENTÃO
EXIBIR “Selecione um item.”
SE NÃO
REMOVER ITEM SELECIONADO
FIM SE

Simples não é? Passaremos agora então nossa lógica para a linguagem do Visual Basic.

Private Sub cmdRem_Click()
If lstLivros.ListIndex = -1 Then
MsgBox “Selecione um item.”, vbCritical, “Erro.”
Else
lstLivros.RemoveItem lstLivros.ListIndex
End If
End Sub

Observando a rotina, podemos encontrar uma outra propriedade da ListBox: RemoveItem. Ao contrário da propriedade AddItem, a propriedade RemoveItem como o próprio nome já diz, retira um determinado elemento da lista. Mas não é somente isso que essas duas propriedades tem de diferente:

lstLivros.AddItem sDados | lstLivros.RemoveItem lstLivros.ListIndex

Enquanto a propriedade AddItem recebe uma string a ser adicionada na lista, a propriedade RemoveItem, recebe um valor inteiro, a partir da propriedade ListIndex, que faz referência ao número da linha cujo item estiver selecionado, como dito anteriormente.

Fácil, fácil, fácil.

Espero que todos tenham aproveitado.

Abraços e tenham uma boa aula de Inglês Técnico.

Caros Alunos,

Espero que a postagem de nossas aulas, esteja sendo de grande utilidade a vocês no auxílio à programação e na solução de dúvidas.

Vamos a nossa segunda aula.

Na aula de hoje, trabalhamos com alteração dinâmica das propriedades dos objetos. Desenvolvemos então, uma aplicação que controla a entrada e saída de veículos de um estacionamento. Para melhor entendimento, vamos a parte contextual de nosso programa.

- Um programa que administre a entrada e saída de veículos controlado apenas por 2 botões: “+” (Adicionar Veículo), “-” Remover Veículo. O sistema tem, inicialmente, seus controles bloqueados e estes só são ativados por um botão “Abrir Estacionamento”. A ativação consiste em desbloquear os botões “+” e “-”, permitindo que carros entrem e saiam do estacionamento.
Algumas informações devem estar disponíveis em tela, como o número de vagas disponíveis e o número de vagas ocupadas.
Temos ainda um botão “Fechar Estacionamento”, que desativa todos os controles, e deixa o programa em seu estado inicial, estando apenas ativado o botão “Abrir Estacionamento”.

Importante:

• O estacionamento tem vaga para 500 carros.
• Ao adicionar um novo carro, deve-se verificar se há vagas disponíveis.
• Ao retirar um carro, deve-se certificar se existem carros no estacionamento.
• O estacionamento não é 24h, portanto não se pode fechá-lo, com carros em seu interior.

Vamos então à tela do nosso aplicativo:

Por enquanto estamos apenas trabalhando com os objetos mais simples do Visual Basic: Labels, TextBox, CommandButton.
Então vamos nessa!
Monte a sua interface baseada na IHM descrita acima não esquecendo sempre de alterar as propriedades necessárias ou desejadas.
As palavras coloridas em torno da figura, são os nomes de cada objeto. Observe que não atribuímos nomes a todos os objetos do formulário, mas somente aos que iremos usar na programação. Sintam-se livres para nomear os objetos e desenvolver a interface ok?!

E agora? Por onde começamos?
Vamos reler alguns pontos do contexto do aplicativo.

“O sistema tem, inicialmente, seus controles bloqueados e estes só são ativados por um botão ‘Abrir Estacionamento’.”

“Inicialmente” - Essa é uma palavra-chave para sabermos por onde começar. Temos então que desativar os objetos quando o programa for carregado.
Já tem idéia em qual objeto iremos programar?

Temos que utilizar o evento Load do Formulário. Vamos começar?

A propriedade que define se o objeto está ativo é a propriedade Enabled. Recebe um valor booleano True ou False. True, define que o objeto está ativado e False, desativa o objeto.

Private Sub Form_Load()

End Sub

Controles desativados, ao iniciar nosso programa, a interface é vista dessa forma:

Partindo para o próximo passo, e ainda utilizando a idéia anterior, temos:

“O sistema tem, inicialmente, seus controles bloqueados e estes só são ativados por um botão ‘Abrir Estacionamento’.”

Temos então que dar ação ao botão Abrir Estacionamento, este que será responsável por ativar os demais controles.
Além de ativar os controles, vamos aperfeiçoar o nosso programa, e preencher automaticamente as Caixas de Texto “Vagas Ocupadas” e “Vagas Disponíveis” com seus valores iniciais: 0 e 500, respectivamente.

Private Sub cmdOpen_Click()
cmdClose.Enabled = True
cmdAdd.Enabled = True
cmdRem.Enabled = True
cmdOpen.Enabled = False

txtOcupadas.Text = 0
txtDisp.Text = 500
End Sub

Enfim, terminamos a primeira parte de nosso programa. A segunda etapa é dar ação aos botões “+” e “-”, mas antes disso, precisamos saber ao certo, a real utilidade desses botões e algumas regras. Voltamos ao contexto:

“Algumas informações devem estar disponíveis em tela, como o número de vagas disponíveis e o número de vagas ocupadas. (…) O estacionamento tem vaga para 500 carros. Ao adicionar um novo carro, deve-se verificar se há vagas disponíveis. Ao retirar um carro, deve-se certificar se existem carros no estacionamento.”

Informações disponíveis em tela: Entenderam o porquê que iniciamos as caixas com valores 0 e 500? A idéia é atualizar os valores desses campos em tempo real, quando um carro chegar, ou sair do estacionamento.
Porém, há alguma limitações: Para adicionar um novo carro, é necessário verificar se o estacionamento não está lotado. Em outras palavras, só é possível adicionar um novo carro, SE O NÚMERO DE VAGAS OCUPADAS FOR INFERIOR A 500.

É aí então que entra a nossa famos estrutura de decisão if. Observe a idéia abaixo:

Se vagasOcupadas >= 500 então
exibir “Não há mais vagas disponíveis!”
Se não
vagasOcupadas = vagasOcupadas + 1
vagasDisponiveis = vagasDisponiveis - 1
Fim se

Entenderam mais ou menos a lógica? Vamos então às ações do botão cmdAdd:

Private Sub cmdAdd_Click()

End Sub

Explicação:

Analisando a codificação acima, verificamos se o número de vagas ocupadas é igual ou superior a 500. Caso isso seja verdadeiro, mandamos a mensagem na tela: “Não há mais vagas disponíveis!”. (Nenhuma dúvida em relação à msgbox não é?).
Um novo comando aparece nesse bloco: EXIT SUB. Esse comando, ao ser executado, faz com que a sequência da rotina pertencente ao evento atual, deixe de ser executada. Utilizando a linguagem de nosso programa, dizemos que ele manda a mensagem na tela, e não faz mais nada.

E se o número de vagas for inferior a 500? (Ou seja, caso contrário - ELSE)
Então poderemos adicionar um veículo ao estacionamento sem problemas, somando 1, ao valor encontrado em vagas ocupadas, e subtraindo 1 das vagas disponíveis. É isso que fizemos nessas linhas de código:

txtOcupadas.Text = txtOcupadas.Text + 1
txtDisp.Text = txtDisp.Text - 1

Partimos então agora, para a programação no Botão CmdRem, responsável por tirar veículos do estacionamento.
Se pararmos pra pensar, da mesma forma que não podemos adicionar um carro ao estacionamento lotado, também não podemos tirar o carro de um estacionamento vazio. Se você acha q também teremos uma estrutura de decisão IF nessa rotina, está totalmente correto. Vamos então à lógica:

Se vagasOcupadas <= 0 então
exibir "Não há mais carros no estacionamento!"
Se não
vagasOcupadas = vagasOcupadas - 1
vagasDisponiveis = vagasDisponiveis + 1

Fim se

Passando a lógica para a programação do botão "Remover", temos:

Private Sub cmdRem_Click()

End Sub

Observe a imagem abaixo e veja como ficou. Analise os valores das caixas de texto txtOcupadas e txtDisp.

Terminamos? Não, mas estamos quase lá. Basta agora fazermos as ações do botão “Fechar Estacionamento”.
A idéia é fazer com que, ao clicar nesse botão, o programa volte ao seu estado inicial, com os campos desativados, afinal, podemos dizer que é um botão de fechamento e “travamento” do aplicativo.
A codificação utilizada é parecida com a rotina Form_load, porém apagar os valores contidos nas caixas de texto ok?
Mais um detalhe:

• O estacionamento não é 24h, portanto não se pode fechá-lo, com carros em seu interior.

Sendo assim, não podemos fechar o estacionamento com carros em seu interior. Se você acha que teremos que usar outra estrutura de decisão IF, acertou de novo. Nesse caso é simples:

Private Sub cmdClose_Click()

End Sub

Agora sim, finalmente terminamos o nosso aplicativo. Observe que já se trata de uma aplicação funcional, e pode, de certa forma, ser aplicada a algum ambiente. É assim que iremos trabalhar em nossa disciplina, criando aplicativos funcionais.

Qualquer dúvida, não hesitem em questionar! Até a próxima aula.

Um grande abraço a todos!

Olá queridos alunos.
Na aula de hoje, trabalhamos com operações matemáticas envolvendo variáveis, através de dados fornecidos via teclado.
Para isso, desenvolvemos o seguinte aplicativo:
- Um programa que receba 3 informações:a dimensão de uma parede que pode ser pintada usando-se 1 lata de tinta (em metros quadrados), a altura de uma parede (em metros) e a largura da parede(em metros). A partir dessas informações, o programa deve retornar uma resposta de quantas latas de tintas são necessárias para preencher toda a parede.
Para termos uma melhor noção, segue abaixo a interface gráfica de nossa aplicação:

Observe que na IHM(Interface Homem-Máquina) acima, temos um formulário com 9 objetos.

Labels: lblMetros, lblAltura, lblLargura, lblResult
TextBox: txtMetros, txtAltura, txtLargura
Command Buttons: cmdCalcular, cmdLimpar

As labels são os chamados ‘Rótulos’ e servem, nesse caso, para indicar o que deve ser informado em cada campo de texto. Observe também que há a label inferior (resultado), que será um rótulo com a função de exibir a saída (número de latas necessárias) do programa.
Os campos de texto, servem como função de entrada por parte do usuário, para que possa informar os valores para o processamento. Veremos como tratar e trabalhar o conteúdo desses campos mais adiante.

Podemos destacar ainda, dois botões de comando, que serão essenciais em nossa aplicação. O botão ‘Calcular’ será responsável por processar as informações recebidas e retornar o resultado esperado. Já o botão ‘Limpar’, é simples, e tem a função de zerar os campos para que possa ser feita uma nova consulta (pura perfumaria***, porém, uma perfumaria*** necessária).

Vamos então colocar a mão na massa?

Monte a sua interface com os objetos descritos acima, não esquecendo de sempre nomear seus objetos para melhor controle de seu programa. A interface apresentada acima é apenas sugestiva e quero que vocês sintam-se livres para criar a de vocês.

Antes de começarmos a programar, vamos tentar responder 2 questões:
1. O que nosso programa faz?
2. Quando ele faz?

Respostas
1. O nosso programa calcula quantas latas de tinta são necessárias para pintar uma parede, dados a altura e largura da parede, assim como a “porção” da parede que pode ser pintada utilizando somente uma única lata de tinta.

2. Nossa aplicação deve calcular a quantidade de tintas e exibir o resultado em tela, no momento em que clicarmos no botão Calcular.

Respondendo a essas duas perguntas concluimos que as ações e comandos utilizados serão atribuídos ao Evento Click do botão cmdCalcular.

Clicando, portanto, duas vezes sobre o botão ‘Calcular’, será aberta a janela de código com a seguinte codificação:

Private Sub cmdCalcular_Click()

End Sub

Vamos iniciar nossa programação pela declaração de variáveis. Observe novamente, que temos três campos a serem preenchidos.

Agora lembre-se de nossas aulas de algoritmos, quando fizemos o programa da área do triangulo.
AREA = (BASE*ALTURA)/2
Tinhamos 3 variáveis, sendo duas ultilizadas como entradas (base e altura) e outra pra armazenar o resultado.

Partindo desse princípio, vamos montar a equação a ser utilizada em nosso programa, e verificar quantas variaveis iremos utilizar.

TOTALLATAS = (LARGURAPAREDE * ALTURAPAREDE)/METROS_LATA

Desta forma, utilizaremos 4 variáveis:
- TOTALLATAS: Irá receber o total de latas a serem utilizadas;
- LARGURAPAREDE: Recebe a largura da parede definida pelo usuário;
- ALTURAPAREDE: Recebe a altura da parede definida pelo usuário;
- METROS_LATA: Recebe quantos metros podem ser preenchidos com cada lata de tinta.

Sendo assim, vamos voltar ao nosso programa.

Private Sub cmdCalcular_Click()

End Sub

As variáveis declaradas acima, foram criadas justamente para armazenar os valores digitados em cada caixa de texto. Para que isso seja feito, vamos primeiramente lembrar de uma pergunta clássica que faço durante as aulas:

“Como faço para recuperar o conteúdo de dentro de um campo texto?”

E vocês sempre me respondem:

“NOME DA CAIXA DE TEXTO.TEXT, Querido Professor”

Isso mesmo. Em qualquer ocasião, sempre que precisamos pegar o conteúdo de uma caixa de texto, utilizamos o nome do objeto.(ponto)TEXT.

obs: Esse padrão, vem das raízes da programação Orientada ao Objeto, conhecido como “OBJETO.METODO”, assunto que o professor Nivaldo Junior irá lhes explicar melhor em um futuro não muito distante.

Voltando ao nosso código e colocando em prática nosso pensamento anterior:

Private Sub cmdCalcular_Click()

End Sub

Terminamos? Ainda não. De nada vale um programa bem feito, se os dados finais não são exibidos na tela. Lembrem-se: ENTRADA >>>> PROCESSAMENTO >>>> SAÍDA

Vejam que criamos uma Label para exibir o resultado final. Basta acrescentar o comando ao fim do código:

Private Sub cmdCalcular_Click()

End Sub

Pode parecer estranho e confuso o recurso para “juntarmos” uma mensagem a uma variável. O nome desse processo é CONCATENAÇÃO, e usamos o operador “&” para unir as informações. É só não se esquecerem do exemplo Chitãozinho & Xororó, que não terão problemas com isso.

Segue a visualização final do nosso aplicativo:

Observe a LABEL inferior exibindo a saída das informações.

Mas e o botão ‘Limpar’? Simples. Sua função é limpar os campos de entrada e saída de informações para que uma nova consulta seja feita. Vamos à sua programação?

Private Sub cmdLimpar_Click()

End Sub

Agora sim terminamos. Difícil? Nem tanto. O que vale é sempre termos o controle dos objetos e variáveis utilizados na programação. Os principais erros, estão sempre no NOME DOS OBJETOS e NOME DAS VARIÁVEIS, portanto fiquem atentos.

Espero que tenham aproveitado bastante a aula de hoje, e sempre que houver dúvidas, não hesitem em questionar ok?

Vou ficando por aqui e um grande abraço a todos!!!

Primeiramente gostaria de pedir desculpas devido ao fato do abandono do blog da escola.Durante a semana que se passou e que foi marcada pelo curso de Desenho, houve apenas um post e com nenhum desenho criado pelos próprios alunos. Portanto, agora irei postar alguns deles.

O primeiro desenho é uma vetorização do personagem Gazparzinho feita pelo aluno Bruno. A técnica abordada foi o uso das linhas finas no flash para uma vetorização mais correta da imagem:

O segundo desenho foi uma criação do aluno Henrique. è um personagem criado por ele mesmo e confeccionado totalmente no Flash:

A seguir, temos a imagem de uma vetorização de uma igreja feita pela aluna Tatiany. Esta igreja foi nosso primeiro trabalho de vetorização e pintura de verdade no Flash.

E por último, mas não menos importante, um trabalho feito pelo aluno Raul. Nesse desenho foram usadas duas técnicas, a primeira que foi a vetorização da igreja igual mostrada acima pela Tatiany e a segunda que foi a abordagem da técnica de perspectiva. Podemos ver o efeito de profundidade da imagem:

E pra finalizar eu gostaria de agradecer a todos os alunos que puderam comparecer ao Curso de Desenho e parabenizá-los pelos resultados alcançados.

Durante esse mês de Julho estaremos desenvolvendo alguns cursos de aprendizado na escola, desenvolvidos pelos alunos do Curso Técnico de Informática.

Nessa primeira semana o curso ministrado é o de Desenho, usando as ferramentas MSPaint e Macromedia Flash.

Ja se passaram duas aulas, na primeira foi ministrado o uso do Paint, o softare fornecido pelo proprio Windows, assim como os tipos de arquivo que o computador reconhece. Os alunos realizaram o desenho da casa e ja entraram em perspectiva.

Na segunda aula iniciamos o uso do Flash.

Essa imagem foi a feita pelo professor Diego para exemplificar a arte vetorial. Foi realizada totalmente no flash.

Dentre em breve os desenhos dos alunos estarão sendo publicados no blog conforme a autorização dos mesmos.

E por enquanto ficamos com o desenho da uma cidade usando perspectiva com um ponto de fuga, e ao fundo uma igreja vetorizada no flash, feita pelo professor Diego: