Apostila de VB

Apostila de Visual Basic 6 Curso passo a passo para iniciante

Marcelino Macdo

-1-

Apostila de Visual Basic 6 Curso passo a passo para iniciante Aula 01 - Visual Basic e seu ambiente de desenvolvimento Caso voc j tenha alguma experincia anterior em programao, principalmente sendo esta sobre a plataforma DOS, ter que se acostumar com a idia de que, a programao Procedural no ser utilizada, substituindo a mesma pela programao ditada por eventos. Neste caso, para se programar em Windows, independente de ser no Visual Basic ou no Delphi, por exemplo, entender sua lgica. Este ser nosso objetivo a seguir: Em uma programao ditada por eventos, temos basicamente trs fatores que temos que considerar:

Janelas : o veculo usado como sada pelo Windows para a comunicao com o usurio e esta poder ter diversos formatos, como por exemplo, uma janela do tipo "dilogo de mensagem", como a que utilizada pelo Windows para efetuar o Log-Off de um usurio. Eventos : As janelas, para que desempenhem um papel, devem responder a eventos. Mas o que so eventos? Veja um exemplo ... quando voc clicou no quadrado representado por um "x", disparada uma ao, neste caso a de fechar a janela. No exemplo dado, a janela respondeu a um evento, disparado pelo clique do mouse em um determinado local desta.

Mensagens : Ao acionar um determinado evento, uma mensagem dever ser enviada para o sistema operacional, solicitando uma determinada ao. Com base no que vimos at este ponto, podemos concluir que uma aplicao orientada por eventos dever responder a aes do usurio ou da prpria aplicao. Quando estamos em um ambiente de desenvolvimento grfico, iremos trabalhar muitas vezes apenas inserindo componentes dentro do(s) formulrio(s). Estes componentes, devero responder a eventos, e estes eventos que sero codificados pelo programador. Ao inserir um componente em uma janela, automaticamente parte da codificao do mesmo automaticamente acrescentada fonte do aplicativo, por isso dado o termo VISUAL. Um componente um objeto, como por exemplo um boto ou um Grid. Este objeto, possui vrios eventos, que por sua vez so executados em determinadas sequncias, sendo que o programador, dever ter conhecimentos e a lgica necessria a identificao dos eventos que devero ser programados. Pelo que observarmos at este ponto, no ambiente Windows, a programao alm de ser orientada a eventos, baseada na utilizao de objetos, ou seja, componentes usados na confeco da interface grfica de uma determinada aplicao. Quando carregamos o VB na memria, ou seja, executamos o mesmo, apresentada inicialmente a seguinte janela na tela do seu micro:

Nesta janela, voc dever selecionar o tipo de aplicativo que ser gerado. Poderemos escolher desde um novo projeto ou aplicativo, at o desenvolvimento de um controle ActiveX ( iremos falar a respeito mais

Marcelino Macdo

-2-

Apostila de Visual Basic 6 Curso passo a passo para iniciante adiante ). Para um usurio iniciante, aconselhamos a escolha de um novo projeto, ou seja, a opo STANDARD EXE, que se encontra em destaque na figura acima. Aps este procedimento, basta clicar no boto . Neste ponto, ser exibida a seguinte janela:

Acima, temos a visualizao do ambiente de desenvolvimento integrado ( IDE ), que na verdade proporciona ao desenvolvedor a possibilidade da escrita de cdigo, insero/controle dos componentes do formulrio, compilao, depurao de cdigo, ou seja, tudo integrado em um nico ambiente de fcil interpretao. Neste ambiente, podemos destacar: O MENU

Dispe dos comandos para diversas finalidades, como salvar um projeto, incluir novos componentes, compilar o projeto, etc... Estas opes esto disponibilizadas atravs de uma ordem lgica e em grupos de ferramentas/utilitrios. A BARRA DE FERRAMENTAS

Nesta barra, o desenvolvedor ter acesso aos comandos de menu mais utilizados, agilizando assim o seu trabalho. A CAIXA DE FERRAMENTAS Na caixa de ferramentas, esto dispostos os diversos componentes (objetos) que sero utilizados na construo da interface de aplicao. O EXPLORADOR DE OBJETOS

Tambm conhecido como janela de objetos, responsvel por manter uma relao dos arquivos que compe o seu projeto, ou seja, seria uma espcie de Windows Explorer da aplicao.

Marcelino Macdo

-3-

Apostila de Visual Basic 6 Curso passo a passo para iniciante A JANELA DE PROPRIEDADES Cada componente que compe o seu projeto ( aplicativo que est sendo desenvolvido ), possui caractersticas determinadas por voc. Imagine um boto de comando, este dever ter uma altura e largura, uma cor, uma determinada fonte para o texto que estiver dentro do mesmo, uma aparncia, etc... Isso so propriedades, e as mesmas so controladas nesta janela. Quando selecionarmos um determinado objeto/componente, automaticamente sero exibidas as suas propriedades. O FORMULRIO Na

verdade sobre o formulrio que posicionar os componentes/objetos construindo assim a parte visual de aplicativo. Automaticamente quando inserimos um novo componente/objeto, gerada uma codificao bsica para o mesmo e poderemos trabalhar com os eventos disponveis para este.

iremos nosso

O

EDITOR

DE

CDIGO

Neste editor, voc ir escrever as linhas de cdigo. Como voc pode observar, no editor, poderemos escolher o componente/objeto a ser trabalhado e o respectivo evento a ser codificado. No grfico acima, temos selecionado o objeto formulrio ( FORM ), no evento "ao carregar" ( LOAD ), ou seja, a codificao que ser realizada quando o formulrio for carregado. Aos poucos iremos nos acostumando com o trabalhado de codificao dos componentes/objetos e seus respectivos eventos. Ao trabalhar com o Visual Basic 6.0, voc poder trabalhar com o Mouse, bem como substituir o mesmo com teclas de atalho. Para tal procedimento, utilize a tabela a seguir: Para a janela de cdigo Combinao do teclado CTRL + BREAK CTRL + DELETE CTRL + DOWN ARROW CTRL + END CTRL + F CTRL + H CTRL + HOME CTRL + I Utilidade/funo Aborta a execuo de um determinado aplicativo A partir do cursor, remove o restante da palavra Exibe a prxima rotina Move o cursor para o final do mdulo Abre uma janela de dilogo para a procura de expresses Abre uma janela de dilogo para a procura/substituio de expresses Leva o cursor para o inicio do mdulo Ativa a guia de rpida informao

Marcelino Macdo

-4-


CTRL + J CTRL + LEFT ARROW CTRL + N CTRL + PAGE DOWN CTRL + PAGE UP CTRL + RIGHT ARROW CTRL + SHIFT + F2 CTRL + SHIFT + F9 CTRL + SHIFT + I CTRL + SHIFT + J CTRL + SPACEBAR CTRL + UP ARROW CTRL + Y CTRL + Z END F1 F2 F3 F7 F8 F9 PAGE UP SHIFT + F8

Ativa a lista de mtodos e propriedades Leva o cursor para a ltima palavra esquerda da linha Insere uma linha de cdigo em branco Rola o cursor o contedo de uma tela para baixo Rola o cursor o contedo de uma tela para cima Move o cursor uma palavra direita Volta para o ponto mais recente onde o cursor esteve posicionado Remove os breakpoints de execuo Ativa a guia de parmetros Ativa a lista de constantes Remove a palavra esquerda do cursor Exibe a rotina anterior corrente Remove a linha corrente Move o cursor para o final da linha Move o cursor para o final da linha Ativa a ajuda on-line para a palavra que estiver selecionada Abre o object browser Procura pela prxima ocorrncia de uma determinada expresso Abre a janela de cdigo Roda a aplicao no sentido passo a passo Define/remove um breakpoint Retrocede uma pgina de cdigo Roda a aplicao rotina por rotina Teclas de atalho para trabalho no formulrio

CTRL + C CTRL + X CTRL + V CTRL + Z TAB F4

Copia os controles selecionados para a rea de transferncia Remove os controles selecionados para a rea de transferncia Cola o contedo da rea de transferncia no formulrio Desfaz a ltima operao Avana para o prximo controle na ordem definida pela propriedade TAB Index Exibe a janela de propriedades

Estas so as principais teclas de atalho. No decorrer do curso iremos estudar outras teclas de atalho. Aqui citamos as mais utilizadas. O objetivo desta primeira aula foi o de apresentar o ambiente VB e falar um pouco sobre o mesmo. Na prxima aula iremos comear a gerar nossos primeiros aplicativos. - Aula 02 - A Estrutura de um aplicativo desenvolvido em VB Um aplicativo desenvolvido em Visual Basic, como em outras plataformas de desenvolvimento for Windows, formada por formulrio e mdulos. Estes formulrios possui um respectivo mdulo de cdigo, e este dividido em sees:

Seo que rene o cdigo dos componentes que fazem parte do formulrio e suas respectivas propriedades; Seo de declarao de variveis; Seo de declarao de objetos no visuais que fazem parte do formulrio;

Seo com os cdigos das rotinas de eventos. Sendo assim, cada formulrio de sua aplicao possui um bloco de cdigo, divido em sees, cdigos estes escritos para que os componentes/objetos do formulrio respondam a uma determinada ao, ou seja, evento.

Marcelino Macdo

-5-

Apostila de Visual Basic 6 Curso passo a passo para iniciante Os arquivos contendo a estrutura de um formulrio possuem a extenso FRM. Outro arquivo bastante utilizado no VB, so os que possuem a extenso BAS, tambm conhecidos como mdulos e que armazenam sub-rotinas de cdigos de programao que sero utilizados em qualquer formulrio da aplicao. At o momento estamos citando muito o termo objetos, mas voc sabe o que realmente um objeto? Um objeto um conjunto de cdigos de programao e dados que podero ser tratados como se fossem uma unidade. Um objeto poder tambm ter eventos que podero ser programados bem como mtodos que executam uma determinada ao sobre este. Veja na figura a seguir a estrutura de um objeto:

Quando desenvolvemos um projeto em VB, poderemos utilizar os seguintes tipos de objetos:

Aqueles que acompanham o prprio VB e so instalados juntamente com o sistema; Fornecidos por terceiros, que devero ser instalados de acordo com a necessidade de desenvolvimento;

Criados pelo prprio desenvolvedor, quando o mesmo define os seus mdulos de classe. Devemos lembrar sempre que: As propriedades de um objeto so as caractersticas do mesmo; Os eventos so os cdigos que foram programados com um determinado fim;

Os mtodos so as aes sobre o objeto. Um exemplo comum de objeto so as caixas de texto. Os objetos ficam localizados na caixa de ferramentas, estudada no mdulo de aula anterior. As propriedades de um objeto e seus cdigos podero ser alteradas em duas hipteses: Em tempo de desenvolvimento. Vamos pegar como exemplo, uma caixa de texto. Esta possui um mtodo denominado Drag, que habilita ou no a ao de arrastar e soltar. Pelo que observamos ento at este ponto, ser fundamental escrever cdigos de programao, porm para isso, necessrio que voc conhea o editor de cdigos do Visual Basic. O editor de cdigos do VB, conforme observamos na aula 01, est sendo representado na figura a seguir:

Em tempo de execuo;

Para abrir o editor de cdigos, voc poder proceder das seguintes maneiras:

Marcelino Macdo

-6-

Apostila de Visual Basic 6 Curso passo a passo para iniciante 1. Dando um clique duplo sobre qualquer parte vaga do formulrio; 2. Dando um clique duplo sobre qualquer parte de um objeto/componente; 3. Clicando sobre o boto View Code que est disponvel no Project Explorer. Quando abrimos o editor de cdigo atravs de um clique duplo sobre o formulrio ou sobre um de seus objetos/componentes, o cdigo ser automaticamente aberto em um determinado evento deste. A forma pela qual o cdigo ser exibido, poder ser configurada pelo usurio, atravs das opes de IDE. Tais procedimentos iremos estudar a seguir: PERSONALIZANDO A IDE Para tal, com o Visual Basic em execuo, clique na opo de menu TOOLS e no menu que se abre, selecione a opo OPTIONS. Ser aberta uma janela com o ttulo de OPTIONS, iremos a seguir estudar as principais guias e opes da mesma. Guia Editor O frame "Code Settings" possui opes que iro afetar de forma direta o trabalho de edio do seu cdigo. As principais opes so:

Auto Sintaxe Check - quando selecionada, faz com que o editor verifique se existem erros no cdigo durante o modo de projeto. Aconselhamos que esta opo esteja ticada; Require Variable Declaration - quando selecionada, faz com que as variveis a serem usadas no seu cdigo, tenham que, ser declaradas antecipadamente. Quando selecionado, o VB automaticamente ir colocar uma linha do tipo OPTION EXPLICT na seo GENERAL DECLARATION de todos os formulrios, evitando assim que se use variveis de forma incorreta ou esquecendo de declarar as mesmas;

Auto List Members - quando selecionada, faz com que o editor exiba uma lista de elementos pertencentes ao objeto que est sendo digitado/editado no editor de cdigos; Auto Quick Info - quando selecionada, exibe informaes sobre funes e seus parmetros, uma espcie de Help on-line de grande valia a usurios menos experientes; Auto Data Tips - quando selecionada, alterna a exibio do valor de uma varivel embaixo do cursor; Auto Indent - quando selecionada, proporciona o recuo automtico de trechos de cdigo. Opo muito til para a programao estruturada, onde por exemplo, os comandos pertencentes a um determinado Loop, estejam recuados com relao ao restante do cdigo, facilitando assim a anlise do mesmo.

Tab Width - nesta caixa o usurio poder definir o nmero de espaos que ir servir como recuo da opo Auto Indent. O frame Windows Settings possui as seguintes opes:

Drag-and-Drop Text Editing - Utilizada para proporcionar a possibilidade de arrastar e soltar um trecho de cdigo dentro do editor de cdigos; Default to full module view - Caso ativado, todos os procedimentos podero ser visualizados dentro de uma nica janela de cdigo; Procedure Separator - quando selecionada, exibe um separador visual entre os procedimentos que esto sendo listados na janela do cdigo. Apenas til caso a opo acima estiver ticada.

Marcelino Macdo

-7-


Guia

Editor

Format

Atravs desta guia, poderemos definir as cores e fontes que sero empregadas pelo editor no texto normal ( tudo aquilo que no for comando ou funo da linguagem ), etc... Basta selecionar cada um dos itens que esto na caixa Code Colors e em seguida, formatar a fonte a ser utilizada. Guia General

Marcelino Macdo

-8-


As opes de configurao desta guia so utilizadas por programadores mais experientes, pois permite o ajuste fino de vrios aspectos, como deteco de erros e compilao, etc... Por se tratar de opes avanadas no iremos entrar em detalhes a respeito da mesma. Mais adiante, quando voc tiver maiores conhecimentos a respeito do VB, estaremos detalhando esta guia. Guia Docking

Esta guia possui as opes para determinar quais janelas do IDE estaro ancoradas. Guia Environment

Marcelino Macdo

-9-


No frame When Visual Basic Wizards, poderemos selecionar uma das duas opes disponveis. Caso escolha a segunda ao invs da primeira, no ser mais exibido a janela Project Wizard. Porm para usurios iniciantes, aconselhamos deixar o valor padro marcado, ou seja, PROMPT FOR PROJECT; Caso voc tenha seguido nossa sugesto, poder diminuir o nmero de Wizards exibidos na janela inicial do Visual Basic, desmarcando alguns itens relacionados no Frame SHOW TEMPLATES FOR. No frame WHEN A PROGRAM STARTS, voc poder escolher a forma pela qual o VB ir salvar as alteraes do seu projeto. A opo mais utilizada a PROMPT TO SAVE CHANGES, que far com que o VB verifique se voc quer ou no salvar as alteraes do seu projeto sempre que seu aplicativo for executado ou fechado atravs do IDE. J a opo DONT SAVE CHANGES, til quando voc possui uma srie de projetos exemplos e que a maioria ou sua totalidade no precisa ser salva. J a guia ADVANCED, como o prprio nome diz, utilizada apenas por usurios avanados e iremos estudar esta futuramente. - Aula 03 - Conhecendo um formulrio e desenvolvendo seu primeiro aplicativo Em um projeto VB, o formulrio a base da aplicao, ou seja, sobre este que iremos disponibilizar os demais objetos da aplicao para que possamos gerar o respectivo cdigo. Nesta aula, iremos estudar passo a passo todas as caractersticas de um formulrio e, ao final desta, iremos gerar nosso primeiro aplicativo VB. Tecnicamente, o formulrio nada mais do que uma janela na qual poderemos adicionar os objetos necessrios construo de um aplicativo. Neste sentido, cada aplicativo se baseia em algum tipo de formulrio. Iremos comear o nosso estudo atravs do formulrio singular. Este apresentado assim que voc inicia um novo projeto no Visual Basic. Para isso, proceda da seguinte forma: 1. Atravs do menu INICIAR, execute o Visual Basic; 2. Na janela NEW PROJECT, selecione a opo STANDARD EXE; 3. Neste ponto, ser exibida a seguinte janela:

Marcelino Macdo

- 10 -


Observe que o formulrio da aplicao aparece em destaque na figura. Agora, iremos estudar as partes de um formulrio. Observe o grfico a seguir e sua legenda na tabela abaixo do mesmo:

Item

Descrio

Menu de controle - Neste menu, permitido restaurar, mover, redimensionar, minimizar, maximizar 001 e fechar o formulrio. Para ativar este boto, basta definir a propriedade ControlBox do formulrio como True, na janela de propriedades. Ttulo - Representa um texto que ser exibido na barra de ttulos do formulrio, normalmente utilizado para identificar o nome ou funo do aplicativo. O texto a ser exibido como ttulo do 002 formulrio, configurado na propriedade CAPTION deste, na janela Properties. Obs.: Se a propriedade BorderStyle do formulrio estiver setada para None, o ttulo assim como toda a barra de ttulo, no estaro visveis. Barra de ttulos - Representada por uma barra de colorao diferenciada do restante do formulrio, 003 ela exibe o ttulo do formulrio, bem como poder ser usada para arrastar este para outra posio na tela do micro. Botes de minimizar, restaurar e fechar o formulrio, padro como em qualquer outra aplicao for windows. Para desativar o boto de minimizar o formulrio, basta setar a propriedade Minbutton do 004 formulrio para false na janela properties, assim como para ignorar o boto restaurar, basta setar a propriedade Maxbutton da janela properties do formulrio para false.. 005 Bordas do formulrio - Especificam os limites visuais do mesmo 006 rea de trabalho do formulrio - toda a rea na qual poderemos trabalhar com os componentes de nossa aplicao que devero ser colocados sobre o formulrio.

Citamos vrias vezes na tabela acima, sobre ajustar uma determinada propriedade do formulrio. Isso fcil de se realizar, para isso, proceda da seguinte forma: 1. D um clique em qualquer local do formulrio; 2. Na janela Properties Form 1, selecione a propriedade a ser alterada;

Marcelino Macdo

- 11 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Altere o seu valor por meio de digitao ou de seleo de valores atravs da caixa de seleo, conforme mostra a figura animada a seguir: Passo a passo alterando o caption de um formulrio: 3.

Conforme j especificamos, as propriedades so as caractersticas de um componente/objeto, como os de um formulrio. Qualquer objeto do VB dever ter no mnimo 1 propriedade. Com relao a um formulrio, iremos citar as principais propriedades de um formulrio bem como a funo das mesmas: Propriedade BackColor Funo Responsvel por definir a cor de plano de um formulrio. Ao clicar na seta de lista suspensa desta propriedade, exibindo as cores disponveis para tal configurao. Determina o comportamento de um formulrio. Este poder ter bordas fixas, ou seja, no podem ser redimensionadas ou bordas dimensionveis. Dentro das opes disponveis teremos: Valor 0 - none 1 - Fixed Single BorderStyle 2 - Sizable Descrio Determina que o formulrio no pode ser redimensionado ou movido. Determina que o formulrio no pode ser redimensionado atravs do processo de arrastar as suas bordas, porm os botes de maximize e minimize estaro habilitados. Configurao padro, possibilitando ao usurio redimensionar o formulrio arrastando suas bordas ou utilizando os botes relacionados na barra de ttulos. Configurao que dever ser selecionada quando o formulrio for utilizado como caixas de dilogo, sendo que o usurio no poder redimensionar o mesmo. Configurao idntica ao do Fixed Dialog, porm o boto close estar disponvel. Funciona como o estilo Sizable, porm no inclui o boto Maximize ou Minimize.

3 - Fixed dialog 4 - Fixed TollWindow 5 - Sizable ToolWindow Caption ControlBox Fore Color

Nesta propriedade , o ttulo digitado, ser apresentado na barra de ttulo do formulrio. Caso setado para true, o menu de controle estar visvel, caso contrrio, o menu de controle no estar visvel. Esta propriedade utilizada para definir a cor do texto impresso no formulrio, porm no altera a cor dos objetos colocados sobre o formulrio. Propriedade que armazena a altura de um formulrio, atravs da unidade de medida twips, representada por um nmero que ser especificado na mesma. Normalmente, a altura do formulrio, realizada atravs do processo de clicar e arrastar a sua borda.

Height

Marcelino Macdo

- 12 -


Icon

Esta propriedade determina o cone que deve ser exibido na barra de tarefas quando o formulrio estiver minimizado durante a execuo. Os cones padres do VB, normalmente so instalados no diretrio \Graphics\Icons da pasta VB. Esta propriedade, determina a distncia do formulrio a partir da esquerda da tela. A unidade de medida desta a mesma da propriedade Height. Definindo esta como True, o formulrio ir mostrar o boto maximize padro no lado direito da barra de ttulo. Se for configurada como False, o boto no estar disponvel para o usurio. Definindo esta propriedade como True, o formulrio ir exibir o boto Minimize, caso contrrio, este boto no estar disponvel. O nome especificado nesta propriedade, ir definir o nome ao qual o Visual Basic ir se referir ao formulrio a nvel de codificao do sistema. Por exemplo, se tivermos a propriedade Name = Principal, deveremos citar este formulrio como Principal quando formos escrever alguma linha de cdigo se referenciando ao mesmo. Atravs desta propriedade, poderemos alterar a medida padro de twips para pixels por exemplo. Esta propriedade permite ocultar o formulrio da barra de tarefas. Ao escrever um determinado aplicativo e se tenha a inteno de que ele passe a ocupar a caixa ao lado da barra de tarefas, basta definir esta propriedade como False. Define a largura de um formulrio, atravs de um nmero que representado por twips, salvo o caso de ter sido alterada a propriedade ScaleMode. Esta configurao define a maneira pela qual o formulrio ser inicializado. As opes disponveis so:

Left

MaxButton

MinButton

Name

ScaleMode

ShowInTaskbar

Width

WindowState

0 - normal

O formulrio aberto em seu estado normal

1 - Minimized O formulrio minimizado ao ser aberto 2 - Maximized O formulrio maximizado ao ser aberto Assim como propriedades, os formulrios possuem tambm eventos, ou seja, o Windows se utiliza de eventos ( ao abrir, ao fechar, ao minimizar... ) para controlar as reaes e execues do sistema. Vale lembrar tambm que ao mover o mouse, ou simplesmente ao clicar sobre um determinado componente, o Windows gera uma mensagem que descreve a sua ao, ou seja, o evento realizado. Essas mensagens so enviadas a uma fila e em seguida ao controle apropriado, que ao receber uma mensagem, gera o evento apropriado. No Visual Basic, poderemos codificar um evento, obrigando este a realizar a sua vontade. Como estamos falando sobre formulrios, vamos verificar os principais eventos de um formulrio: Evento Active Deactive DragDrop Load Resize Unload Ao O formulrio ser sempre ativado, depois de inicializado, ou seja, nesta condio, este evento ser disparado. Exatamente o contrrio do evento Active, ou seja, quando o formulrio deixa de estar ativo. Ocorre quando um controle arrastado solto dentro de um formulrio Este evento disparado quando o formulrio carregado para a memria, ou seja, antes de evento Active. Este evento disparado quando o usurio altera o tamanho do formulrio. Este evento o contrrio do evento Load. Quando exibida uma janela se voc tem certeza de que deseja fechar o formulrio, e responde "sim", este evento disparado.

Com o formulrio que esta aberto, vamos gerar o nosso primeiro aplicativo. O objetivo deste aplicativo ser : "encerrar a aplicao do sistema, quando clicarmos sobre o boto denominado FINALIZA". Primeiramente, vamos alterar algumas propriedades do formulrio: 1. Altere a propriedade CAPTION para PRIMEIRO EXEMPLO, neste ponto, sua rea de trabalho ter o seguinte aspecto:

Marcelino Macdo

- 13 -


2.

Inclua um componente COMMANDBUTTON, em destaque na figura a seguir:

3. Para incluir o componente no formulrio, basta dar um clique duplo sobre o mesmo, e automaticamente este ser incluso no seu formulrio, conforme podemos observar na figura a seguir:

4.

5.

Observe que, ao incluir um componente no formulrio, este passa a ser o objeto ativo, e a janela Properties automaticamente passa a exibir as propriedades do objeto selecionado, neste caso, o componente CommandButton; Nosso primeiro passo alterar o texto que aparece dentro do componente. Isto realizado na propriedade Caption do CommandButton. Altere esta para "Finaliza". Neste ponto, seu formulrio dever ter o aspecto seguinte:

Marcelino Macdo

- 14 -


6.

Agora deveremos programar o evento do clique do mouse sobre o boto, para que, neste caso, o sistema seja finalizado. Para acionar a janela de cdigos, j na programao destinada ao objeto desejado, neste caso o CommandButton, basta dar um duplo clique no objeto, ou seja, d um duplo clique no objeto CommandButton. Sua rea de trabalho, passar a ter o seguinte aspecto:

7.

8.

Observe que a janela de cdigo j esta aberta para o componente Command1, e no evento Click, ou seja, o evento que ser disparado quando o componente Commandbutton receber o click do mouse. Caso no fosse este o evento a ser programado, bastaria voc selecionar o novo evento na caixa de seleo sua direita. Observe que a mesma est apontando para o evento Click; Nosso objetivo que o sistema seja encerrado quando clicarmos sobre o CommandButton inserido em nosso formulrio, para isso, temos o comando END, que dever ser colocado entre o PRIVATE .... e o END SUB, pois eles marcam o inicio e o final da programao de um determinado evento. Logo, sua rea de trabalho dever ter o seguinte aspecto:

Marcelino Macdo

- 15 -


9.

Agora, tente executar o sistema. Para isso, basta clicar sobre o boto START da barra de ferramentas, que est em destaque na figura a seguir:

10. Ao executar o seu sistema, sua rea de trabalho ter o seguinte aspecto:

11. Observe que, em tempo de execuo, o formulrio que antes era cheio de pontinhos em seu interior, agora passa a ter uma cor uniforme. Os pontinhos, so apresentados ao desenvolvedor, para facilitar o enquadramento de componentes dentro do mesmo. Quando voc clicar sobre o boto "finaliza", observe que o sistema ser encerrado e o controle passar novamente ao VB6, possibilitando que voc continue o desenvolvimento de seu sistema. Vamos imaginar agora que voc ir salvar este projeto para continuar a trabalhar com o mesmo no dia seguinte. Para isso, basta clicar sobre o boto padro de SALVAR, o mesmo encontrado no Word, Excel, etc... Ao clicar sobre este, ser apresentada a seguinte janela:

Marcelino Macdo

- 16 -


Nesta janela voc ir definir o nome do formulrio de sua aplicao, este nome dever ser digitado na caixa de edio "Nome do Arquivo". Digite o nome de sua preferncia. Aps digitar o mesmo e clicar sobre o boto SALVAR, ser apresentada a seguinte janela na tela do seu micro:

Agora voc dever dar um nome para o seu projeto. Digite o mesmo e clique em seguida em SALVAR. O controle volta ao VB6. Como voc j salvou o projeto, basta fechar o VB6. - Aula 04 - Conhecendo um formulrio e desenvolvendo seu primeiro aplicativo Na aula passada estudamos os eventos e propriedades dos objetos. At ento, observamos como alterar as propriedades durante o processo de criao do projeto, porm poderemos tambm alterar as propriedades em tempo de execuo, ou seja, quando o aplicativo for executado. Vamos criar um novo projeto, simples, composto por um nico formulrio. Neste, apesar de no alterarmos a propriedade CAPTION do formulrio durante o processo de criao do sistema, iremos alterar a sua propriedade CAPTION durante a execuo do projeto. Inicie uma nova aplicao do tipo executvel e siga os passos a seguir: 1. D um clique duplo em qualquer rea livre do formulrio que est a sua disposio para a programao. Neste ponto sua rea de trabalho, dever ter o seguinte aspecto:

Marcelino Macdo

- 17 -


2. Observe que, ao efetuarmos o clique duplo em qualquer rea livre do formulrio, na janela de cdigo, o cursor j estar disponvel no evento LOAD do FORM1, ou seja, evento que ser executado quando o formulrio for carregado/executado. justamente neste evento que, atravs de cdigos de programa, iremos alterar o ttulo da janela do formulrio ( CAPTION ) via programao, para isso, digite o comando que apresentamos no grfico a seguir:

3. Observe que o comando FORM1.CAPTION = "PROJETO APRENDA EM CASA", est na verdade dizendo que, a propriedade CAPTION do objeto FORM1 igual "PROJETO APRENDA EM CASA". 4. interessante citar que, a propriedade CAPTION da janela PROPERTIES no teve o contedo alterado, conforme voc pode observar na figura acima, em seu canto direito inferior. Esta propriedade s ser alterada em tempo de execuo. Execute o projeto e verifique o resultado:

Marcelino Macdo

- 18 -


5. Apesar de no termos alterado em tempo de criao o contedo da propriedade CAPTION do FORM1, na janela PROPERTIES, o fizemos atravs do comando visto acima, em tempo de execuo. Como no fizemos nenhuma espcie de codificao para finalizar o sistema, neste caso, voc dever clicar sobre o boto (X) que se encontra na parte direita superior da janela. Conforme voc observou, a forma bsica de se alterar uma determinada propriedade em tempo de execuo, a sintaxe : Objeto/Componente.Propriedade = contedo Vamos ver mais um exemplo, de como se trabalhar com eventos. Desta vez, vamos instruir o equipamento de que, todas as vezes que o formulrio seja carregado, ele ocupe o centro absoluto do seu monitor. Isso tambm ser realizado no evento LOAD do FORM1. Para isso, iremos introduzir a seguinte linha de cdigo, conforme mostra a figura a seguir:

Observe que, ordenamos ao equipamento que, ao ocorrer o carregamento do formulrio, ele seja movido (MOVE), para a posio vertical,horizontal centralizada do monitor, ou seja, Screen.Width e Screen.Height. Execute novamente o sistema e verifique que a janela da aplicao, nesta oportunidade ser exibida de forma centralizada. Agora vamos imaginar que o usurio poder tambm, em tempo de execuo, alterar o tamanho do formulrio, clicando e arrastando as suas bordas. Como faramos para centralizar o formulrio automaticamente sempre que tal procedimento fosse detectado? Isso fcil, basta repetir a linha MOVE (Screen........ para o evento RESIZE do FORM1. Feche a aplicao, d um clique duplo em qualquer rea livre do formulrio e em seguida, selecione na caixa de seleo sua direita da janela de cdigo, o evento RESIZE, codificando o mesmo conforme mostra a figura a seguir:

Execute o aplicativo e teste o mesmo, clicando e arrastando alguma das bordas da janela deste, e verifique que, ao acabar de redimensionar o formulrio, automaticamente ele ser centralizada, pois o evento

Marcelino Macdo

- 19 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante RESIZE, que ocorre sempre que o formulrio redimensionado pelos processos de clicar e arrastar disparado. Vamos imaginar uma nova situao. Quando o usurio clicar no boto de fechar, voc quer que seja apresentada uma nova janela agradecendo pelo uso do seu aplicativo. Primeiramente, devemos definir o evento que dever ser codificado. Neste caso o evento UNLOAD do formulrio, que executado sempre que o formulrio fechado. O outro fator saber qual comando usar para abrir a nova janela de agradecimento, que neste caso o MSGBOX, ou seja, o comando que abre uma janela de dilogo. Encerre o aplicativo caso o mesmo ainda esteja ativo e, aps dar um clique duplo em qualquer rea livre do formulrio, j dentro do editor de cdigo, selecione o evento UNLOAD do objeto FORM, entrando com a seguinte codificao:

Observe que entramos com o comando MSGBOX (construa uma caixa de dilogo) ("Obrigado pelo uso de Nosso aplicativo") (exiba a mensagem que est entre aspas) ,vbYes ( e disponibilize o boto de OK). Execute seu aplicativo e em seguida, clique sobre o boto (X) de fechar, ser ento apresentado o seguinte resultado:

Observe que a programao for Windows, tem como um dos seus grandes segredos, o conhecimento dos eventos, ou seja, em que determinado evento deveremos codificar uma determinada ao. Antes de iniciarmos o estudo dos componentes que iremos utilizar para gerar aplicativos, vamos falar sobre um dos assuntos principais em qualquer linguagem de programao, as variveis. O objetivo do uso de variveis dentro de um aplicativo o de manipular e tratar dados processados pelos programas que fazem parte do seu projeto. No Visual Basic, temos os seguintes tipos principais de variveis: Tipo da varivel Empty Null Integer Long Single -32.768 a 32.767 -2.147.483.648 a 2.147.483.647 -3.402823E38 a 3.402823E38 Faixa de valor a armazenar

Marcelino Macdo

- 20 -


Double Currency Date/Time String OLE Boolean Byte

-1.79769633486232 a 4.94065645841247E-324 -322337203685477.5808 a 922337203685477.5807 01/01/0100 a 31/12/9999 At 65.500 bytes

True ou False 0 a 255

Poderemos declarar as variveis que sero utilizadas em nosso sistema de duas formas: 1. Nas sees GENERAL-DECLARATION do Form, mdulo ou classe; 2. Dentro de um determinada SUB, existente em um determinado Objeto ou uma Sub criada por voc mesmo. As variveis podero ser de duas categorias, conforme mostra a tabela a seguir: Categoria de varivel Consideraes Podem ser manipuladas em qualquer ponto do projeto. Exemplo de declarao de uma varivel global: Global endereco as String Public salario as currency Podem ser utilizadas apenas no local onde foram declaradas. Exemplo de declarao de uma varivel local: Dim endereco as String Private salario as currency

Globais/Pblicas

Locais/Privadas

- Aula 05 - Constantes, vetores e matrizes No VB, temos tambm o que chamamos de constantes, ou seja, locais de memria que tero sempre um valor constante durante a execuo do aplicativo. Tal tcnica faz com que o seu projeto fique melhor documentado e de melhor compreenso para outros profissionais que por ventura tenham que continuar o trabalho de desenvolvimento de seu projeto. Quando falamos em constantes no VB, possumos duas categorias: 1. Constantes Predefinidas; 2. Constantes criadas. As constantes criadas, so aquelas geradas pelo prprio desenvolvedor, declaradas na seo DECLARATION. A sintaxe de declarao de constantes : Public Const nome_da_constante = valor Veja a seguir alguns exemplos: Public Const limite_vagas = 50 Public Const limite_idade = 25 As constantes predefinidas, geralmente so usadas em janelas de dilogo, assim como utilizamos no exemplo gerado no mdulo de aula passada, onde foi gerada uma janela de dilogo agradecendo pelo uso do sistema e o boto de OK gerado automaticamente, pela constante predefinida vbYes. Veja a seguir as constantes predefinidas de maior uso no VB: vbYesNo vbRed vbExclamation vbBlue vbQuestion vbRed vbYes vbNull vbNo vbEmpty

Com o tempo, voc ir dominar o uso das mesmas, no momento, basta entender o porque e um pouco de sua lgica, como foi a da gerao do boto OK, dentro da janela de dilogo do exemplo anterior. Uma outra tcnica de programao bastante utilizada o uso de vetores e matrizes, ou seja, uma varivel que dividida em vrias partes para armazenar em cada uma dessas partes um determinado valor. Vamos imaginar um prdio residencial. Ele nico, porm divido em apartamentos e cada apartamento possui uma famlia diferente de moradores. Desta forma teramos: Prdio residencial ....... = ........ varivel Cada apartamento ..... = ........ diviso da varivel ( vetor ou matriz ) Cada famlia .............. = ........ ocupando um apartamento, ou seja, um valor diferente para cada varivel O Visual Basic possibilita o uso de de vetores unidimensionais (com apenas uma diviso), at o uso de grandes matrizes multidimensionais (com mais de uma diviso). Para criar uma varivel dos tipos citados, proceda da seguinte forma:

Marcelino Macdo

- 21 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Dim faixasalarial(10) as currency Observe que teremos 11 divises para a varivel faixasalarial, e cada uma das divises, poder armazenar um valor diferente. Mas se tenho um vetor definido em 10, porque tenho 11 posies? Porque o vetor inicial tem numerao igual zero, e a mxima igual ao nmero especificado dentro dos parnteses. Ento, teramos: faixasalarial(o) = valor a faixasalarial(o) = valor a faixasalarial(1) = valor b faixasalarial(2) = valor c ... ... ... faixasalarial(10) = valor k - Aula 06 - Eventos - Aprendendo na prtica Nesta aula, iremos gerar um pequeno exemplo para entender melhor o que so eventos. Inicie o VB solicitando um novo projeto. Sua rea de trabalho ter o seguinte aspecto:

Vamos trabalhar com trs componentes: 1 TextBox. Estes componentes esto circulados na figura a seguir:

2 CommandButtons;

Sendo que, de cima para baixo, o primeiro um Textbox e logo abaixo, temos o CommandButton. Insira estes trs componentes dentro do seu formulrio. Lembrando que: 1. Para inserir um componente em um formulrio, basta dar um clique duplo sobre o componente, e este ser automaticamente inserido; 2. Para posicionar um componente no local desejado do formulrio, basta clicar e arrastar o mesmo para o local desejado; 3. Para redimensionar (aumentar ou diminuir o tamanho) o mesmo, basta clicar e arrastar em uma das bordas que circulam o componente. O formulrio ao final do procedimento, dever estar com o seguinte aspecto:

Marcelino Macdo

- 22 -


Observe que, para os componentes COMMAND, apenas os posicionamos em um novo local do formulrio, j para o componente TextBox, redimensionamos o seu tamanho. Agora, inclua um componente LABEL, acima do componente TextBox. O componente Label est circulado na figura a seguir, e sua posio final j est desenhada:

Nosso sistema, ter o seguinte objetivo: A) Ter uma rea para digitao de texto, procedimento que ser realizado no TextBox; B) Ter um boto na qual possamos limpar o contedo da caixa de texto, procedimento este que ser realizado atravs do CommandButton1; C) Ter um boto para finalizar o aplicativo, procedimento que ser realizado atravs do CommandButton2; Observamos que, de acordo com o nosso objetivo, iremos trabalhar a principio com o evento OnClick ( ao receber um click ) dos CommandButton. Primeiramente, vamos melhorar alguns aspectos de nosso formulrio, dando um ttulo a janela do mesmo. Para isso, conforme estudamos anteriormente, temos as propriedades. Selecione o formulrio, clicando em qualquer rea livre deste, e na janela de propriedades, deveremos alterar o CAPTION do formulrio, ou seja, a propriedade que indica o texto que ser apresentado na barra de ttulo do formulrio. Altere este propriedade para "Projeto de Testes de Eventos". Ao final deste procedimento, seu formulrio ter o seguinte aspecto:

Marcelino Macdo

- 23 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Observe que inserimos uma caixa de texto em nosso formulrio ( Label ) ela tem o objetivo de inserir um texto, uma espcie de etiqueta para exibir uma informao ao usurio. Pelo fato de estar disposta acima da caixa de edio, qual seria a melhor frase para orientar o usurio? Que tal : "Digite uma frase na caixa de texto abaixo". Assim como no FORM, a propriedade CAPTION especifica o texto que ser exibido na barra de ttulo, o texto que ser exibido dentro da rea da etiqueta, dever ser digitado na propriedade CAPTION do componente LABEL. Selecione o mesmo, dando um clique simples sobre ele, e altere a propriedade CAPTION deste para o texto sugerido. Ao final deste procedimento, teremos a seguinte imagem em nossa rea de trabalho:

Vamos trabalhar mais um pouco com as propriedades do LABEL, alterando a cor da fonte do texto que est sendo exibido em seu interior. Para isso, temos a propriedade FORECOLOR do mesmo. O LABEL j est selecionado, basta na janela PROPERTIES localizar a propriedade FORECOLOR, e dar um clique sobre sua caixa de seleo e clicar sobre a cor vermelha, conforme mostra a figura a seguir:

A principio o nosso formulrio e nossa etiqueta esto configurados. Agora, observe que dentro da caixa de edio ( TextBox ), existe uma palavra denominada "Text1", que na verdade, alm da frase que ser apresentada quando o sistema for executado, representa o nome do componente dentro do cdigo. Vamos fazer com que nada aparea dentro da caixa de edio quando o sistema for executado, para isso, basta apagar todo o contedo da propriedade TEXT do componente TEXTBOX. Execute este procedimento. Agora, vamos dar uma espcie de rtulo aos nossos botes, ou seja, a nvel de usurio, qual o objetivo do boto 01? e do boto 02? Sabemos que o primeiro dever limpar o contedo eventualmente digitado no TextBox e o segundo, tem a funo de finalizar o sistema. Ento, iremos alterar o CAPTION do CommandButton1 para "LIMPA" e o contedo do CAPTION do CommandButton2 para "FINALIZA". Ao final deste procedimento, sua rea de trabalho ter o seguinte aspecto:

Marcelino Macdo

- 24 -


Observe que a nvel de informao e visual o nosso formulrio est dentro do esperado. Agora temos que codificar os eventos necessrios a sua operao. O primeiro evento est ligado ao click no boto "LIMPA". Observe que, ao clicar sobre este, o sistema dever apagar o contedo do TextBox. Primeiro devemos identificar de que forma chamado o componente TEXTBOX dentro do projeto. Esse nome identificado na propriedade NAME do componente. Para isso, se voc selecionar o componente TEXTBOX e verificar a sua propriedade NAME, esta estar igual a TEXT1, conforme podemos observar na figura a seguir:

este o nome que deveremos utilizar dentro da codificao do sistema. Na prxima aula iremos dar algumas dicas sobre a nomenclatura de componentes. Vamos ento codificao: Nosso objetivo limpar o contedo que por ventura tenha sido digitado no componente TEXTBOX, daqui para frente denominado de TEXT1. Sabemos que a propriedade TEXT deste componente que armazena o contedo digitado no mesmo, logo deveremos igualar a propriedade TEXT do componente TEXT1 uma string vazia ( "" ). Quando vamos especificar um valor a uma determinada propriedade de um determinado componente em tempo de execuo, usamos a sintaxe a seguir: Nome_componente.Propriedade = valor Sabendo disso, d um clique duplo no boto CommandButton1, que possui o rtulo "LIMPAR, e dentro da rea de cdigo, programe conforme mostra a figura a seguir:

Ou seja, estamos dizendo que, ao se clicar sobre o componente Command1 ( Commandbutton1 ), o sistema dever jogar uma String nula como valor da propriedade Text do componente Text1.

Marcelino Macdo

- 25 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Nosso prximo passo programar o evento Clicar do segundo boto ( Command2 - CommandButton2 ), pois quando o usurio clicar sobre ele, o sistema dever ser finalizado. Volte o controle para o formulrio e d um clique duplo no CommandButton2, e dentro da rea de cdigo que ser aberta, codifique conforme a figura a seguir:

Dentro do que foi proposto, nosso sistema est finalizado. Execute o mesmo, digite algo dentro da caixa de edio, clique sobre o boto LIMPAR e em seguida, clique sobre o boto FINALIZAR para que veja na prtica o efeito do que foi gerado. claro que este sistema simples, estamos nas primeiras aulas, apenas habituando o aluno a trabalhar com componentes, propriedades e eventos. - Aula 07 - Caixa de Ferramentas e Controles At o momento, acreditamos que voc j percebeu que, o formulrio ser a base de quase tudo o que fizer em VB. Estes formulrios sero preenchidos com controles (componentes), e atravs das propriedades e eventos dos formulrios e respectivos controles, que seu sistema ser gerado. Nesta aula, iremos estudar um pouco mais sobre a caixa de ferramentas e seus diversos controles. Temos basicamente trs tipos de controles:

Controles invisveis, que no so exibidos aos usurios e apenas fazem parte do controle interno da aplicao. Conforme observamos na aula anterior, para incluir um controle no formulrio, basta dar um clique duplo sobre o mesmo. As propriedades dos controles estaro disponveis na janela de Propriedades. A caixa de ferramentas a janela que armazena os controles personalizados para serem utilizados em seu aplicativo. Iremos a seguir estudar os controles que esto dispostos na caixa de ferramenta. Veja a figura a seguir:

Os que fornecem a comunicao com o usurio, como as caixas de edio; Os que extraem respostas, como os botes de comando;

Marcelino Macdo

- 26 -


A seguir, iremos falar um pouco sobre os componentes mais comuns que sero usados em suas aplicaes VB. Controle LABEL Este controle responsvel por exibir um texto no formulrio, ou seja, uma etiqueta. Este texto utilizado para somente leitura, e poder ser alterado atravs de sua propriedade Caption, tanto em tempo de desenvolvimento quanto em tempo de execuo. O principal uso deste componente exibir informaes ao usurio. As propriedades mais importante de um LABEL so: Name Caption Autosize define o nome do componente a ser utilizado dentro da fonte do sistema. Esta propriedade armazena o texto que ser exibido sobre a forma de etiqueta. Quando configurada para true, faz com que o "tamanho" do componente seja automaticamente configurado de acordo com o tamanho do texto a ser exibido. Faz com que exista uma quebra automtica de linha, expandido o tamanho da legenda em uma linha, caso o texto definido em Caption, ultrapasse o limite horizontal de tamanho do Label. Controle CommandButton Os botes so utilizados para extrair respostas simples do usurio ou ainda para chamar determinadas funes dentro de um formulrio, como por exemplo, uma funo para limpar o contedo de uma caixa de edio, finalizar o sistema, etc... Tais procedimentos sero realizados aps o click no boto, ou seja, aps o evento OnClick do mesmo. Na tabela a seguir, iremos citar as propriedades mais importantes do CommandButton: Name Caption Style Esta propriedade determina o nome pelo qual o controle ser referenciado na fonte do projeto. Armazena o texto que ser exibido dentro do CommandButton. Nesta poderemos definir se o boto ir aceitar apenas texto dentro de seu interior

WordWrap

Marcelino Macdo

- 27 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante ou se o mesmo poder aceitar grficos. No caso de inserir uma figura, dever definir a mesma na propriedade Picture. Enabled Esta propriedade caso esteja setada como False, desativa o boto em um determinado formulrio.

Na tabela a seguir, iremos apresentar os eventos mais comuns do CommandButton: Click MouseUp Evento que disparado quando o boto recebe um clique do mouse. Evento que disparado quando o ponteiro do mouse passa sobre o boto.

Controle TextBox Utilizadas para proporcionar a entrada de dados, atravs do teclado, por parte do usurio. Na tabela a seguir, temos as principais propriedades do controle em questo: Name Text MaxLenght Passwordchar Multiline Armazena o nome do controle, que dever ser utilizado na fonte do sistema Armazena o contedo digitado na caixa de texto. Neste caso, esta propriedade substitui a Caption Limita o nmero de caracteres que poder ser digitado pelo usurio em tempo de execuo. Utilizado para mostrar o caracter * enquanto existe a digitao do contedo. til para utilizao em campos do tipo senha. Permite ao no ao usurio digitar mais de uma linha na caixa de texto Caso configurada como true, far a caixa de texto exibir dados, sem permitir a sua edio. Este tipo de caixa bastante utilizado nas caixas de texto que contm o texto de licenciamento de um determinado software, sendo que neste caso, o contedo da caixa dever ser previamente digitado na propriedade Text.

Locked

Os principais eventos das caixas de texto so: Change Ocorre sempre que o usurio inserir, substituir ou excluir um caracter da caixa de texto

- Aula 07 - Caixa de Ferramentas e Controles Controle : Botes de opo : Option Button Dentre as principais propriedades de um boto de opo temos: Propriedade Name Caption Funo Nome dado ao componente, que ser utilizado dentro do cdigo fonte da aplicao sempre que o sistema apontar para o mesmo. Utilizada para permitir ao usurio determinar a finalidade de cada um dos botes de opo. Propriedade geralmente utilizada durante o sistema em tempo de execuo, pois atravs desta, o sistema saber de uma opo est ou no marcada, atravs do resultado True ou False. Se estiver setada para "0 - STANDARD" ser desenhado um boto de opo padro, caso contrrio, estando setado para "1 - Graphical", o boto de opo ter a aparncia de um boto de comando, permitindo apenas uma seleo dentro de um grupo.

Value

Style

Dentre os principais eventos de um boto de opo, podemos citar: Click Evento onde mais comumente testado o valor da propriedade Valeu do boto, ou seja, aps clicado sobre uma determinada opo.

Controle :Caixa de seleo : Check Box Este controle muito similar ao boto de opo, testando-se a propriedade VALUE de ambos para saber se um controle est ticado ou no. As diferenas fundamentais entre estes dois controles so: 1. As caixas de seleo representam controles simples; 2. As caixas de seleo no so mutuamente exclusivas.

Marcelino Macdo

- 28 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Sendo assim, um boto pode possuir dois estados : True ou False (selecionado ou no), j uma caixa de seleo poder ter at trs estados: selecionada, no selecionada e acinzentada (nem ativada e nem desativada, indicando que aquela opo no poder ter o seu contedo alterado pelo usurio). Controle : Caixas de lista : List Box Este controle tem a finalidade de exibir ao usurio uma lista de dados. Exemplo: Uma lista de todos os estados do Brasil, que ser disponibilizada ao usurio no ato do preenchimento do estado residencial do mesmo em sua ficha cadastral.Esta lista poder oferecer ao usurio a oportunidade de seleo de um ou mais de seus dados para que esta seleo seja utilizada em processamento posterior. Os dados de uma lista no podem ser editados de forma direta, ou seja, na prpria lista, pois como o nome diz, um controle de seleo e no de alterao de dados. Veja a seguir as principais propriedades das caixas de lista: Propriedade List ListCount MultiSelect Selected Sorted Retorna o valor selecionado de uma lista Fornece o nmero de itens de uma caixa de lista Determina se o usurio pode ou no selecionar mais de um item da lista Propriedade boleana que pode assumir um valor para que em tempo de execuo um valor da lista esteja previamente selecionado. Classifica ou no os itens de uma lista Objetivo

A propriedade list dever ser utilizada com uma indexao de itens, ou seja, as posies dos valores de uma caixa de lista se iniciam em zero e vo at o nmero total de itens menos 1. Este ndice dever ser utilizado tambm na propriedade Selected, conforme observamos no exemplo a seguir: List1.Selected(4)=true No comando acima, estamos pr-selecionado (via cdigo) o quarto item da lista. O evento mais utilizado nas caixas de lista o DblClick(), ou seja, verificando o item selecionado. J o mtodo AddItem utilizado para preencher os itens de uma lista. O mtodo RemoveItem utilizado para excluir um item de uma lista e o mtodo Clear utilizado para remover todos os itens de uma lista. Observe os exemplos a seguir: List1.additem "Paulo" No exemplo acima, na caixa de lista denominada "List1" foi incluso o valor "Paulo". - Aula 09 - Personalizando a sua caixa de ferramentas Aos poucos, atravs de exemplos, voc ir se acostumando com os controles vistos nas aulas anteriores e os novos que iremos estudar. importante citar que o Visual Basic possui um nmero muito maior de controles, fora os que voc j teve contato visual atravs de sua barra de ferramentas. Vamos agora, explicar passo a passo como incluir novos controles a sua caixa de ferramentas, pois esta habilidade ser de fundamental importncia para o programador. Siga os passos a seguir: Primeiramente vamos citar as seguintes situaes: Observe que a sua caixa de ferramentas formada por fichas e, por padro, temos uma nica ficha ao instalar o VB, denominada GENERAL, conforme podemos observar na figura a seguir: Conforme voc pode observar, no topo da caixa de ferramentas, existe uma GUIA, denominada GENERAL. importante que, o desenvolvedor para facilitar o seu trabalho, crie novas GUIAS ou FICHAS para organizar os novos controles que sero inclusos na caixa de ferramentas, adicionando novas GUIAS e em seguida, instalando os novos componentes na mesma. Para criar novas GUIAS, proceda da forma a seguir: 1. Clique com o boto direito do mouse sobre qualquer rea livre da caixa de ferramenta. Neste ponto, ser apresentado um menu, conforme mostra a figura a seguir:

Marcelino Macdo

- 29 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante 2. Neste menu, selecione a opo ADD TAB, ser ento exibida a seguinte janela:

3. Digite o nome da nova GUIA na janela em destaque na figura acima e em seguida clique em OK. Neste exemplo, vamos digitar o nome AVANCADO. Veja como ficar a sua caixa de ferramentas aps o trmino desta operao:

Observe que temos duas GUIAS : GENERAL e AVANCADO. D um clique simples sobre a guia AVANADO e veja o que ir acontecer na sua rea de trabalho:

Observe que, os controles da caixa GENERAL foram escondidos e esto sendo exibdos os controles da guia AVANCADO, que por padro, possui apenas o controle de seleo, que incluso sempre que uma nova guia for adicionada a sua caixa de ferramentas. Agora, para que possamos incluir controles nesta nova guia, ou at mesmo em outra guia, bem como na guia GENERAL, proceda da seguinte forma: 1. Clique com o boto direito do mouse sobre a rea livre da GUIA que ir receber o novo controle; 2. No menu suspenso que apresentado, selecione a opo COMPONENTS, ser ento apresentada a seguinte janela:

Marcelino Macdo

- 30 -


3. Na guia CONTROLS, selecione o(s) controle(s) que deevro ser inclusos na caixa de ferramentas, na guia AVANCADO. No nosso caso, como exemplo, iremos incluir o CONTROLE DE ADMINISTRAO DE IMAGENS KODAK e o CONTROLE DE DIGITALIZAO DE IMAGENS KODAK, e em seguida, clicar em OK. Observe como ir ficar a nossa caixa de ferramentas:

Observe que os dois novos controles j esto na nova GUIA que voc criou. Caso queira inserir um controle que ets na guia GENERAL no seu projeto, vasta selecionar a GUIA e assim sucessivamente. Lembramos que voc poderia incluir todos os controles em uma nica GUIA, como por exemplo a GENERAL, porm a diviso dos controles por GUIAS de grande utilidade para a organizao e fcil localizao dos controles durante o processo de desenvolvimento. - Aula 10 - Alterando as propriedades em tempo de execuo Uma das tcnicas mais utilizadas em projetos VB alterar as propriedades de um determinado componente em tempo de execuo, ou seja, enquando o seu sistema est sendo operado. Veja alguns exemplos de alterao de propriedades em tempo de execuo:

Alterar o texto a ser exbido dentro do command buttom (propriedade CAPTION) de acordo com uma situao especfica;

Alterar o fator do boto estar disponvel ou no (aceita ou no o click) de acordo com uma situao especfica. Exemplo: Em determinados momentos, o boto de SALVAR do WORD est desabilitado, ou seja, no aceita o click. Primeiro, voc dever conhecer bem as propriedades dos componentes na qual ir trabalhar. Vamos pegar como exemplo um boto de comando, que possui dentre as propriedades mais utilizadas CAPTION, VISIBLE e ENABLED. Como poderamos alterar estas propriedades durante a execuo do programa, atravs de linhas de cdigo? Existem duas formas para tal finalidade: (001) - Atravs da especificao do componente, seguido de ponto e da propriedade com o seu respectivo valor, conforme podemos observar no exemplo a seguir:

Marcelino Macdo

- 31 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Private Sub Form_Load() Command1.Caption="SALVAR" Command1.Visible=false Command1.Enabled=false End Sub No exemplo acima, alteramos as propriedades uma a uma, assim que o formulrio foi carregado, pois tais comandos esto no evento LOAD. (002) - Atravs da especificao do componente a da listagem atravs do comando WITH das propriedades a serem alteradas e seus respectivos valores, conforme poderemos observar a seguir: Private Sub Form_Load() With Command1 .Caption="SALVAR" .Visible=false .Enabled=false End With End Sub muito importante que voc tenha entendido tal procedimento, pois o emprego desta habilidade comum. Observe que entre os dois cdigos citados acima, na forma 002, economizamos escrita de cdigo e diminuimos o fator erro, pois muito mais fcil errar a digitao da palavra Command quando digitada 5 vezes do que quando digitada 1 vz. Apenas no aconselhvel usar o mtodo 002 quando temos apenas uma propriedade a alterar em tempo de execuo. Um outro procedimento comum o uso das abreviaes em nome de componentes, procedimento indicado no momento em que voc inclua os objetos na janela do seu projeto. Tais denominaes (propriedade NAME) devem ser legveis e condizentes com a funo desejada para os mesmos. Veja o exemplo a seguir: Quando incluimos um boto de comando, ele automaticamente recebe o nome de COMMAND1 na janela de propriedades e sempre que for invocado em seu cdigo. Ao incluir um prximo boto decomando ele ter o nome COMMAND2, e assim sucessivamente. O programador dever ter a noo de que ir utilizar muitos componentes do tipo COMMAND BUTTON e outros e, alterando assim seus nomes para algo que lembre a sua finalidade, facilitar a interpretao do cdigo do mesmo. Vamos imaginar que o boto 01 tenha a finalidade de finalizar o seu projeto, ou seja, sair do mesmo. Ao invs de ter o nome de COMMAND1 no projeto, seria mais fcil alterar o valor da propriedade NAME para CMDSAIR, ou seja, "comando sair". Desta forma a interpretao do cdigo por parte do desenvolvedor e de um terceiro profissional que por ventura tenha que analisar o cdigo seja facilitada.. Veja como outro exemplo, um boto de opo que ir receber o estado civil do cliente, este boto de opo poderia se chamar OPT_EST_CIVIL. Acreditamos que os exemplos e motivos expostos so o suficiente, de agora em diante, siga estes passos e ter um fonte legvel e de fcil interpretao. - Aula 11 - Nosso primeiro projeto Em nosso primeiro projeto, vamos gerar um simples programa onde teremos em um formulrio, os seguintes componentes:

1 Command Buttom (botes de comando). A finalidade de nosso primeiro projeto ser a de criar uma espcie de calculadora, ou seja, ao clicarmos sobre um dos BUTTONS (que dever ter o caption igual SOMA), o terceiro TextBox ir receber a soma dos valores inseridos nos dois primeiros TextBox. Com este pequeno e simples projeto, iremos entrar em um novo assunto na programao VB, denominado "Funes". Inicie uma nova aplicao no VB e, insira os componentes supra citados. Ao final deste procedimento, sua janela ter o seguinte aspecto:

3 Textbox (caixas de texto) 3 Labels.

Marcelino Macdo

- 32 -


O primeiro passo alterar a propriedade CAPTION dos LABELS, respectivamente para : "DIGITE UM NMERO", "DIGITE OUTRO NMERO", "RESULTADO DA SOMA". Ao final desta alterao, seu formulrio ter o seguinte aspecto:

Em seguida, iremos apagar o contedo da propridade TEXT de todos os TextBox. Com isso, o interior destes componentes no iro mais exibir as palavras TEXT1 ... TEXT2 ... TEXT3. Altere a propriedade CAPTION do CommandButtom para "SOMAR". Ao final destes procedimentos, seu formulrio ter o seguinte aspecto: Temos o obejtivo de fazer com que, aps clicar sobre o boto "SOMAR", seja exibido no terceiro TextBox a soma dos valores entrados nos dois primeiros TextBoxes. Porm observe o seguinte: 1. Em um TextBox, o contedo digitado interpretado como String, ou seja, um valor fixo e que no poder sofrer nenhuma espcie de operao matemtica. Tendo o conhecimento de tal regra, vamos tentar de forma direta, executar a soma do contedo do Textbox1 e do Textbox2 armazenando o seu resultado em TextBox3. D um clique duplo sobre o Buttom e entre com o seguinte cdigo: Private Sub Command1_Click() Text3.Text = Text1.Text + Text2.Text End Sub Execute o seu projeto. No primeiro Textbox, digite o valor "12" e no segundo o valor "34". Em seguida, clique sobre o boto "SOMAR" e veja o resultado no terceiro TextBox:

Marcelino Macdo

- 33 -


Observe que o resultado da soma foi "1234", ou seja, um valor errado, pois a soma correta de 12 + 34 = 46. Mas o porque este resultado? Quando solicitamos de forma direta a soma "+" do contedo do Textbox1 com o contedo do TextBox2 ( text1.text+text2.text), estamos na verdade solicitando uma concatenao, ou seja, o agrupamento de duas Strings, onde as mesmas so colocadas uma ao lado da outra, sendo assim, em uma concatenao de "12"+"34" igual "1243". Conforme citamos, o contedo dos Textboxes so considerados Strings. Como neste caso queremos realizar uma operao matemtica, deveremos utilizar uma funo para transformar String em nmero. Sendo assim, teremos que digitar o seguinte contedo no evento click do Buttom: Private Sub Command1_Click() Text3.Text = (Val(Text1.Text) + Val(Text2.Text)) End Sub No comando acima, estamos utilizando a funo VAL, que tem o objetivo de transformar String em nmero, assim sendo, agora teremos em Text3 o resultado da soma dos nmeros de Text1 e Text2. Execute o projeto, entre com os mesmos valores e veja o resultado aps o clique no boto SOMA:

Outro detalhe interessante que, antes de usarmos a funo VAL, com o operador "+", o projeto compilou e executou sem erros, porque estamos solicitando uma concatenao, porm se tentarmos usar o operador de multiplcao (*) por exemplo, o VB ir gerar um erro, pois em Strings no existe a operao de multiplicao. A sintaxe da funo VAL a seguinte: VAL (varivel) O objetivo da funo VAL converter o contedo de uma varivel String para uma varivel numrica. Ao contrrio do que voc pode estar pensando, as funes no existem apenas para transformar valores String para numricos. Existem funes para manipulao de Datas, Strings, nmeros, etc... Nossa prxima aula ter o objetivo de estudar as principais funes do VB6.

Marcelino Macdo

- 34 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante - Aula 12 - Funes VB6 Neste modo iremos expor as principais funes do VB6, que sero de grande utilidade em aplicativos comerciais. Funo ABS Tem a finalidade de retornar o valor absoluto e positivo de um nmero ou da varivel informada. A sintaxe de construo deste comando extremamente simples: Abs (nmero_ou_varivel) No exemplo a seguir, quando o formulrio for carregado, iremos armazenar na varivel "exemplo" o valor 2001, e atravs de uma caixa de dilogo, iremos apresentar este nmero em seu valor absoluto. Veja a fonte do sistema a seguir: Private Sub Form_load() Dim exemplo as Double Let exemplo = -2001 Msgbox (str(abs(exemplo))) End Sub Observe que no exemplo anterior, usamos tambm a funo STR, que tem a funo de converter um nmero em string, pois apenas neste formato que aceito uma informao na caixa de msgbox. Logo, usamos duas funes em uma mesma linha de cdigo, sendo que a primeira transforma o nmero em string e a segunda o nmero em absoluto e positivo. Ser exibida na caixa de dilogo o nmero 2001. Funo FIX Tem a finlidade de retornar um nmero inteiro e sem arredondamento. Sua sintaxe : Fix (nmero_ou_varivel) Funo Hex Tem a funo de transformar um nmero decimal em hexadecimal. Sua sintaxe : Hex (nmero_ou_varivel) Funo Int Tem a funo de retornar o inteiro de um nmero com arredondamento. Sua sintaxe : Int (nmero_ou_varivel) Funo RND Tem a funo de retornar um nmero aleatrio de 1 at o nmero especificado. Sua sintaxe : RND (nmero) Funo VAL Tem a finalidade de transformar o valor de uma String em nmero, ou seja, o inverso da funo STR observada no primeiro exemplo. Sua sintaxe : VAL (string_ou_varivel) Funo Curdir Tem a finalidade de retornar o diretrio atual onde o usurio estiver atuando. Veja a seguir um simples exemplo construdo passo a passo com esta funo: 1. Primeiro abra o Visual Basic e inicie um novo projeto; 2. Insira no formulrio dois componentes Labels, disponibilizando estes um abaixo do outro; 3. Na propriedade CAPTION do primeiro Label, insira : "Diretrio atual de trabalho"; 4. Na propriedade CAPTION do segundo label, apague todo o contedo; 5. No evento LOAD do formulrio, entre com a seguinte codificao: Private Sub Form_Load() Dim diretorio As Variant diretorio = CurDir Label2.Caption = diretorio End Sub execute o seu projeto. Voc ter como retorno, uma janela mais ou menos como a que segue:

Marcelino Macdo

- 35 -


Observe que o caminho na qual voc est operando no momento exibido no label2. Funo Left Esta funo tem o objetivo de retornar x caracteres a partir da esquerda de uma string. Sua sintaxe : Left (varivel, nmero_caracteres) Observe o exemplo a seguir: Private Sub Fom_load() Dim empresa as String Let empresa="Projeto Aprenda em Casa" MsgBox (left(empresa,7)) End Sub No exemplo acima, teremos uma caixa de mensagens apenas com a palavra "Projeto", pois solicitamos que seja exibida na mesma apenas as 7 primeiras posies (caracteres) da varivel empresa. Funo Right Tem praticamente o mesmo objetivo da funo Left, com exceo de retornar x caracteres a partir da direita da String. Veja o exemplo a seguir: Private Sub Fom_load() Dim empresa as String Let empresa="Projeto Aprenda em Casa" MsgBox (Right(empresa,7)) End Sub No exemplo acima, teremos uma caixa de mensagens apenas com a frase "em Casa", ou seja, os 7 ltimos caracteres da varivel "empresa".

- Aula 13 - Funes VB6 Neste mdulo iremos gerar nossa segunda aplicao VB, sendo que o objetivo da mesma gerar uma calculadora. Nesta calculadora, iremos utilizar as funes e diversos eventos, o que ir facilitar o aprendizado dos tpicos estudados nos mdulos anteriores. Para este projeto, siga os passos a seguir: Inicie uma nova aplicao VB; No formulrio, na parte superior deste, inclua um objeto TEXTBOX, fazendo com que o mesmo ocupe toda a parte superior do form; Altere a propriedade Caption do formulrio para PROJETO CALCULADORA; Apague o contedo da propriedade Text do objeto TextBox; Vamos agora, com o uso dos objetos CommandButton montar as teclas de nossa calculadora, para isso, posicione 17 objetos CommandButton conforme mostra a figura a seguir:

Marcelino Macdo

- 36 -


O prximo passo alterar a propriedade Caption dos CommandButton 01 ao 10 para 0,1,2,3,4,5,6,7,8,9,0 respectivamente, formando assim o teclado numrico de nossa calculadora. Agora, iremos gerar os botes que iro representar as operaes aritmticas de nossa calculadora. Estes botes sero os de nmero 11 ao 16, contendo respectivamente o seguinte contedo: +,-,*,/,=,C. Altere o Caption dos mesmos para os valores apresentados. Finalmente, configure o Caption do Command17 para "FIM". Ao final deste procedimento, seu formulrio dever ter o seguinte visual:

O primeiro passo configurar os botes de comando que representam os nmeros que iro ser utilizados no teclado numrico de nossa calculadora. A lgica a seguinte: Cada vez que o usurio clicar sobre um dos botes numricos, este dever se acrescentado ao TextBox. Ou seja, teramos a seguinte situao: Contedo do TextBox = Contedo do TextBox + valor representado pelo boto. Observe que, o TextBox uma String e, deveremos realizar uma concatenao, ou seja, soma do valor j armazenado nesta objeto com o valor representado pelo boto clicado. Assim sendo, para o boto que representa o nmero "1" teremos o seguinte cdigo: Private Sub Command1_Click() Text1.Text = Text1.Text + "1" End Sub Este mesmo procedimento ser utilizado para os botes 2, 3, 4, 5, 6, 7, 8, 9 e 0, apenas substituindo o "1" por "2" ... "3" .... e assim sucessivamente. Observe a sequncia a seguir: Cdigo para o boto 2: Private Sub Command2_Click() Text1.Text = Text1.Text + "2" End Sub Cdigo para o boto 3: Private Sub Command3_Click()

Marcelino Macdo

- 37 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Text1.Text = Text1.Text + "3" End Sub Cdigo para o boto 4: Private Sub Command4_Click() Text1.Text = Text1.Text + "4" End Sub Cdigo para o boto 5: Private Sub Command5_Click() Text1.Text = Text1.Text + "5" End Sub Cdigo para o boto 6: Private Sub Command6_Click() Text1.Text = Text1.Text + "6" End Sub Cdigo para o boto 7: Private Sub Command7_Click() Text1.Text = Text1.Text + "7" End Sub Cdigo para o boto 8: Private Sub Command8_Click() Text1.Text = Text1.Text + "8" End Sub Cdigo para o boto 9: Private Sub Command9_Click() Text1.Text = Text1.Text + "9" End Sub Cdigo para o boto 0: Private Sub Command10_Click() Text1.Text = Text1.Text + "0" End Sub Pronto, nossa calculadora j possui a codificao para que, ao clicar sobre os botes que representam os nmeros, estes sejam repassados ao visor de nossa calculadora (TextBox). Lembramos que esta calculadora ir operar apenas com cliques do Mouse. A seguir, vamos codificar os botes que representam as operaes aritmticas. Ao clicar sobre um boto de soma, subtrao, etc... temos que saber o seguinte: 1. Deveremos armazenar o contedo do TextBox em uma determinada varivel; 2. Zerar o contedo do TextBox para que este receba o novo valor, que ir operar com o valor anterior; 3. Em seguida, aps clicar sobre o boto de igualdade, ser realizada a operao entre o valor anterior do TextBox que foi armazenado em uma varivel e o novo valor digitado no componente. Com esta lgica, entre com a seguinte codificao para o boto de soma: Private Sub Command11_Click() valor = Val(Text1.Text) Text1.Text = "" operacao = "soma" End Sub No cdigo acima, primeiro armazenamos na varivel VALOR, o contedo numrico do objeto Text1.text. Esta transformao de String para nmero se deu pela funo VAL. Em seguida, foi zerado o contedo armazenado no objeto TextBox e foi armazenado em uma outra varivel a string SOMA, para que no ato da operao matemtica a ser realizada seja identificado o tipo de operador. Aqui temos um problema, usamos duas variveis porm no declaramos as mesmas, assim sendo, nas declaraes gerais do formulrio (GENERAL ... DECLARATIONS), deveremos declara-las. Conforme mostra o cdigo a seguir: Public valor As Single Public operacao As String

Marcelino Macdo

- 38 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Agora, vamos proceder da mesma forma para a codificao do boto de subtrao, substituindo o contedo da varivel operao para SUBTRACAO, conforme mostra o cdigo a seguir para o bota~em questo: Private Sub Command12_Click() valor = Val(Text1.Text) Text1.Text = "" operacao = "subtracao" End Sub Agora, vamos codificar o boto que representa a multiplicao: Private Sub Command14_Click() valor = Val(Text1.Text) Text1.Text = "" operacao = "multiplicacao" End Sub Iremos ento codificar o boto de diviso: Private Sub Command13_Click() valor = Val(Text1.Text) Text1.Text = "" operacao = "divisao" End Sub Agora, nosso prximo passo codificar o boto de igualdade, que dever fazer apresentar no TextBox o resultado da operao aritmtica realizada entre os dois valores. Para isso, deveremos utilizar o atual valor do TextBox com o tipo de operao a ser realizada bem como com o valor anterior armazenado na varivel VALOR. Ento, teremos no boto de igualdade o seguinte cdigo: Private Sub Command15_Click() Select Case operacao Case "soma" valor = Val(Text1.Text) + valor Case "subtracao" valor = valor - Val(Text1.Text) Case "multiplicacao" valor = valor * Val(Text1.Text) Case "divisao" valor = valor / Val(Text1.Text) End Select Text1.Text = valor End Sub Aqui temos a grande novidade deste cdigo em relao ao que j estudamos, o comando SELECT CASE. Observe que, dependendo do boto que representa a operao aritmtica que foi clicado teremos uma operao diferente, porm este tipo de operao est sendo realizada com uma mesma varivel que representa o tipo da operao, a varivel OPERACAO. Neste caso, temos o conjunto de testes do SELECT CASE, onde para uma mesma varivel, testamos diversas circunstncias. A sintaxe deste comando : SELECT CASE varivel Case condio lista de comandos a serem executados caso condio for verdadeira Case condio lista de comandos a serem executados caso condio for verdadeira Case condio lista de comandos a serem executados caso condio for verdadeira .... .... END SELECT Em poucas palavras ... uma maneira de realizar diversos testes com uma mesma varivel, o que nos foi fundamental para o desenvolvimento desta calculadora. Nos falta apenas codificao o boto FIM, que tem apenas o cdigo END e o boto "Ce" que tem a finalidade de apagar o contedo do TextBox, sendo assim, neste teremos o cdigo TEXT1.TEXT="". Agora, basta executar o seu projeto. - Aula 14 - Estruturas de repetio

Marcelino Macdo

- 39 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Um dos procedimentos mais comuns em sistemas comerciais a repetio por um determinado nmero de vezes de um grupo de comandos, ou seja, uma estrutura de repetio. Para tais situaes, o VB oferece comandos prprios. Iremos comear neste mdulo o estudo destes comandos. As estruturas de repetio tambm so conhecidas como Loops. O loop mais comum na maioria das linguagens de programao o For...Next. Este tipo de Loop utilizado para criar um contador de forma automtica e, a cada vez que o contador incrementado, os comandos que esto dentro deste Loop so novamente executados. A seguir veja a sintaxe deste comando: For Contador = nmero_inicial to nmero_final ..... lista de comandos Next Para melhor exemplificar este comando, vamos a seguir gerar um projeto de exemplo com esta finalidade. O projeto ter duas caixas de edio, sendo que a primeira ir representar o nmero inicial da contagem e a segunda o nmero final da contagem e a cada nmero incrementado, este ser apresentado dentro de um ListBox. Veja a seguir passo a passo a nossa aplicao: No formulrio que apresentado, adicione: Labels; TextBox; ListBox; CommandButton.

Inicie um novo projeto no VB;

2 2 1 2

Label1 Label2

Altere as seguintes propriedades dos componentes citados: Componente Caption = Nmero inicial Caption = Nmero final Caption = Inicia contagem Text = apague o contedo desta propriedade Text = apague o contedo desta propriedade Neste ponto, seu formulrio ter o seguinte aspecto: Propriedade/Valor

Command1 Text1 Text2

Quando o usurio for utilizar o sistema, ele ir entrar com um valor para o nmero inicial da contagem e um valor para o nmero final da contagem. Aps clicar no boto "inicia contagem", o sistema ir gerar um Loop, de x (nmero inicial) at y (nmero final) e, a cada nmero da contagem, este ser acrescentado ao ListBox. Para tal procedimento, iremos entrar com a seguinte codificao para o boto "Inicia Contagem": Private Sub Command1_Click() numi = Val(Text1.Text) numf = Val(Text2.Text) For contador = numi To numf List1.AddItem (Str(contador)) Next End Sub

Marcelino Macdo

- 40 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Observe que, o primeiro passo foi armazenar nas variveis NUMI e NUMF o contedo digitado nas caixas Text1 e Text2, porm este contedo foi transformado em valor numrico atravs da funo VAL. Em seguida, criamos um contador (loop), que ir contar de NUMI (nmero inicial) at NUMF (nmero final), armazenando esta contagem na varivel contador e, a cada nmero contado, o nico comando existente entre o FOR e o NEXT ser executado, ou seja, no listbox (LIST1), iremos adicionar um item (additem) que o valor da varivel contador (que faz parte do loop), transformada em String, atravs da funo STR.

Para o boto Finaliza, basta acrescentar o comando END, conforme podemos observar na listagem a seguir: Private Sub Command2_Click() End End Sub Agora, execute o projeto e, insira dois nmeros (inicial e final) e veja o resultado aps clicar no respectivo boto. No exemplo abaixo, preenchemos como nmero inicial 3 e nmero final 6. Observe o resultado:

Agora, execute novamente o projeto, inserindo em nmero inicial um nmero menor do que em nmero final e observe o resultado. Voc ver que nada foi acrescentado ao ListBox, porque da forma como o For...Next foi construdo, a contagem ser realizada em de forma crescente, ou seja, sempre de um nmero menor para um nmero maior. Mas e se fosse necessrio a contagem de um nmero maior para um nmero menor, com incrementos de -1 unidade. Sendo assim, teramos que acrescentar o comando STEP e aps este o incremento, que neste caso seria -1. Veja como ficaria a codificao deste boto neste caso: Private Sub Command1_Click() numi = Val(Text1.Text) numf = Val(Text2.Text) For contador = numi To numf Step -1 List1.AddItem (Str(contador)) Next End Sub Ok, aprendemos a gerar contadores de forma crescente e decrescente. Mas voc deve estar perguntando: como fazer para que o sistema verifique de forma automtica se a contagem ser progressiva ou regressiva? Esta resposta ser fornecida em nossa prxima aula. Salve o projeto para que possamos realizar esta alterao no mdulo 15. - Aula 15 - Tomando decises - fazendo o seu micro pensar No mdulo passado, criamos um projeto na qual exemplificamos os processos de repetio atravs do comando FOR, porm temos um problema no projeto gerado: 1. Se o sistema estiver pronto para uma contagem progressiva e o usurio inserir o nmero inicial maior que o nmero final, nada ser executado; 2. Se o sistema estiver pronto para uma contagem regressiva e o usurio inserir o nmero inicial menor que o nmero final, nada ser executado. Como fazer para que o sistema, de forma automtica, se utilize de um FOR progressivo ou regressivo, de acordo com a diferena entre os nmeros inicial e final? A resposta simples: Iremos gerar um teste que, se o nmero inicial for maior que o nmero final, a contagem ser regressiva, caso contrrio, a contagem ser progressiva. Observe que vinculamos um teste condicional a duas situaes possveis e, para este procedimento, temos no VB6 um comando que serve como uma luva ... A sintaxe bsica deste comando a seguinte:

Marcelino Macdo

- 41 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante If then comandos a serem executados caso teste seja verdadeiro Else comandos a serem executados caso o teste seja falso End If Observe em linguagem simples, como seria nosso cdigo para a condio exposta: If nmero_inicial > nmero_final then realize uma contagem regressiva Else realize uma contagem progressiva End if Vamos ento na forma de cdigo VB, alterar o boto "Inicia contagem", que foi criado no projeto do mdulo passado e inserir o cdigo que segue: Private Sub Command1_Click() numi = Val(Text1.Text) numf = Val(Text2.Text) If numi > numf Then For contador = numi To numf Step -1 List1.AddItem (Str(contador)) Next Else For contador = numi To numf List1.AddItem (Str(contador)) Next End If End Sub Observe que geramos duas rotinas distintas, cada uma para um dos casos (verdadeiro ou falso) e atravs deste mecanismo, conseguimos fazer com que o nosso sistema seja "inteligente" e esteja pronto para agir em diversas situaes. O procedimento de "fazer o sistema pensar" de grande utilidade em aplicativos comerciais, pois nunca sabemos como o usurio ir agir. Execute agora o projeto e faa entradas com nmeros iniciais maiores que os finais e da forma inversa tambm. - Aula 16 - Estruturas de repetio (continuao) No VB, alm do For ... Next, temos outros comandos de repetio e, iremos estudar neste mdulo o comando DO ... LOOP. Ao contrrio do For ... Next, onde estipulamos um determinado nmero de vezes que o lao dever executar, no DO ... LOOP este nmero de vezes ser determinado atravs de uma determinada condio. Veja o trecho de cdigo a seguir: Do While contador Seria o intervalo de tempo, que medido em milisegundos. Aps cada ciclo deste intervalo, o temporizador ir buscar a hora atual no relgio do sistema. O uso deste controle interessante por exemplo, em um sistema de controle de carros em um estacionamento ou ento em sistemas de folha de ponto. Outras propriedades deste controle no so importantes, visto que este controle no apresentado em tempo de execuo no formulrio. A nvel de eventos, o temporizador possui apenas um nico evento denominado Timer(), ocorrendo sempre que o temporizador transcorre o intervalo determinado na propriedade Interval. Veja na figura a seguir o controle em questo:

Enabled -> ativa ou desativa o temporizador (true ou false)

Na verdade, criamos a varivel FRASE que ir receber a cada segundo (1000 milisegundos, devido a propriedade Interval do temporizador estar com este valor) e em seguida, a propriedade CAPTION do formulrio ser atualizado com o novo valor da hora do sistema. Veja o resultado do aplicativo em execuo na figura a seguir:

Marcelino Macdo

buS dnE esarf & ":lauta aroH" = noitpaC $emiT = esarf gnirtS sA esarf miD )(remiT_1remiT buS etavirP :ogidc etniuges o arisni ,e elortnoc od )(remiT otneve on otreba ajes ogidc ed rotide o euq arap )remiT elortnoc( rodaziropmet o erbos olpud euqilc mu D .6 ;)odnuges 1 a etnelaviuqe( 0001 arap lavretnI edadeirporp a eretlA .5 ;eurt arap delbanE edadeirporp a eretlA .4 ;"remiT" elortnoc mu oirlumrof on arisnI .3 :LAUTA AROH omoc oirlumrof od NOITPAC edadeirporp a anifeD .2 ;otejorp ovon mu e BV o eicinI .1 :oxiaba sossap so agis ,ossi araP .oirlumrof odanimreted mu ed solutt ed arrab an lauta aroh a ribixe ed ovitejbo o ret euq ovitacilpa oneuqep mu rareg somaV- 43 -


Assim como "lanamos" a hora ao caption do formulrio, voc poder usa-lo atravs de variveis, gerar registros em banco de dados, etc...

- Aula 18 - Barras de rolagem O primeiro passo no achar que o controle de barra de rolagem de uma janela padro Windows (como por exemplo o de seu navegador) com o controle de barra de rolagem do VB6, visualizado em destaque na figura a seguir:

O primeiro controle em destaque o da barra de rolagem horizontal e o segundo da barra de rolagem vertical. Normalmente utilizamos estes controles em um determinado projeto para incrementar (para mais ou para menos) valores, como por exemplo a intensidade de brilho em uma determinada figura. Na tabela a seguir, observe as principais propriedades das barras de rolagem: Propriedade Max Min LargeChance Valor Determina o valor mximo a ser atribudo ao controle Determina o valor mnimo a ser atribudo ao controle Determina o quanto o valor da propriedade Value ser incrementado quando utilizado o componente Informa o grau de alterao da propriedade Value quando ocorrer o click em uma das extremidades da seta.

SmallChange

Vamos gerar um pequeno projeto para exemplificar o uso das barras de rolagem: 1. Inicie um novo projeto em VB; 2. Insira no formulrio um componente HScrollBar e altere as seguintes propriedades do mesmo:

Marcelino Macdo

- 44 -


Propriedade Min Max Value 0 1000 100

Contedo

Observe que o indicador da barra de rolagem estar na posio 100 de um total de 1000 posies vlidas 3. Inclua dois CommandButtoms no Form; 4. Altere a propriedade Caption do segundo boto para "Finaliza"; 5. Apague o contedo da propriedade Caption do primeiro boto; 6. D um clique duplo no segundo boto e entre com a seguinte codificao para o mesmo: Private Sub Command2_Click() End End Sub 7. D um duplo clique no controle HScrollBar e entre com a seguinte codificao: Private Sub HScroll1_Change() Command1.Caption = HScroll1.Value End Sub 8. Agora execute o projeto. V movimentando atravs de cliques nas partes extremas da barra de rolagem ou na parte livre de seu canal de volume e verifique que, o interior do primeiro boto ir assumindo o valor da barra de rolagem, conforme podemos observar a seguir:

Para que possamos compreender um pouco melhor este controle, vamos aproveitar o mesmo projeto efetuando as seguintes alteraes: 9. Exclua o primeiro boto; 10. Inclua um Label e altere a propriedade Caption do mesmo para "aprendaemcasa.com.br" 11. Altere as propriedades Min e Max do HScrollBar para 6 e 24 respectivamente 11. D um clique duplo no controle de barra de rolagem e altere a sua codificao para: Private Sub HScroll1_Change() Label1.FontSize = HScroll1.Value End Sub Observe a seguir como ficou o seu formulrio:

Marcelino Macdo

- 45 -

Apostila de Visual Basic 6 Curso passo a passo para iniciante Agora execute o projeto e movimente o ponteiro da barra de rolagem. Observe que de forma automtica o tamanho da fonte da frase que est dentro do label vai sendo ampliado ou reduzido, devido ao seguinte comando: Label1.FontSize = HScroll1.Value Neste comparamos o tamanho da fonte da frase (contedo do caption) do Label1 posio do volume da barra de rolagem. - Aula 19 - Botes de opo Os botes de opo tambm so conhecidos pelo nome de botes de rdio. O uso deste tem o objetivo de permitir ao usurio selecionar uma opo dentre as disponveis (apenas uma nica opo). Quando usados em um programa, por permitirem apenas uma seleo dentre as disponveis, gerando esto agrupados em um quadro. Dentre as propriedades mais utilizadas dos botes de rdio, destacamos: Propriedade Name Caption Value Valor define o nome do componente. Nome este que identificar o mesmo durante a codificao do sistema. Define um contedo para a opo a nvel de usurio Atravs desta propriedade poderemos testar se o boto est acionado ou no (true ou false). Aqui voc define se o boto ter a aparncia padro ( 0-standard) ou a aparncia de um boto (1-graphical)

Style

Dentre os eventos, o mais utilizado o Click() que acionado assim que usurio seleciona o boto, ou seja, marca a sua opo. Vamos criar um projeto exemplo, onde o usurio ir entrar com o valor total da compra e, de acordo com a opo de pagamento, ter um desconto, o valor permanecer o mesmo ou ento teremos um acrscimo no valor total a ser pago. 1. Inicie um novo projeto em VB; 2. Insira na parte superior do formulrio um LABEL e altere a propriedade Caption deste para VALOR TOTAL DA COMPRA; 3. Insira ao lado do label citado um componente TEXTBOX e apague o contedo da propriedade TEXT; 4. Insira abaixo do label um componente OptionButton e altere a propriedade CAPTION do mesmo para VISTA COM 10% DE DESCONTO; 5. Insira abaixo um novo componente OptionButton e altere a propriedade CAPTION deste para CHEQUE PARA 30 DIAS SEM JUROS; 6. Insira abaixo um novo componente OptionButton e altere a propriedade CAPTION deste para CHEQUE PARA 60 DIAS COM JUROS DE 3%; 7. Abaixo, insira um componente Label e altere a propriedade CAPTION deste para TOTAL A PAGAR 8. Ao lado, insira um componente TextBox e apague o contedo da propriedade TEXT. 9. Ao final deste procedimento, seu formulrio ter o seguinte aspecto:

Marcelino Macdo

- 46 -


Nosso prximo passo criar a codificao do sistema. Esta bastante simples, ao clicar (evento click) em qualquer um dos botes de rdio disponveis, o sistema ir fornecer no segundo TextBox o valor total a ser pago pelo cliente, j calculado o desconto ou acrscimo sobre o valor total ou, se for o caso, mantendo o valor total. Para codificar a primeira opo, ou seja, para o pagamento vista e calcular 10% de desconto, d um clique duplo sobre o componente OptionButton1 e entre com a seguinte codificao: Private Sub Option1_Click() a1 = Val(Text1.Text) a2 = (a1 * 0.9) Text2.Text = Str(FormatCurrency(a2, 2, vbTrue, vbTrue, vbTrue)) End Sub Observe que aqui, o primeiro passo foi transferir para a varivel A1 o contedo da caixa de textos TEXT1 devidamente tran

Documents

Apostila de VB