Apostila de Visual Basic 6

Apostila de Visual Basic 6
Curso passo a passo para iniciante
Marcelino Macêdo -1-

Aula 01 - Visual Basic e seu ambiente de desenvolvimento

Caso você já tenha alguma experiência anterior em programação, principalmente sendo esta sobre a
plataforma DOS, terá que se acostumar com a idéia de que, a programação Procedural não será utilizada,
substituindo a mesma pela programação ditada por eventos. Neste caso, para se programar em Windows,
independente de ser no Visual Basic ou no Delphi, por exemplo, é entender sua lógica. Este será nosso
objetivo a seguir:
Em uma programação ditada por eventos, temos basicamente três fatores que temos que considerar:
Janelas : é o veículo usado como saída pelo Windows para a comunicação com o usuário e esta
poderá ter diversos formatos, como por exemplo, uma janela do tipo "diálogo de mensagem", como
a que é utilizada pelo Windows para efetuar o Log-Off de um usuário.
Eventos : As janelas, para que desempenhem um papel, devem responder a eventos. Mas o que
são eventos? Veja um exemplo ... quando você clicou no quadrado representado por um "x", é
disparada uma ação, 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 ação.
Com base no que vimos até este ponto, podemos concluir que uma aplicação orientada por eventos deverá
responder a ações do usuário ou da própria aplicação.
Quando estamos em um ambiente de desenvolvimento gráfico, iremos trabalhar muitas vezes apenas
inserindo componentes dentro do(s) formulário(s). Estes componentes, deverão responder a eventos, e
estes eventos é que serão codificados pelo programador.
Ao inserir um componente em uma janela, automaticamente parte da codificação do mesmo é
automaticamente acrescentada à fonte do aplicativo, por isso é dado o termo VISUAL.
Um componente é um objeto, como por exemplo um botão ou um Grid. Este objeto, possui vários eventos,
que por sua vez são executados em determinadas sequências, sendo que o programador, deverá ter
conhecimentos e a lógica necessária a identificação dos eventos que deverão ser programados.
Pelo que observarmos até este ponto, no ambiente Windows, a programação além de ser orientada a
eventos, é baseada na utilização de objetos, ou seja, componentes usados na confecção da interface gráfica
de uma determinada aplicação.
Quando carregamos o VB na memória, 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

adiante ). Para um usuário iniciante, aconselhamos a escolha de um novo projeto, ou seja, a opção
STANDARD EXE, que se encontra em destaque na figura acima. Após este procedimento, basta clicar no
botão <ABRIR>. Neste ponto, será exibida a seguinte janela:
Acima, temos a visualização do ambiente de desenvolvimento integrado ( IDE ), que na verdade proporciona
ao desenvolvedor a possibilidade da escrita de código, inserção/controle dos componentes do formulário,
compilação, depuração de código, ou seja, tudo integrado em um único ambiente de fácil interpretação.
Neste ambiente, podemos destacar:
O MENU
Dispõe dos comandos para diversas finalidades, como salvar um projeto, incluir novos componentes,
compilar o projeto, etc... Estas opções estão disponibilizadas através de uma ordem lógica e em grupos de
ferramentas/utilitários.
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, estão dispostos os diversos componentes (objetos) que serão utilizados na
construção da interface de aplicação.
O EXPLORADOR DE OBJETOS
Também conhecido como janela de objetos, é responsável por manter uma relação dos arquivos que compõe
o seu projeto, ou seja, seria uma espécie de Windows Explorer da aplicação.

A JANELA DE PROPRIEDADES
Cada componente que compõe o seu projeto ( aplicativo que está
sendo desenvolvido ), possui características determinadas por você.
Imagine um botão de comando, este deverá ter uma altura e
largura, uma cor, uma determinada fonte para o texto que estiver
dentro do mesmo, uma aparência, etc... Isso são propriedades, e as
mesmas são controladas nesta janela. Quando selecionarmos um
determinado objeto/componente, automaticamente serão exibidas
as suas propriedades.
O FORMULÁRIO
Na
verdade é sobre o formulário que iremos

posicionar os componentes/objetos
construindo assim a parte visual de nosso
aplicativo. Automaticamente quando
inserimos um novo
componente/objeto, é gerada uma
codificação básica para o mesmo e
poderemos trabalhar com os eventos
disponíveis para este.
O EDITOR DE CÓDIGO
Neste editor, você irá escrever as linhas de código. Como você pode observar, no editor, poderemos escolher
o componente/objeto a ser trabalhado e o respectivo evento a ser codificado. No gráfico acima, temos
selecionado o objeto formulário ( FORM ), no evento "ao carregar" ( LOAD ), ou seja, a codificação que será
realizada quando o formulário for carregado. Aos poucos iremos nos acostumando com o trabalhado de
codificação 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 co m
teclas de atalho. Para tal procedimento, utilize a tabela a seguir:
Para a janela de código
Combinação do teclado Utilidade/função
CTRL + BREAK Aborta a execução de um determinado aplicativo
CTRL + DELETE A partir do cursor, remove o restante da palavra
CTRL + DOWN ARROW Exibe a próxima rotina
CTRL + END Move o cursor para o final do módulo
CTRL + F Abre uma janela de diálogo para a procura de expressões
CTRL + H Abre uma janela de diálogo para a procura/substituição de expressões
CTRL + HOME Leva o cursor para o inicio do módulo
CTRL + I Ativa a guia de rápida informação

CTRL + J Ativa a lista de métodos e propriedades

CTRL + LEFT ARROW Leva o cursor para a última palavra à esquerda da linha
CTRL + N Insere uma linha de código em branco
CTRL + PAGE DOWN Rola o cursor o conteúdo de uma tela para baixo
CTRL + PAGE UP Rola o cursor o conteúdo de uma tela para cima
CTRL + RIGHT ARROW Move o cursor uma palavra à direita
CTRL + SHIFT + F2 Volta para o ponto mais recente onde o cursor esteve posicionado
CTRL + SHIFT + F9 Remove os breakpoints de execução
CTRL + SHIFT + I Ativa a guia de parâmetros
CTRL + SHIFT + J Ativa a lista de constantes
CTRL + SPACEBAR Remove a palavra à esquerda do cursor
CTRL + UP ARROW Exibe a rotina anterior à corrente
CTRL + Y Remove a linha corrente
CTRL + Z Move o cursor para o final da linha
END Move o cursor para o final da linha
F1 Ativa a ajuda on-line para a palavra que estiver selecionada
F2 Abre o object browser
F3 Procura pela próxima ocorrência de uma determinada expressão
F7 Abre a janela de código
F8 Roda a aplicação no sentido passo a passo
F9 Define/remove um breakpoint
PAGE UP Retrocede uma página de código
SHIFT + F8 Roda a aplicação rotina por rotina
Teclas de atalho para trabalho no formulário
CTRL + C Copia os controles selecionados para a área de transferência
CTRL + X Remove os controles selecionados para a área de transferência
CTRL + V Cola o conteúdo da área de transferência no formulário
CTRL + Z Desfaz a última operação
TAB Avança para o próximo controle na ordem definida pela propriedade TAB Index
F4 Exibe a janela de propriedades
Estas são 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
próxima aula iremos começar 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 formulário e módulos. Estes formulários possui um respectivo módulo de código, e este é
dividido em seções:
Seção que reúne o código dos componentes que fazem parte do formulário e suas respectivas
propriedades;
Seção de declaração de variáveis;
Seção de declaração de objetos não visuais que fazem parte do formulário;
Seção com os códigos das rotinas de eventos.
Sendo assim, cada formulário de sua aplicação possui um bloco de código, divido em seções, códigos estes
escritos para que os componentes/objetos do formulário respondam a uma determinada ação, ou seja,
evento.

Os arquivos contendo a estrutura de um formulário possuem a extensão FRM.

Outro arquivo bastante utilizado no VB, são os que possuem a extensão BAS, também conhecidos como
módulos e que armazenam sub-rotinas de códigos de programação que serão utilizados em qualquer
formulário da aplicação.
Até o momento estamos citando muito o termo objetos, mas você sabe o que realmente é um objeto? Um
objeto é um conjunto de códigos de programação e dados que poderão ser tratados como se fossem uma
unidade. Um objeto poderá também ter eventos que poderão ser programados bem como métodos que
executam uma determinada ação 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 próprio VB e são instalados juntamente com o sistema;
Fornecidos por terceiros, que deverão ser instalados de acordo com a necessidade de
desenvolvimento;
Criados pelo próprio desenvolvedor, quando o mesmo define os seus módulos de classe.
Devemos lembrar sempre que:
As propriedades de um objeto são as características do mesmo;
Os eventos são os códigos que foram programados com um determinado fim;
Os métodos são as ações sobre o objeto.
Um exemplo comum de objeto são as caixas de texto. Os objetos ficam localizados na caixa de ferramentas,
estudada no módulo de aula anterior.
As propriedades de um objeto e seus códigos poderão ser alteradas em duas hipóteses:
Em tempo de execução;
Em tempo de desenvolvimento.
Vamos pegar como exemplo, uma caixa de texto. Esta possui um método denominado Drag, que habilita ou
não a ação de arrastar e soltar.
Pelo que observamos então até este ponto, será fundamental escrever códigos de programação, porém para
isso, é necessário que você conheça o editor de códigos do Visual Basic. O editor de códigos do VB, conforme
observamos na aula 01, está sendo representado na figura a seguir:
Para abrir o editor de códigos, você poderá proceder das seguintes maneiras:

1. Dando um clique duplo sobre qualquer parte vaga do formulário;

2. Dando um clique duplo sobre qualquer parte de um objeto/componente;
3. Clicando sobre o botão View Code que está disponível no Project Explorer.
Quando abrimos o editor de código através de um clique duplo sobre o formulário ou sobre um de seus
objetos/componentes, o código será automaticamente aberto em um determinado evento deste. A forma
pela qual o código será exibido, poderá ser configurada pelo usuário, através das opções de IDE. Tais
procedimentos iremos estudar a seguir:
PERSONALIZANDO A IDE
Para tal, com o Visual Basic em execução, clique na opção de menu TOOLS e no menu que se abre,
selecione a opção OPTIONS. Será aberta uma janela com o título de OPTIONS, iremos a seguir estudar as
principais guias e opções da mesma.
Guia Editor
O frame "Code Settings" possui opções que irão
afetar de forma direta o trabalho de edição do
seu código. As principais opções são:
Auto Sintaxe Check - quando
selecionada, faz com que o editor
verifique se existem erros no código
durante o modo de projeto.
Aconselhamos que esta opção esteja
ticada;
Require Variable Declaration - quando
selecionada, faz com que as variáveis a
serem usadas no seu código, tenham
que, ser declaradas antecipadamente.
Quando selecionado, o VB
automaticamente irá colocar uma linha
do tipo OPTION EXPLICT na seção
GENERAL DECLARATION de todos os
formulários, evitando assim que se use
variáveis 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 códigos;
Auto Quick Info - quando selecionada, exibe informações sobre funções e seus parâmetros, uma
espécie de Help on-line de grande valia a usuários menos experientes;
Auto Data Tips - quando selecionada, alterna a exibição do valor de uma variável embaixo do
cursor;
Auto Indent - quando selecionada, proporciona o recuo automático de trechos de código. Opção
muito útil para a programação estruturada, onde por exemplo, os comandos pertencentes a um
determinado Loop, estejam recuados com relação ao restante do código, facilitando assim a análise
do mesmo.
Tab Width - nesta caixa o usuário poderá definir o número de espaços que irá servir como recuo da
opção Auto Indent.
O frame Windows Settings possui as seguintes opções:
Drag-and-Drop Text Editing - Utilizada para proporcionar a possibilidade de arrastar e soltar um
trecho de código dentro do editor de códigos;
Default to full module view - Caso ativado, todos os procedimentos poderão ser visualizados dentro
de uma única janela de código;
Procedure Separator - quando selecionada, exibe um separador visual entre os procedimentos que
estão sendo listados na janela do código. Apenas útil caso a opção acima estiver ticada.

Guia Editor Format
Através desta guia, poderemos definir as cores e fontes que serão empregadas pelo editor no texto normal (
tudo aquilo que não for comando ou função da linguagem ), etc... Basta selecionar cada um dos itens que
estão na caixa Code Colors e em seguida, formatar a fonte a ser utilizada.
Guia General

As opções de configuração desta guia são utilizadas por programadores mais experientes, pois permite o
ajuste fino de vários aspectos, como detecção de erros e compilação, etc... Por se tratar de opções
avançadas não 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 opções para determinar quais janelas do IDE estarão ancoradas.
Guia Environment

No frame When Visual Basic Wizards, poderemos selecionar uma das duas opções disponíveis. Caso escolha
a segunda ao invés da primeira, não será mais exibido a janela Project Wizard. Porém para usuários
iniciantes, aconselhamos deixar o valor padrão marcado, ou seja, PROMPT FOR PROJECT;
Caso você tenha seguido nossa sugestão, poderá diminuir o número 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 alterações
do seu projeto. A opção mais utilizada é a PROMPT TO SAVE CHANGES, que fará com que o VB verifique se
você quer ou não salvar as alterações do seu projeto sempre que seu aplicativo for executado ou fechado
através do IDE. Já a opção DONT SAVE CHANGES, é útil quando você possui uma série de projetos exemplos
e que a maioria ou sua totalidade não precisa ser salva.
Já a guia ADVANCED, como o próprio nome diz, é utilizada apenas por usuários avançados e iremos estudar
esta futuramente.
- Aula 03 - Conhecendo um formulário e desenvolvendo seu primeiro aplicativo

Em um projeto VB, o formulário é a base da aplicação, ou seja, sobre este é que iremos disponibilizar os
demais objetos da aplicação para que possamos gerar o respectivo código.
Nesta aula, iremos estudar passo a passo todas as características de um formulário e, ao final desta, iremos
gerar nosso primeiro aplicativo VB.
Tecnicamente, o formulário nada mais é do que uma janela na qual poderemos adicionar os objetos
necessários à construção de um aplicativo. Neste sentido, cada aplicativo se baseia em algum tipo de
formulário.
Iremos começar o nosso estudo através do formulário singular. Este é apresentado assim que você inicia um
novo projeto no Visual Basic. Para isso, proceda da seguinte forma:
1. Através do menu INICIAR, execute o Visual Basic;
2. Na janela NEW PROJECT, selecione a opção STANDARD EXE;
3. Neste ponto, será exibida a seguinte janela:
Marcelino Macêdo - 10 -
Observe que o formulário da aplicação aparece em destaque na figura. Agora, iremos estudar as partes de
um formulário. Observe o gráfico a seguir e sua legenda na tabela abaixo do mesmo:
Item Descrição
Menu de controle - Neste menu, é permitido restaurar, mover, redimensionar, minimizar, maximizar
001 e fechar o formulário. Para ativar este botão, basta definir a propriedade ControlBox do formulário
como True, na janela de propriedades.
Título - Representa um texto que será exibido na barra de títulos do formulário, normalmente
utilizado para identificar o nome ou função do aplicativo. O texto a ser exibido como título do
002 formulário, é configurado na propriedade CAPTION deste, na janela Properties. Obs.: Se a
propriedade BorderStyle do formulário estiver setada para None, o título assim como toda a barra de
título, não estarão visíveis.
Barra de títulos - Representada por uma barra de coloração diferenciada do restante do formulário,
003 ela exibe o título do formulário, bem como poderá ser usada para arrastar este para outra posição na
tela do micro.
Botões de minimizar, restaurar e fechar o formulário, padrão como em qualquer outra aplicação for
windows. Para desativar o botão de minimizar o formulário, basta setar a propriedade Minbutton do
004
formulário para false na janela properties, assim como para ignorar o botão restaurar, basta setar a
propriedade Maxbutton da janela properties do formulário para false..
005 Bordas do formulário - Especificam os limites visuais do mesmo
Área de trabalho do formulário - toda a área na qual poderemos trabalhar com os componentes de
006
nossa aplicação que deverão ser colocados sobre o formulário.
Citamos várias vezes na tabela acima, sobre ajustar uma determinada propriedade do formulário. Isso é fácil
de se realizar, para isso, proceda da seguinte forma:
1. Dê um clique em qualquer local do formulário;
2. Na janela Properties Form 1, selecione a propriedade a ser alterada;
3. Altere o seu valor por meio de digitação ou de seleção de valores através da caixa de seleção,
conforme mostra a figura animada a seguir:
Passo a passo alterando o caption de um formulário:
Conforme já especificamos, as propriedades são as características de um componente/objeto, como os de

um formulário. Qualquer objeto do VB deverá ter no mínimo 1 propriedade. Com relação a um formulário,
iremos citar as principais propriedades de um formulário bem como a função das mesmas:
Propriedade Função
Responsável por definir a cor de plano de um formulário. Ao clicar na seta de lista
BackColor
suspensa desta propriedade, exibindo as cores disponíveis para tal configuração.
Determina o comportamento de um formulário. Este poderá ter bordas fixas, ou seja,
não podem ser redimensionadas ou bordas dimensionáveis. Dentro das opções
disponíveis teremos:
Valor Descrição
Determina que o formulário não pode ser redimensionado ou
0 - none
movido.
Determina que o formulário não pode ser redimensionado através
1 - Fixed Single do processo de arrastar as suas bordas, porém os botões de
maximize e minimize estarão habilitados.
BorderStyle Configuração padrão, possibilitando ao usuário redimensionar o
2 - Sizable formulário arrastando suas bordas ou utilizando os botões
relacionados na barra de títulos.
Configuração que deverá ser selecionada quando o formulário for
3 - Fixed dialog utilizado como caixas de diálogo, sendo que o usuário não poderá
redimensionar o mesmo.
4 - Fixed Configuração idêntica ao do Fixed Dialog, porém o botão close
TollWindow estará disponível.
5 - Sizable Funciona como o estilo Sizable, porém não inclui o botão Maximize
ToolWindow ou Minimize.
Nesta propriedade , o título digitado, será apresentado na barra de título do
Caption
formulário.
Caso setado para true, o menu de controle estará visível, caso contrário, o menu de
ControlBox
controle não estará visível.
Esta propriedade é utilizada para definir a cor do texto impresso no formulário, porém
Fore Color
não altera a cor dos objetos colocados sobre o formulário.
Propriedade que armazena a altura de um formulário, através da unidade de medida
Height twips, representada por um número que será especificado na mesma. Normalmente, a
altura do formulário, é realizada através do processo de clicar e arrastar a sua borda.
Esta propriedade determina o ícone que deve ser exibido na barra de tarefas quando o
Icon formulário estiver minimizado durante a execução. Os ícones padrões do VB,
normalmente são instalados no diretório \Graphics\Icons da pasta VB.
Esta propriedade, determina a distância do formulário a partir da esquerda da tela. A
Left
unidade de medida desta é a mesma da propriedade Height.
Definindo esta como True, o formulário irá mostrar o botão maximize padrão no lado
MaxButton direito da barra de título. Se for configurada como False, o botão não estará disponível
para o usuário.
Definindo esta propriedade como True, o formulário irá exibir o botão Minimize, caso
MinButton
contrário, este botão não estará disponível.
O nome especificado nesta propriedade, irá definir o nome ao qual o Visual Basic irá se
referir ao formulário a nível de codificação do sistema. Por exemplo, se tivermos a
Name
propriedade Name = Principal, deveremos citar este formulário como Principal quando
formos escrever alguma linha de código se referenciando ao mesmo.
Através desta propriedade, poderemos alterar a medida padrão de twips para pixels
ScaleMode
por exemplo.
Esta propriedade permite ocultar o formulário da barra de tarefas. Ao escrever um
ShowInTaskbar determinado aplicativo e se tenha a intenção 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 formulário, através de um número que é representado por
Width
twips, salvo o caso de ter sido alterada a propriedade ScaleMode.
Esta configuração define a maneira pela qual o formulário será inicializado. As opções
disponíveis são:
WindowState 0 - normal O formulário é aberto em seu estado normal

1 - Minimized O formulário é minimizado ao ser aberto
2 - Maximized O formulário é maximizado ao ser aberto
Assim como propriedades, os formulários possuem também eventos, ou seja, o Windows se utiliza de
eventos ( ao abrir, ao fechar, ao minimizar... ) para controlar as reações e execuções do sistema. Vale
lembrar também que ao mover o mouse, ou simplesmente ao clicar sobre um determinado componente, o
Windows gera uma mensagem que descreve a sua ação, ou seja, o evento realizado. Essas mensagens são
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 formulários, vamos verificar os principais eventos de um formulário:
Evento Ação
O formulário será sempre ativado, depois de inicializado, ou seja, nesta condição, este
Active
evento será disparado.
Exatamente o contrário do evento Active, ou seja, quando o formulário deixa de estar
Deactive
ativo.
DragDrop Ocorre quando um controle arrastado é solto dentro de um formulário
Este evento é disparado quando o formulário é carregado para a memória, ou seja,
Load
antes de evento Active.
Resize Este evento é disparado quando o usuário altera o tamanho do formulário.
Este evento é o contrário do evento Load. Quando é exibida uma janela se você tem
Unload
certeza de que deseja fechar o formulário, e responde "sim", este evento é disparado.
Com o formulário que esta aberto, vamos gerar o nosso primeiro aplicativo. O objetivo deste aplicativo será
: "encerrar a aplicação do sistema, quando clicarmos sobre o botão denominado FINALIZA".
Primeiramente, vamos alterar algumas propriedades do formulário:
1. Altere a propriedade CAPTION para PRIMEIRO EXEMPLO, neste ponto, sua área de trabalho terá o
seguinte aspecto:
2. Inclua um componente COMMANDBUTTON, em destaque na figura a seguir:
3. Para incluir o componente no formulário, basta dar um clique duplo sobre o mesmo, e automaticamente
este será incluso no seu formulário, conforme podemos observar na figura a seguir:
4. Observe que, ao incluir um componente no formulário, 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;
5. 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 formulário
deverá ter o aspecto seguinte:
6. Agora deveremos programar o evento do clique do mouse sobre o botão, para que, neste caso, o
sistema seja finalizado. Para acionar a janela de códigos, já na programação 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. Observe que a janela de código 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 não fosse este o evento a ser programado, bastaria você selecionar o novo evento na
caixa de seleção à sua direita. Observe que a mesma está apontando para o evento Click;
8. Nosso objetivo é que o sistema seja encerrado quando clicarmos sobre o CommandButton inserido
em nosso formulário, 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 programação de um determinado evento.
Logo, sua área de trabalho deverá ter o seguinte aspecto:
9. Agora, tente executar o sistema. Para isso, basta clicar sobre o botão 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 execução, o formulário que antes era cheio de pontinhos em seu interior,
agora passa a ter uma cor uniforme. Os pontinhos, são apresentados ao desenvolvedor, para facilitar o
enquadramento de componentes dentro do mesmo. Quando você clicar sobre o botão "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 botão padrão de SALVAR, o mesmo encontrado no Word, Excel,
etc... Ao clicar sobre este, será apresentada a seguinte janela:
Nesta janela você irá definir o nome do formulário de sua aplicação, este nome deverá ser digitado na caixa
de edição "Nome do Arquivo". Digite o nome de sua preferência. Após digitar o mesmo e clicar sobre o
botão 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 formulário e desenvolvendo seu primeiro aplicativo

Na aula passada estudamos os eventos e propriedades dos objetos. Até então, observamos como alterar as
propriedades durante o processo de criação do projeto, porém poderemos também alterar as propriedades
em tempo de execução, ou seja, quando o aplicativo for executado.
Vamos criar um novo projeto, simples, composto por um único formulário. Neste, apesar de não alterarmos
a propriedade CAPTION do formulário durante o processo de criação do sistema, iremos alterar a sua
propriedade CAPTION durante a execução do projeto. Inicie uma nova aplicação do tipo executável e siga os
passos a seguir:
1. Dê um clique duplo em qualquer área livre do formulário que está a sua disposição para a programação.
Neste ponto sua área de trabalho, deverá ter o seguinte aspecto:
2. Observe que, ao efetuarmos o clique duplo em qualquer área livre do formulário, na janela de código, o
cursor já estará disponível no evento LOAD do FORM1, ou seja, evento que será executado quando o
formulário for carregado/executado. É justamente neste evento que, através de códigos de programa,
iremos alterar o título da janela do formulário ( CAPTION ) via programação, para isso, digite o comando que
apresentamos no gráfico 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 não teve o conteúdo alterado,
conforme você pode observar na figura acima, em seu canto direito inferior. Esta propriedade só será
alterada em tempo de execução. Execute o projeto e verifique o resultado:
5. Apesar de não termos alterado em tempo de criação o conteúdo da propriedade CAPTION do FORM1, na
janela PROPERTIES, o fizemos através do comando visto acima, em tempo de execução. Como não fizemos
nenhuma espécie de codificação para finalizar o sistema, neste caso, você deverá clicar sobre o botão (X)
que se encontra na parte direita superior da janela.
Conforme você observou, a forma básica de se alterar uma determinada propriedade em tempo de
execução, a sintaxe é:
Objeto/Componente.Propriedade = conteúdo
Vamos ver mais um exemplo, de como se trabalhar com eventos. Desta vez, vamos instruir o equipamento
de que, todas as vezes que o formulário seja carregado, ele ocupe o centro absoluto do seu monitor. Isso
também será realizado no evento LOAD do FORM1. Para isso, iremos introduzir a seguinte linha de código,
conforme mostra a figura a seguir:
Observe que, ordenamos ao equipamento que, ao ocorrer o carregamento do formulário, ele seja movido
(MOVE), para a posição vertical,horizontal centralizada do monitor, ou seja, Screen.Width e Screen.Height.
Execute novamente o sistema e verifique que a janela da aplicação, nesta oportunidade será exibida de
forma centralizada.
Agora vamos imaginar que o usuário poderá também, em tempo de execução, alterar o tamanho do
formulário, clicando e arrastando as suas bordas. Como faríamos para centralizar o formulário
automaticamente sempre que tal procedimento fosse detectado? Isso é fácil, basta repetir a linha MOVE
(Screen........ para o evento RESIZE do FORM1. Feche a aplicação, dê um clique duplo em qualquer área
livre do formulário e em seguida, selecione na caixa de seleção à sua direita da janela de código, 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 formulário, automaticamente ele será centralizada, pois o evento
RESIZE, que ocorre sempre que o formulário é redimensionado pelos processos de clicar e arrastar é
disparado.
Vamos imaginar uma nova situação. Quando o usuário clicar no botão 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 formulário, que é executado sempre
que o formulário é 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 diálogo. Encerre o
aplicativo caso o mesmo ainda esteja ativo e, após dar um clique duplo em qualquer área livre do
formulário, já dentro do editor de código, selecione o evento UNLOAD do objeto FORM, entrando com a
seguinte codificação:
Observe que entramos com o comando MSGBOX (construa uma caixa de diálogo) ("Obrigado pelo uso de
Nosso aplicativo") (exiba a mensagem que está entre aspas) ,vbYes ( e disponibilize o botão de OK).
Execute seu aplicativo e em seguida, clique sobre o botão (X) de fechar, será então apresentado o seguinte
resultado:
Observe que a programação for Windows, tem como um dos seus grandes segredos, o conhecimento dos
eventos, ou seja, em que determinado evento deveremos codificar uma determinada ação.
Antes de iniciarmos o estudo dos componentes que iremos utilizar para gerar aplicativos, vamos falar sobre
um dos assuntos principais em qualquer linguagem de programação, as variáveis. O objetivo do uso de
variáveis 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 variáveis:
Tipo da variável Faixa de valor a armazenar
Empty
Null
Integer -32.768 a 32.767
Long -2.147.483.648 a 2.147.483.647
Single -3.402823E38 a 3.402823E38
Double -1.79769633486232 a 4.94065645841247E-324

Currency -322337203685477.5808 a 922337203685477.5807
Date/Time 01/01/0100 a 31/12/9999
String Até 65.500 bytes
OLE
Boolean True ou False
Byte 0 a 255
Poderemos declarar as variáveis que serão utilizadas em nosso sistema de duas formas:
1. Nas seções GENERAL-DECLARATION do Form, módulo ou classe;
2. Dentro de um determinada SUB, existente em um determinado Objeto ou uma Sub criada por você
mesmo.
As variáveis poderão ser de duas categorias, conforme mostra a tabela a seguir:
Categoria de variável Considerações
Podem ser manipuladas em qualquer ponto do projeto. Exemplo de declaração
de uma variável global:
Globais/Públicas
Global endereco as String
Public salario as currency
Podem ser utilizadas apenas no local onde foram declaradas. Exemplo de
declaração de uma variável local:
Locais/Privadas
Dim endereco as String
Private salario as currency
- Aula 05 - Constantes, vetores e matrizes

No VB, temos também o que chamamos de constantes, ou seja, locais de memória que terão sempre um
valor constante durante a execução do aplicativo. Tal técnica faz com que o seu projeto fique melhor
documentado e de melhor compreensão para outros profissionais que por ventura tenham que continuar o
trabalho de desenvolvimento de seu projeto.
Quando falamos em constantes no VB, possuímos duas categorias:
1. Constantes Predefinidas;
2. Constantes criadas.
As constantes criadas, são aquelas geradas pelo próprio desenvolvedor, declaradas na seção DECLARATION.
A sintaxe de declaração 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 são usadas em janelas de diálogo, assim como utilizamos no
exemplo gerado no módulo de aula passada, onde foi gerada uma janela de diálogo agradecendo pelo uso do
sistema e o botão de OK gerado automaticamente, pela constante predefinida vbYes. Veja a seguir as
constantes predefinidas de maior uso no VB:
vbYesNo vbExclamation vbQuestion vbYes vbNo
vbRed vbBlue vbRed vbNull vbEmpty
Com o tempo, você irá dominar o uso das mesmas, no momento, basta entender o porque e um pouco de
sua lógica, como foi a da geração do botão OK, dentro da janela de diálogo do exemplo anterior.
Uma outra técnica de programação bastante utilizada é o uso de vetores e matrizes, ou seja, uma variável
que é dividida em várias partes para armazenar em cada uma dessas partes um determinado valor. Vamos
imaginar um prédio residencial. Ele é único, porém divido em apartamentos e cada apartamento possui uma
família diferente de moradores. Desta forma teríamos:
Prédio residencial ....... = ........ variável
Cada apartamento ..... = ........ divisão da variável ( vetor ou matriz )
Cada família .............. = ........ ocupando um apartamento, ou seja, um valor diferente para cada variável
O Visual Basic possibilita o uso de de vetores unidimensionais (com apenas uma divisão), até o uso de
grandes matrizes multidimensionais (com mais de uma divisão).
Para criar uma variável dos tipos citados, proceda da seguinte forma:
Dim faixasalarial(10) as currency

Observe que teremos 11 divisões para a variável faixasalarial, e cada uma das divisões, poderá armazenar
um valor diferente. Mas se tenho um vetor definido em 10, porque tenho 11 posições? Porque o vetor inicial
tem numeração igual à zero, e a máxima igual ao número especificado dentro dos parênteses.
Então, teríamos:
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 prática

Nesta aula, iremos gerar um pequeno exemplo para entender melhor o que são eventos. Inicie o VB
solicitando um novo projeto. Sua área de trabalho terá o seguinte aspecto:
Vamos trabalhar com três componentes:

2 CommandButtons;
1 TextBox.
Estes componentes estão circulados na figura a seguir:
Sendo que, de cima para baixo, o primeiro é um Textbox e logo abaixo, temos o CommandButton.
Insira estes três componentes dentro do seu formulário. Lembrando que:
1. Para inserir um componente em um formulário, basta dar um clique duplo sobre o componente, e
este será automaticamente inserido;
2. Para posicionar um componente no local desejado do formulário, 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 formulário ao final do procedimento, deverá estar com o seguinte aspecto:
Observe que, para os componentes COMMAND, apenas os posicionamos em um novo local do formulário, 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 posição final já está desenhada:
Nosso sistema, terá o seguinte objetivo:

A) Ter uma área para digitação de texto, procedimento que será realizado no TextBox;
B) Ter um botão na qual possamos limpar o conteúdo da caixa de texto, procedimento este que será
realizado através do CommandButton1;
C) Ter um botão para finalizar o aplicativo, procedimento que será realizado através 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 formulário, dando um título a janela do mesmo.
Para isso, conforme estudamos anteriormente, temos as propriedades. Selecione o formulário, clicando em
qualquer área livre deste, e na janela de propriedades, deveremos alterar o CAPTION do formulário, ou seja,
a propriedade que indica o texto que será apresentado na barra de título do formulário. Altere este
propriedade para "Projeto de Testes de Eventos". Ao final deste procedimento, seu formulário terá o
seguinte aspecto:
Observe que inserimos uma caixa de texto em nosso formulário ( Label ) ela tem o objetivo de inserir um
texto, uma espécie de etiqueta para exibir uma informação ao usuário. Pelo fato de estar disposta acima da
caixa de edição, qual seria a melhor frase para orientar o usuário? 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
título, 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 seleção e clicar sobre a cor vermelha, conforme mostra a figura a seguir:
A principio o nosso formulário e nossa etiqueta estão configurados. Agora, observe que dentro da caixa de
edição ( TextBox ), existe uma palavra denominada "Text1", que na verdade, além da frase que será
apresentada quando o sistema for executado, representa o nome do componente dentro do código. Vamos
fazer com que nada apareça dentro da caixa de edição quando o sistema for executado, para isso, basta
apagar todo o conteúdo da propriedade TEXT do componente TEXTBOX. Execute este procedimento.
Agora, vamos dar uma espécie de rótulo aos nossos botões, ou seja, a nível de usuário, qual o objetivo do
botão 01? e do botão 02? Sabemos que o primeiro deverá limpar o conteúdo eventualmente digitado no
TextBox e o segundo, tem a função de finalizar o sistema. Então, iremos alterar o CAPTION do
CommandButton1 para "LIMPA" e o conteúdo do CAPTION do CommandButton2 para "FINALIZA". Ao final
deste procedimento, sua área de trabalho terá o seguinte aspecto:
Observe que a nível de informação e visual o nosso formulário está dentro do esperado. Agora temos que
codificar os eventos necessários a sua operação.
O primeiro evento está ligado ao click no botão "LIMPA". Observe que, ao clicar sobre este, o sistema deverá
apagar o conteúdo 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 codificação do sistema. Na próxima aula iremos dar algumas
dicas sobre a nomenclatura de componentes.
Vamos então á codificação:
Nosso objetivo é limpar o conteúdo 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
conteúdo 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 execução, usamos a sintaxe a seguir:
Nome_componente.Propriedade = valor
Sabendo disso, dê um clique duplo no botão CommandButton1, que possui o rótulo "LIMPAR, e dentro da
área de código, 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.
Nosso próximo passo é programar o evento Clicar do segundo botão ( Command2 - CommandButton2 ), pois
quando o usuário clicar sobre ele, o sistema deverá ser finalizado.
Volte o controle para o formulário e dê um clique duplo no CommandButton2, e dentro da área de código
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
edição, clique sobre o botão LIMPAR e em seguida, clique sobre o botão FINALIZAR para que veja na prática
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 formulário será a base de quase tudo o que fizer
em VB. Estes formulários serão preenchidos com controles (componentes), e através das propriedades e
eventos dos formulários 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 três tipos de controles:
Os que fornecem a comunicação com o usuário, como as caixas de edição;
Os que extraem respostas, como os botões de comando;
Controles invisíveis, que não são exibidos aos usuários e apenas fazem parte do controle interno da
aplicação.
Conforme observamos na aula anterior, para incluir um controle no formulário, basta dar um clique duplo
sobre o mesmo.
As propriedades dos controles estarão disponíveis 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 estão dispostos na caixa de ferramenta. Veja a figura a
seguir:
A seguir, iremos falar um pouco sobre os componentes mais comuns que serão usados em suas aplicações
VB.
Controle LABEL
Este controle é responsável por exibir um texto no formulário, ou seja, uma etiqueta. Este texto é utilizado
para somente leitura, e poderá ser alterado através de sua propriedade Caption, tanto em tempo de
desenvolvimento quanto em tempo de execução.
O principal uso deste componente é exibir informações ao usuário. As propriedades mais importante de um
LABEL são:
Name define o nome do componente a ser utilizado dentro da fonte do sistema.
Caption 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
Autosize
automaticamente configurado de acordo com o tamanho do texto a ser exibido.
Faz com que exista uma quebra automática de linha, expandido o tamanho da
WordWrap legenda em uma linha, caso o texto definido em Caption, ultrapasse o limite
horizontal de tamanho do Label.
Controle CommandButton
Os botões são utilizados para extrair respostas simples do usuário ou ainda para chamar determinadas
funções dentro de um formulário, como por exemplo, uma função para limpar o conteúdo de uma caixa de
edição, finalizar o sistema, etc... Tais procedimentos serão realizados após o click no botão, ou seja, após o
evento OnClick do mesmo.
Na tabela a seguir, iremos citar as propriedades mais importantes do CommandButton:
Esta propriedade determina o nome pelo qual o controle será referenciado na fonte
Name
do projeto.
Caption Armazena o texto que será exibido dentro do CommandButton.
Style Nesta poderemos definir se o botão irá aceitar apenas texto dentro de seu interior
ou se o mesmo poderá aceitar gráficos. No caso de inserir uma figura, deverá

definir a mesma na propriedade Picture.
Esta propriedade caso esteja setada como False, desativa o botão em um
Enabled
determinado formulário.
Na tabela a seguir, iremos apresentar os eventos mais comuns do CommandButton:
Click Evento que é disparado quando o botão recebe um clique do mouse.
MouseUp Evento que é disparado quando o ponteiro do mouse passa sobre o botão.
Controle TextBox
Utilizadas para proporcionar a entrada de dados, através do teclado, por parte do usuário.
Na tabela a seguir, temos as principais propriedades do controle em questão:
Name Armazena o nome do controle, que deverá ser utilizado na fonte do sistema
Armazena o conteúdo digitado na caixa de texto. Neste caso, esta propriedade
Text
substitui a Caption
Limita o número de caracteres que poderá ser digitado pelo usuário em tempo de
MaxLenght
execução.
Utilizado para mostrar o caracter * enquanto existe a digitação do conteúdo. Útil
Passwordchar
para utilização em campos do tipo senha.
Multiline Permite ao não ao usuário digitar mais de uma linha na caixa de texto
Caso configurada como true, fará a caixa de texto exibir dados, sem permitir a sua
edição. Este tipo de caixa é bastante utilizado nas caixas de texto que contém o
Locked
texto de licenciamento de um determinado software, sendo que neste caso, o
conteúdo da caixa deverá ser previamente digitado na propriedade Text.
Os principais eventos das caixas de texto são:
Ocorre sempre que o usuário inserir, substituir ou excluir um caracter da caixa de
Change
texto
- Aula 07 - Caixa de Ferramentas e Controles

Controle : Botões de opção : Option Button
Dentre as principais propriedades de um botão de opção temos:
Propriedade Função
Nome dado ao componente, que será utilizado dentro do código fonte da
Name
aplicação sempre que o sistema apontar para o mesmo.
Utilizada para permitir ao usuário determinar a finalidade de cada um dos botões
Caption
de opção.
Propriedade geralmente utilizada durante o sistema em tempo de execução, pois
Value através desta, o sistema saberá de uma opção está ou não marcada, através do
resultado True ou False.
Se estiver setada para "0 - STANDARD" será desenhado um botão de opção
padrão, caso contrário, estando setado para "1 - Graphical", o botão de opção
Style
terá a aparência de um botão de comando, permitindo apenas uma seleção
dentro de um grupo.
Dentre os principais eventos de um botão de opção, podemos citar:
Evento onde mais comumente é testado o valor da propriedade Valeu do botão,
Click
ou seja, após clicado sobre uma determinada opção.
Controle :Caixa de seleção : Check Box

Este controle é muito similar ao botão de opção, testando-se a propriedade VALUE de ambos para saber se
um controle está ticado ou não. As diferenças fundamentais entre estes dois controles são:
1. As caixas de seleção representam controles simples;
2. As caixas de seleção não são mutuamente exclusivas.
Sendo assim, um botão pode possuir dois estados : True ou False (selecionado ou não), já uma caixa de
seleção poderá ter até três estados: selecionada, não selecionada e acinzentada (nem ativada e nem
desativada, indicando que aquela opção não poderá ter o seu conteúdo alterado pelo usuário).
Controle : Caixas de lista : List Box
Este controle tem a finalidade de exibir ao usuário uma lista de dados. Exemplo: Uma lista de todos os
estados do Brasil, que será disponibilizada ao usuário no ato do preenchimento do estado residencial do
mesmo em sua ficha cadastral.Esta lista poderá oferecer ao usuário a oportunidade de seleção de um ou
mais de seus dados para que esta seleção seja utilizada em processamento posterior. Os dados de uma lista
não podem ser editados de forma direta, ou seja, na própria lista, pois como o nome diz, é um controle de
seleção e não de alteração de dados. Veja a seguir as principais propriedades das caixas de lista:
Propriedade Objetivo
List Retorna o valor selecionado de uma lista
ListCount Fornece o número de itens de uma caixa de lista
MultiSelect Determina se o usuário pode ou não selecionar mais de um item da lista
Propriedade boleana que pode assumir um valor para que em tempo de execução um valor
Selected
da lista esteja previamente selecionado.
Sorted Classifica ou não os itens de uma lista
A propriedade list deverá ser utilizada com uma indexação de itens, ou seja, as posições dos valores de uma
caixa de lista se iniciam em zero e vão até o número total de itens menos 1. Este índice deverá ser utilizado
também na propriedade Selected, conforme observamos no exemplo a seguir:
List1.Selected(4)=true
No comando acima, estamos pré-selecionado (via código) o quarto item da lista.
O evento mais utilizado nas caixas de lista é o DblClick(), ou seja, verificando o item selecionado.
Já o método AddItem é utilizado para preencher os itens de uma lista. O método RemoveItem é utilizado
para excluir um item de uma lista e o método 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, através 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 número muito maior de
controles, fora os que você já teve contato visual através 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 importância para o programador. Siga os passos a seguir:
Primeiramente vamos citar as seguintes situações:
Observe que a sua caixa de ferramentas é formada por fichas e, por padrão, 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 serão 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 botão direito do mouse sobre qualquer área livre da caixa de ferramenta. Neste ponto,
será apresentado um menu, conforme mostra a figura a seguir:
2. Neste menu, selecione a opção ADD TAB, será então 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 após o término
desta operação:
Observe que temos duas GUIAS : GENERAL

e AVANCADO. Dê um clique simples sobre a
guia AVANÇADO e veja o que irá acontecer
na sua área de trabalho:
Observe que, os controles da caixa GENERAL foram escondidos e estão sendo exibídos os controles da guia
AVANCADO, que por padrão, possui apenas o controle de seleção, 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 botão direito do mouse sobre a área livre da GUIA que irá receber o novo controle;
2. No menu suspenso que é apresentado, selecione a opção COMPONENTS, será então apresentada a
seguinte janela:
3. Na guia CONTROLS, selecione o(s) controle(s) que deevrão ser inclusos na caixa de ferramentas, na guia
AVANCADO. No nosso caso, como exemplo, iremos incluir o CONTROLE DE ADMINISTRAÇÃO DE IMAGENS
KODAK e o CONTROLE DE DIGITALIZAÇÃO 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á estão 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,
porém a divisão dos controles por GUIAS é de grande utilidade para a organização e fácil localização dos
controles durante o processo de desenvolvimento.
- Aula 10 - Alterando as propriedades em tempo de execução

Uma das técnicas mais utilizadas em projetos VB é alterar as propriedades de um determinado componente
em tempo de execução, ou seja, enquando o seu sistema está sendo operado. Veja alguns exemplos de
alteração de propriedades em tempo de execução:
Alterar o texto a ser exíbido dentro do command buttom (propriedade CAPTION) de acordo com
uma situação específica;
Alterar o fator do botão estar disponível ou não (aceita ou não o click) de acordo com uma situação
específica. Exemplo: Em determinados momentos, o botão de SALVAR do WORD está desabilitado,
ou seja, não aceita o click.
Primeiro, você deverá conhecer bem as propriedades dos componentes na qual irá trabalhar. Vamos pegar
como exemplo um botão de comando, que possui dentre as propriedades mais utilizadas CAPTION, VISIBLE
e ENABLED. Como poderíamos alterar estas propriedades durante a execução do programa, através de
linhas de código? Existem duas formas para tal finalidade:
(001) - Através da especificação do componente, seguido de ponto e da propriedade com o seu respectivo
valor, conforme podemos observar no exemplo a seguir:
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 formulário foi carregado, pois tais
comandos estão no evento LOAD.
(002) - Através da especificação do componente a da listagem através do comando WITH das propriedades a
serem alteradas e seus respectivos valores, conforme poderemos observar a seguir:
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 códigos citados acima, na forma 002, economizamos escrita de código e
diminuimos o fator erro, pois é muito mais fácil errar a digitação da palavra Command quando digitada 5
vezes do que quando digitada 1 vêz. Apenas não é aconselhável usar o método 002 quando temos apenas
uma propriedade a alterar em tempo de execução.
Um outro procedimento comum é o uso das abreviações em nome de componentes, procedimento indicado
no momento em que você inclua os objetos na janela do seu projeto. Tais denominações (propriedade
NAME) devem ser legíveis e condizentes com a função desejada para os mesmos. Veja o exemplo a seguir:
Quando incluimos um botão de comando, ele automaticamente recebe o nome de COMMAND1 na janela de
propriedades e sempre que for invocado em seu código. Ao incluir um próximo botão decomando ele terá o
nome COMMAND2, e assim sucessivamente.
O programador deverá ter a noção 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 interpretação do
código do mesmo. Vamos imaginar que o botão 01 tenha a finalidade de finalizar o seu projeto, ou seja, sair
do mesmo. Ao invés de ter o nome de COMMAND1 no projeto, seria mais fácil alterar o valor da propriedade
NAME para CMDSAIR, ou seja, "comando sair". Desta forma a interpretação do código por parte do
desenvolvedor e de um terceiro profissional que por ventura tenha que analisar o código seja facilitada..
Veja como outro exemplo, um botão de opção que irá receber o estado civil do cliente, este botão de opção
poderia se chamar OPT_EST_CIVIL.
Acreditamos que os exemplos e motivos expostos são o suficiente, de agora em diante, siga estes passos e
terá um fonte legível e de fácil interpretação.
- Aula 11 - Nosso primeiro projeto

Em nosso primeiro projeto, vamos gerar um simples programa onde teremos em um formulário, os
seguintes componentes:
3 Textbox (caixas de texto)
3 Labels.
1 Command Buttom (botões de comando).
A finalidade de nosso primeiro projeto será a de criar uma espécie 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 programação VB, denominado "Funções".
Inicie uma nova aplicação no VB e, insira os componentes supra citados. Ao final deste procedimento, sua
janela terá o seguinte aspecto:
O primeiro passo é alterar a propriedade CAPTION dos LABELS, respectivamente para : "DIGITE UM
NÚMERO", "DIGITE OUTRO NÚMERO", "RESULTADO DA SOMA". Ao final desta alteração, seu formulário terá
o seguinte aspecto:
Em seguida, iremos apagar o conteúdo da propridade TEXT de todos os TextBox. Com isso, o interior destes
componentes não irão mais exibir as palavras TEXT1 ... TEXT2 ... TEXT3.
Altere a propriedade CAPTION do CommandButtom para "SOMAR". Ao final destes procedimentos, seu
formulário terá o seguinte aspecto:
Temos o obejtivo de fazer com que, após clicar sobre o botão "SOMAR", seja exibido no terceiro TextBox a
soma dos valores entrados nos dois primeiros TextBoxes. Porém observe o seguinte:
1. Em um TextBox, o conteúdo digitado é interpretado como String, ou seja, um valor fixo e que não
poderá sofrer nenhuma espécie de operação matemática.
Tendo o conhecimento de tal regra, vamos tentar de forma direta, executar a soma do conteúdo do
Textbox1 e do Textbox2 armazenando o seu resultado em TextBox3. Dê um clique duplo sobre o Buttom e
entre com o seguinte código:
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 botão "SOMAR" e veja o resultado no terceiro TextBox:
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 conteúdo do Textbox1 com o conteúdo do TextBox2 (
text1.text+text2.text), estamos na verdade solicitando uma concatenação, ou seja, o agrupamento de duas
Strings, onde as mesmas são colocadas uma ao lado da outra, sendo assim, em uma concatenação de
"12"+"34" é igual à "1243".
Conforme citamos, o conteúdo dos Textboxes são considerados Strings. Como neste caso queremos realizar
uma operação matemática, deveremos utilizar uma função para transformar String em número. Sendo
assim, teremos que digitar o seguinte conteúdo no evento click do Buttom:
Text3.Text = (Val(Text1.Text) + Val(Text2.Text))
End Sub
No comando acima, estamos utilizando a função VAL, que tem o objetivo de transformar String em número,
assim sendo, agora teremos em Text3 o resultado da soma dos números de Text1 e Text2. Execute o
projeto, entre com os mesmos valores e veja o resultado após o clique no botão SOMA:
Outro detalhe interessante é que, antes de usarmos a função VAL, com o operador "+", o projeto compilou e
executou sem erros, porque estamos solicitando uma concatenação, porém se tentarmos usar o operador de
multiplcação (*) por exemplo, o VB irá gerar um erro, pois em Strings não existe a operação de
multiplicação.
A sintaxe da função VAL é a seguinte:
VAL (variável)
O objetivo da função VAL é converter o conteúdo de uma variável String para uma variável numérica. Ao
contrário do que você pode estar pensando, as funções não existem apenas para transformar valores String
para numéricos. Existem funções para manipulação de Datas, Strings, números, etc...
Nossa próxima aula terá o objetivo de estudar as principais funções do VB6.
- Aula 12 - Funções VB6

Neste modo iremos expor as principais funções do VB6, que serão de grande utilidade em aplicativos
comerciais.
Função ABS
Tem a finalidade de retornar o valor absoluto e positivo de um número ou da variável informada. A sintaxe
de construção deste comando é extremamente simples:
Abs (número_ou_variável)
No exemplo a seguir, quando o formulário for carregado, iremos armazenar na variável "exemplo" o valor -
2001, e através de uma caixa de diálogo, iremos apresentar este número 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 também a função STR, que tem a função de converter um
número em string, pois apenas neste formato é que é aceito uma informação na caixa de msgbox. Logo,
usamos duas funções em uma mesma linha de código, sendo que a primeira transforma o número em string
e a segunda o número em absoluto e positivo. Será exibida na caixa de diálogo o número 2001.
Função FIX
Tem a finlidade de retornar um número inteiro e sem arredondamento. Sua sintaxe é:
Fix (número_ou_variável)
Função Hex
Tem a função de transformar um número decimal em hexadecimal. Sua sintaxe é:
Hex (número_ou_variável)
Função Int
Tem a função de retornar o inteiro de um número com arredondamento. Sua sintaxe é:
Int (número_ou_variável)
Função RND
Tem a função de retornar um número aleatório de 1 até o número especificado. Sua sintaxe é:
RND (número)
Função VAL
Tem a finalidade de transformar o valor de uma String em número, ou seja, o inverso da função STR
observada no primeiro exemplo. Sua sintaxe é:
VAL (string_ou_variável)
Função Curdir
Tem a finalidade de retornar o diretório atual onde o usuário estiver atuando. Veja a seguir um simples
exemplo construído passo a passo com esta função:
1. Primeiro abra o Visual Basic e inicie um novo projeto;
2. Insira no formulário dois componentes Labels, disponibilizando estes um abaixo do outro;
3. Na propriedade CAPTION do primeiro Label, insira : "Diretório atual de trabalho";
4. Na propriedade CAPTION do segundo label, apague todo o conteúdo;
5. No evento LOAD do formulário, entre com a seguinte codificação:
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:
Observe que o caminho na qual você está operando no momento é exibido no label2.
Função Left
Esta função tem o objetivo de retornar x caracteres a partir da esquerda de uma string. Sua sintaxe é:
Left (variável, número_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 posições (caracteres) da variável empresa.
Função Right
Tem praticamente o mesmo objetivo da função Left, com exceção 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 variável "empresa".
- Aula 13 - Funções VB6

Neste módulo iremos gerar nossa segunda aplicação VB, sendo que o objetivo da mesma é gerar uma
calculadora. Nesta calculadora, iremos utilizar as funções e diversos eventos, o que irá facilitar o
aprendizado dos tópicos estudados nos módulos anteriores. Para este projeto, siga os passos a seguir:
Inicie uma nova aplicação VB;
No formulário, 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 formulário para PROJETO CALCULADORA;
Apague o conteúdo 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:
O próximo 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 numérico de nossa calculadora.
Agora, iremos gerar os botões que irão representar as operações aritméticas de nossa calculadora. Estes
botões serão os de número 11 ao 16, contendo respectivamente o seguinte conteúdo: +,-,*,/,=,C. Altere o
Caption dos mesmos para os valores apresentados.
Finalmente, configure o Caption do Command17 para "FIM".
Ao final deste procedimento, seu formulário deverá ter o seguinte visual:
O primeiro passo é configurar os botões de comando que representam os números que irão ser utilizados no
teclado numérico de nossa calculadora. A lógica é a seguinte: Cada vez que o usuário clicar sobre um dos
botões numéricos, este deverá se acrescentado ao TextBox. Ou seja, teríamos a seguinte situação:
Conteúdo do TextBox = Conteúdo do TextBox + valor representado pelo botão.
Observe que, o TextBox é uma String e, deveremos realizar uma concatenação, ou seja, soma do valor já
armazenado nesta objeto com o valor representado pelo botão clicado. Assim sendo, para o botão que
representa o número "1" teremos o seguinte código:
Text1.Text = Text1.Text + "1"
End Sub
Este mesmo procedimento será utilizado para os botões 2, 3, 4, 5, 6, 7, 8, 9 e 0, apenas substituindo o "1"
por "2" ... "3" .... e assim sucessivamente. Observe a sequência a seguir:
Código para o botão 2:
End Sub

End Sub

End Sub

End Sub

End Sub

End Sub

End Sub

End Sub

End Sub
Pronto, nossa calculadora já possui a codificação para que, ao clicar sobre os botões que representam os
números, 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 botões que representam as operações aritméticas. Ao clicar sobre um botão de
soma, subtração, etc... temos que saber o seguinte:
1. Deveremos armazenar o conteúdo do TextBox em uma determinada variável;
2. Zerar o conteúdo do TextBox para que este receba o novo valor, que irá operar com o valor anterior;
3. Em seguida, após clicar sobre o botão de igualdade, será realizada a operação entre o valor anterior do
TextBox que foi armazenado em uma variável e o novo valor digitado no componente.
Com esta lógica, entre com a seguinte codificação para o botão de soma:
valor = Val(Text1.Text)
Text1.Text = ""
operacao = "soma"
End Sub
No código acima, primeiro armazenamos na variável VALOR, o conteúdo numérico do objeto Text1.text. Esta
transformação de String para número se deu pela função VAL. Em seguida, foi zerado o conteúdo
armazenado no objeto TextBox e foi armazenado em uma outra variável a string SOMA, para que no ato da
operação matemática a ser realizada seja identificado o tipo de operador.
Aqui temos um problema, usamos duas variáveis porém não declaramos as mesmas, assim sendo, nas
declarações gerais do formulário (GENERAL ... DECLARATIONS), deveremos declara-las. Conforme mostra o
código a seguir:
Public valor As Single
Public operacao As String
Agora, vamos proceder da mesma forma para a codificação do botão de subtração, substituindo o conteúdo
da variável operação para SUBTRACAO, conforme mostra o código a seguir para o bota~em questão:

Text1.Text = ""
operacao = "subtracao"
End Sub
Agora, vamos codificar o botão que representa a multiplicação:
Text1.Text = ""
operacao = "multiplicacao"
End Sub
Iremos então codificar o botão de divisão:

Text1.Text = ""
operacao = "divisao"
End Sub
Agora, nosso próximo passo é codificar o botão de igualdade, que deverá fazer apresentar no TextBox o
resultado da operação aritmética realizada entre os dois valores. Para isso, deveremos utilizar o atual valor
do TextBox com o tipo de operação a ser realizada bem como com o valor anterior armazenado na variável
VALOR. Então, teremos no botão de igualdade o seguinte código:

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 código em relação ao que já estudamos, o comando SELECT CASE.
Observe que, dependendo do botão que representa a operação aritmética que foi clicado teremos uma
operação diferente, porém este tipo de operação está sendo realizada com uma mesma variável que
representa o tipo da operação, a variável OPERACAO. Neste caso, temos o conjunto de testes do SELECT
CASE, onde para uma mesma variável, testamos diversas circunstâncias. A sintaxe deste comando é:
SELECT CASE variável
Case condição
lista de comandos a serem executados caso condição for verdadeira
Case condição
Case condição
....
....
END SELECT
Em poucas palavras ... é uma maneira de realizar diversos testes com uma mesma variável, o que nos foi
fundamental para o desenvolvimento desta calculadora.
Nos falta apenas codificao o botão FIM, que tem apenas o código END e o botão "Ce" que tem a finalidade de
apagar o conteúdo do TextBox, sendo assim, neste teremos o código TEXT1.TEXT="".
Agora, basta executar o seu projeto.
- Aula 14 - Estruturas de repetição
Um dos procedimentos mais comuns em sistemas comerciais é a repetição por um determinado número de
vezes de um grupo de comandos, ou seja, uma estrutura de repetição. Para tais situações, o VB oferece
comandos próprios. Iremos começar neste módulo o estudo destes comandos.
As estruturas de repetição também são conhecidas como Loops.
O loop mais comum na maioria das linguagens de programação é o For...Next. Este tipo de Loop é utilizado
para criar um contador de forma automática e, a cada vez que o contador é incrementado, os comandos que
estão dentro deste Loop são novamente executados. A seguir veja a sintaxe deste comando:
For Contador = número_inicial to número_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 edição, sendo que a primeira irá representar o número inicial da contagem e a
segunda o número final da contagem e a cada número incrementado, este será apresentado dentro de um
ListBox. Veja a seguir passo a passo a nossa aplicação:
Inicie um novo projeto no VB;
No formulário que é apresentado, adicione:
2 Labels;
2 TextBox;
1 ListBox;
2 CommandButton.
Altere as seguintes propriedades dos componentes citados:
Componente Propriedade/Valor
Label1 Caption = Número inicial
Label2 Caption = Número final
Command1 Caption = Inicia contagem
Text1 Text = apague o conteúdo desta propriedade
Text2 Text = apague o conteúdo desta propriedade
Neste ponto, seu formulário terá o seguinte aspecto:
Quando o usuário for utilizar o sistema, ele irá entrar com um valor para o número inicial da
contagem e um valor para o número final da contagem. Após clicar no botão "inicia contagem", o
sistema irá gerar um Loop, de x (número inicial) até y (número final) e, a cada número da
contagem, este será acrescentado ao ListBox. Para tal procedimento, iremos entrar com a seguinte
codificação para o botão "Inicia Contagem":
numi = Val(Text1.Text)
numf = Val(Text2.Text)
For contador = numi To numf
List1.AddItem (Str(contador))
Next
End Sub
Observe que, o primeiro passo foi armazenar nas variáveis NUMI e NUMF o conteúdo digitado nas
caixas Text1 e Text2, porém este conteúdo foi transformado em valor numérico através da função
VAL. Em seguida, criamos um contador (loop), que irá contar de NUMI (número inicial) até NUMF
(número final), armazenando esta contagem na variável contador e, a cada número 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 variável contador (que faz parte do loop),
transformada em String, através da função STR.
Para o botão Finaliza, basta acrescentar o comando END, conforme podemos observar na listagem a
seguir:
End
End Sub
Agora, execute o projeto e, insira dois números (inicial e final) e veja o resultado após clicar no respectivo
botão. No exemplo abaixo, preenchemos como número inicial 3 e número final 6. Observe o resultado:
Agora, execute novamente o projeto, inserindo em número inicial um número menor do que em número
final e observe o resultado. Você verá que nada foi acrescentado ao ListBox, porque da forma como o
For...Next foi construído, a contagem será realizada em de forma crescente, ou seja, sempre de um número
menor para um número maior. Mas e se fosse necessário a contagem de um número maior para um número
menor, com incrementos de -1 unidade. Sendo assim, teríamos que acrescentar o comando STEP e após
este o incremento, que neste caso seria -1. Veja como ficaria a codificação deste botão neste caso:
For contador = numi To numf Step -1
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 automática se a contagem será progressiva ou regressiva?
Esta resposta será fornecida em nossa próxima aula. Salve o projeto para que possamos realizar esta
alteração no módulo 15.
- Aula 15 - Tomando decisões - fazendo o seu micro pensar
No módulo passado, criamos um projeto na qual exemplificamos os processos de repetição através do
comando FOR, porém temos um problema no projeto gerado:
1. Se o sistema estiver pronto para uma contagem progressiva e o usuário inserir o número inicial maior que
o número final, nada será executado;
2. Se o sistema estiver pronto para uma contagem regressiva e o usuário inserir o número inicial menor que
o número final, nada será executado.
Como fazer para que o sistema, de forma automática, se utilize de um FOR progressivo ou regressivo, de
acordo com a diferença entre os números inicial e final? A resposta é simples:
Iremos gerar um teste que, se o número inicial for maior que o número final, a contagem será regressiva,
caso contrário, a contagem será progressiva.
Observe que vinculamos um teste condicional a duas situações possíveis e, para este procedimento, temos
no VB6 um comando que serve como uma luva ... A sintaxe básica deste comando é a seguinte:
If <teste> 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 código para a condição exposta:
If número_inicial > número_final then
realize uma contagem regressiva
Else
realize uma contagem progressiva
End if
Vamos então na forma de código VB, alterar o botão "Inicia contagem", que foi criado no projeto do módulo
passado e inserir o código que segue:
If numi > numf Then
For contador = numi To numf Step -1
Next
Else
For contador = numi To numf
Next
End If
End Sub
Observe que geramos duas rotinas distintas, cada uma para um dos casos (verdadeiro ou falso) e através
deste mecanismo, conseguimos fazer com que o nosso sistema seja "inteligente" e esteja pronto para agir
em diversas situações.
O procedimento de "fazer o sistema pensar" é de grande utilidade em aplicativos comerciais, pois nunca
sabemos como o usuário irá agir.
Execute agora o projeto e faça entradas com números iniciais maiores que os finais e da forma inversa
também.
- Aula 16 - Estruturas de repetição (continuação)

No VB, além do For ... Next, temos outros comandos de repetição e, iremos estudar neste módulo o
comando DO ... LOOP. Ao contrário do For ... Next, onde estipulamos um determinado número de vezes que
o laço deverá executar, no DO ... LOOP este número de vezes será determinado através de uma
determinada condição. Veja o trecho de código a seguir:
Do While contador<30
contador = contador + 1
Loop
Observe que, no exemplo acima, o laço (conjunto de comandos) será executado enquanto o valor da
variável contador for inferior à 30. Caso o valor de contador, através de código (contador=contador+1), este
Loop seria eterno (desde que, ao alcançar a linha DO WHILE, a variável contador tivesse um valor inferior a
30).
Em resumo, este tipo de Loop é utilizado quando não sabemos ao certo quantas vezes o laço deve ser
executado. Veja o exemplo a seguir:
Inicie um novo projeto em VB;
Insira no novo formulário um Label e um ListBox
Apague o conteúdo da propriedade CAPTION;
Abra a janela de código e insira a sequência a seguir no evento LOAD do Form:
contador = 1
continua = "s"
Do While continua <> "n"
continua = InputBox("Pergunta", "Continua contagem S/N?", "s")
contador = contador + 1
Loop
Label1.Caption = "Contagem Finalizada"

End Sub
Neste pequeno exemplo, enquanto você continuar respondendo (s) na caixa de diálogo denominada
"Pergunta", o sistema irá acrescentando uma unidade a variável contador e ao mesmo tempo, lançando o
seu valor dentro do ListBox. A partir do momento que você digitar "n", ou seja, que não quer que a
contagem prossiga, o sistema sairá do loop, pois este é válido apenas enquanto o valor da variável continua
for diferente de "n" e, você finalmente conseguirá ver o conteúdo do ListBox com o número de vezes que o
loop foi executado.
Exercício: observe que no exemplo acima, quando solicitamos que a contagem seja interrompida, sempre
teremos uma unidade a mais do que realmente foi solicitado. Tente solucionar este problema.
A condição a ser utilizada para interromper o Loop poderá ser qualquer uma condição lógica existente no VB.
Caso queira também, poderá interromper o Loop mesmo que a condição seja falsa, utilizando-se para isso,
em qualquer ponto do Loop, o comando ExitDo. este tipo de comando, geralmente é acompanhando de um
comando If, ou seja, teremos uma condição dentro de um Loop condicional.
- Aula 17 -
Muito se fala do temporizador oferecido como forma de controle no VB6. O temporizador é uso basicamente
para verificar o relógio do sistema e utilizar tais informações dentro do seu projeto.
Dentre as propriedades disponíveis para este controle, podemos destacar duas:
Enabled -> ativa ou desativa o temporizador (true ou false)
Interval -> Seria o intervalo de tempo, que é medido em milisegundos. Após cada ciclo deste
intervalo, o temporizador irá buscar a hora atual no relógio do sistema.
O uso deste controle é interessante por exemplo, em um sistema de controle de carros em um
estacionamento ou então em sistemas de folha de ponto.
Outras propriedades deste controle não são importantes, visto que este controle não é apresentado em
tempo de execução no formulário.
A nível 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 questão:
Vamos gerar um pequeno aplicativo que terá o objetivo de exibir a hora atual na barra
de títulos de um determinado formulário. Para isso, siga os passos abaixo:
1. Inicie o VB e um novo projeto;
2. Defina a propriedade CAPTION do formulário como HORA ATUAL:
3. Insira no formulário um controle "Timer";
4. Altere a propriedade Enabled para true;
5. Altere a propriedade Interval para 1000 (equivalente a 1 segundo);
6. Dê um clique duplo sobre o temporizador (controle Timer) para que o editor de
código seja aberto no evento Timer() do controle e, insira o seguinte código:
Private Sub Timer1_Timer()
Dim frase As String
frase = Time$
Caption = "Hora atual:" & frase
End Sub
Na
verdade, criamos a variável 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
formulário será atualizado com o novo valor da hora do sistema. Veja o resultado do aplicativo em execução
na figura a seguir:
Assim como "lançamos" a hora ao caption do formulário, você poderá usa-lo através de variáveis, gerar
registros em banco de dados, etc...
- Aula 18 - Barras de rolagem

O primeiro passo é não achar que o controle de barra de rolagem de uma janela padrão 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 Valor
Max Determina o valor máximo a ser atribuído ao controle
Min Determina o valor mínimo a ser atribuído ao controle
Determina o quanto o valor da propriedade Value será incrementado quando utilizado

LargeChance
o componente
Informa o grau de alteração da propriedade Value quando ocorrer o click em uma das
SmallChange
extremidades da seta.
Vamos gerar um pequeno projeto para exemplificar o uso das barras de rolagem:
1. Inicie um novo projeto em VB;
2. Insira no formulário um componente HScrollBar e altere as seguintes propriedades do mesmo:
Propriedade Conteúdo
Min 0
Max 1000
Value 100
Observe que o indicador da barra de rolagem estará na posição 100 de um total de 1000 posições válidas
3. Inclua dois CommandButtom´s no Form;
4. Altere a propriedade Caption do segundo botão para "Finaliza";
5. Apague o conteúdo da propriedade Caption do primeiro botão;
6. Dê um clique duplo no segundo botão e entre com a seguinte codificação para o mesmo:
End
End Sub
7. Dê um duplo clique no controle HScrollBar e entre com a seguinte codificação:
Private Sub HScroll1_Change()
Command1.Caption = HScroll1.Value
End Sub
8. Agora execute o projeto.
Vá movimentando através 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 botão 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 alterações:
9. Exclua o primeiro botão;
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 codificação para:
Private Sub HScroll1_Change()
Label1.FontSize = HScroll1.Value
End Sub
Observe a seguir como ficou o seu formulário:
Agora execute o projeto e movimente o ponteiro da barra de rolagem. Observe que de forma automática 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 (conteúdo do caption) do Label1 à posição do volume da
barra de rolagem.
- Aula 19 - Botões de opção

Os botões de opção também são conhecidos pelo nome de botões de rádio. O uso deste tem o objetivo de
permitir ao usuário selecionar uma opção dentre as disponíveis (apenas uma única opção). Quando usados
em um programa, por permitirem apenas uma seleção dentre as disponíveis, gerando estão agrupados em
um quadro. Dentre as propriedades mais utilizadas dos botões de rádio, destacamos:
Propriedade Valor
define o nome do componente. Nome este que identificará o mesmo durante a

Name
codificação do sistema.
Caption Define um conteúdo para a opção a nível de usuário
Através desta propriedade poderemos testar se o botão está acionado ou não (true
Value
ou false).
Aqui você define se o botão terá a aparência padrão ( 0-standard) ou a aparência de

Style
um botão (1-graphical)
Dentre os eventos, o mais utilizado é o Click() que é acionado assim que usuário seleciona o botão, ou seja,
marca a sua opção.
Vamos criar um projeto exemplo, onde o usuário irá entrar com o valor total da compra e, de acordo com a
opção de pagamento, terá um desconto, o valor permanecerá o mesmo ou então teremos um acréscimo no
valor total a ser pago.
1. Inicie um novo projeto em VB;
2. Insira na parte superior do formulário 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 conteúdo 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 conteúdo da propriedade TEXT.
9. Ao final deste procedimento, seu formulário terá o seguinte aspecto:
Nosso próximo passo é criar a codificação do sistema. Esta é bastante simples, ao clicar (evento click) em
qualquer um dos botões de rádio disponíveis, o sistema irá fornecer no segundo TextBox o valor total a ser
pago pelo cliente, já calculado o desconto ou acréscimo sobre o valor total ou, se for o caso, mantendo o
valor total.
Para codificar a primeira opção, ou seja, para o pagamento à vista e calcular 10% de desconto, dê um clique
duplo sobre o componente OptionButton1 e entre com a seguinte codificação:
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 variável A1 o conteúdo da caixa de textos TEXT1
devidamente transformado em número através da função VAL. Em seguida estamos multiplicando o valor da
compra por 0.9 (oferecendo 10% de desconto) e transferindo este valor sobre a forma de moeda (função
FORMATCURRENCY) para dentro da segunda caixa de texto TEXT2.
Vamos então codifcar o segundo botão de rádio. Dê um clique duplo sobre o mesmo e entre com a seguinte
codificação:
Text2.Text = Text1.Text
End Sub
Este procedimento é mais simples, como o valor é o mesmo (sem acréscimo ou desconto), estamos apenas
transferindo para a caixa de edição 02 o conteúdo da caixa de edição 01.
Vamos agora codificar o terceiro botão de rádio. Dê um clique duplo sobre o mesmo e entre com a seguinte
codificação:
a1 = Val(Text1.Text)
a2 = ((a1 * 3) / 100)
a3 = a1 + a2
Text2.Text = Str(FormatCurrency(a3, 2, vbTrue, vbTrue, vbTrue))
End Sub
Observe que a lógica aqui empregada é similar ao do primeiro botão de rádio, mudando apenas as
operações aritméticas realizadas.
- Aula 20 - Utilizando caixas de seleção

O controle que iremos estudar na aula de hoje é muito similar ao que estudamos no módulo de aula
anterior, sendo que podemos destacar as seguintes diferenças entre eles:
1. Nas caixas de seleção representam um único controle cada;
2. As caixas de seleção não são mutuamente exclusivas.
Já as caixas de seleção possuem três configurações para a propriedade Value:
Selecionada;
Não selecionada;
Acinzentada
As propriedades mais utilizadas em caixas de seleção são:
Name
Caption
Value
Já o evento mais utilizado para este controle é o evento Click(), disparado quando o usuário marca a caixa
de seleção em questão.
Vamos criar um simples projeto para que você entenda a funcionalidade destes controles:
1. Inicie um novo projeto no VB;
2. Insira no formulário, na parte superior do mesmo, dois controles de caixas de seleção (um abaixo do
outro);
3. Altere a propriedade Caption da primeira caixa de seleção para NEGRITO:
4. Altere a propriedade Caption da segunda caixa de seleção para ITÁLICO;
5. Insira abaixo dos dois controles anteriores um Label e altere a propriedade Caption do mesmo para
ABAIXO, DIGITE UM TEXTO;
6. Abaixo do label, insira um controle TextBox e apague o conteúdo da propriedade Text do mesmo. Ao final
destes procedimentos, seu formulário terá o seguinte aspecto:
O objetivo deste projeto é simples: Sempre que a caixa NEGRITO estiver selecionada o conteúdo digitado no
controle Text ficará em negrito e quando não selecionado, o conteúdo sairá do negrito. O mesmo acontecerá
com o controle Itálico.
O próximo passo é codificar o evento Click do controle CheCkBox1. Veja a codificação a seguir:
Private Sub Check1_Click()
If Check1.Value = 1 Then
Text1.FontBold = True
Else
Text1.FontBold = False
End If
End Sub
As linhas acima são simples de serem analisadas. Primeiro testamos se a propriedade Value do Ckeck1 é
igual à 1, ou seja, se a mesma está ticada. Caso positivo, a font do tipo negrito (fontbold) do controle Text
será true (ativada), caso contrário, será falsa (desativada).
Esta mesma lógica iremos utilizar para codificar o evento Click do Ckeck2, porém ao invés de utilizar
FontBold, iremos utilizar FontItalic, conforme observamos na listagem a seguir:
Private Sub Check2_Click()
If Check2.Value = 1 Then
Text1.FontItalic = True
Else
Text1.FontItalic = False
End If
End Sub
Agora, execute o projeto, digite um conteúdo qualquer dentro da área de texto e marque/desmarque as
duas caixas de seleções e veja os resultados.
- Aula 21 - Utilizando caixas de lista

Uma caixa de lista nada mais é do que uma caixa que tem a finalidade de exibir dados sobre a forma de
lista. Este controle é comum em diversos aplicativos do Windows.
Uma das características das caixas de lista é que o usuário não poderá editar diretamente seu conteúdo (ou
seja, dentro da própria lista).
Dentre as principais propriedades das caixas de lista, podemos destacar:
Columns - este propriedade permite especificar o número de colunas que nossa lista terá;
List - define ou retorna o valor de um item de uma lista. Vale lembrar que os itens de uma caixa de
lista são controlados por um índice, este índice tem seu primeiro valor igual ao número zero (0),
assim sendo, uma caixa de lista com 5 itens, terá como índice o número zero (0) ao número 4
(quatro).
Através da propriedade List poderemos obter um item de uma lista. Veja o exemplo a segui:
List1.list(3) -> neste caso estamos nos referindo ao quarto item de uma lista. Lembre-se que o primeiro
item tem o índice zero (0).
ListIndex - Retorna a posição indexada do item selecionado;
ListCount - fornece o número de itens de uma caixa de lista;
MultiSelect - define se o usuário poderá ou não selecionar mais de um item da lista de forma
simultânea;
Sorted - ordena (true) ou não (false) os dados da lista.
Entre os principais eventos das caixas de lista temos:
DblClick - ocorre quando existe um clique sobre um dos itens da lista.
Métodos da caixa de lista:
AddItem - adiciona um item a caixa de lista;
Clear - remove todos os itens de uma caixa de lista;
RemoveItem - remove um item de uma caixa de lista.
Vamos criar um pequeno projeto para que você entenda melhor tudo o que vimos até este ponto.
1. Execute o VB6;
2. Inicie um novo projeto;
3. Insira no seu formulário duas caixas de listas, uma em cada extremidade do formulário;
4. Insira na parte inferior do formulário, abaixo da primeira lista um Label, ao lado um TextBox e ao lado um
Buttom. Ao final deste procedimento, sua janela terá o seguinte aspecto:
5. Agora, inclua entre as duas listas 8 Buttons;

6. Altere as seguintes propriedades dos componentes já inclusos:
Componente Propriedade Valor
Label1 Caption Dado:
Command1 Caption Inclui:
Command2 Caption ===>
Command3 Caption <===
Command4 Caption <= Exclui
Command5 Caption Exclui =>
Command6 Caption <= Limpa lista
Command7 Caption Limpa Lista =>
Command8 Caption Finaliza

Ao final deste procedimento, seu formulário terá o seguinte aspecto:
Vamos começar a codificar nosso sistema. O primeiro passo é fazer com que o usuário ao digitar alguma
informação (dado) na caixa de edição Text2 e clicar sobre o botão INCLUI, esta informação seja adicionada
na lista 01. Para isso, dê um clique duplo no botão INCLUI e entre com a seguinte codificação:
List1.AddItem Text1.Text
End Sub
Observe que nos comandos acima, estamos adicionando (additem) à lista 1 (List1) o conteúdo digitado no
controle TextBox1 (Text1.Text). Veja como é simples adicionar itens em uma lista através do VB.
Vamos agora codificar o botão Command2 ( ===> ) que tem a finalidade de levar o item selecionado no
List1 para o List2. Para tal função, dê um clique duplo no botão em questão e entre com a seguinte
codificação:
List2.AddItem List1.Text
List1.RemoveItem (List1.ListIndex)
End Sub
Observe a primeira linha de comando da rotina citada. Adicionamos na lista2 (List2.AddItem) o conteúdo do
item selecionado na Lista1 (List1.Text).
Em seguida, removemos o Item transferido para a lista2 da lista1 (List1.RemoveItem(ListIndex)). Conforme
podemos observar, para remover um item de uma lista, temos que especificar o índice do mesmo e, como
queremos remover o item selecionado, utilizamos a propriedade ListIndex.
Vamos codificar o Command3 ( <=== ), que tem função contrária do botão que acabamos de codificar. Os
comandos utilizados neste botão serão muito parecidos com os utilizados no botão anterior. Veja a seguir:
List1.AddItem List2.Text
End Sub
Agora, vamos codificar o botão Command4 ( <== Exclui ) que tem a finalidade de apenas excluir o item
selecionado na lista1. Para isso, dê um clique duplo no botão em questão e, entre com a seguinte
codificação:
End Sub
No comando acima, você simplesmente solicitou a exclusão do item da lista1 que está selecionado
(List1.RemoveItem (list1.ListIndex)).
Em seguida, vamos codificar o botão Command5 ( Exclui ==> ), que tem a mesma sintaxe utilizada no
botão anterior, com a diferença de utilizar sempre o List2 ao invés do List1. Veja a codificação a seguir:
End Sub
Vamos agora codificar o botão ( <= Limpa lista ), que tem a função de excluir todos os itens da lista 01. O
comando é simples, conforme podemos observar abaixo:
List1.Clear
End Sub
O próximo passo é codificar o botão ( Limpa lista => ) que tem o objetivo de excluir todos os itens da lista
02. O comando é similar ao utilizado no procedimento anterior, apenas se trocando o List1 por List2. Veja
abaixo:
List2.Clear
End Sub
Vamos agora codificar o último botão, que tem a finalidade de finalizar o programa. Para isso, basta digitar o
comando END em seu procedimento de duplo clique.
End
End Sub
Execute agora o sistema e verifique os resultados.
- Aula 22 - Utilizando caixas de lista de unidades, diretórios e arquivos

Neste módulo iremos estudar três controles que normalmente são utilizados em conjunto em um projeto.
Veja no gráfico a seguir os três controles que iremos estudar marcados e numerados:
01 - Caixas de lista de unidades

02 - Caixas de lista de diretórios
03 - caixas de lista de arquivos
O controle caixa de lista de unidades (DriveListBox) permite ao usuário selecionar uma determinada unidade
a ser trabalhada (drive de disquete, drive de CD, Winchester, etc...). Este controle poderá ser utilizado tanto
para selecionar um drive para leitura de dados como para gravação de dados.
Como principal propriedade deste componente temos a DRIVE, sendo que esta é uma propriedade de
execução e que retorna ao sistema a unidade de drive selecionada pelo usuário durante a execução do
projeto.
A propriedade em questão é sempre utilizado em conjunto com o evento OnChange, ou seja, quando o
usuário selecionar uma nova unidade
Já as caixas de lista de diretórios (DirListBox) permite selecionar um diretório (pasta) na unidade que estiver
ativa (selecionada pelo controle DriveListBox). As propriedade mais utilizada neste controle é a Path que
armazena o caminho que está sendo utilizado no drive selecionado.
Já o evento mais utilizado é o Change(), ou seja, quando selecionarmos um novo caminho (patch).
As caixas de listas de arquivos (FileListBox) é utilizada para relacionar os nomes dos arquivos que estão em
um determinado caminho (DirListBox)/unidade (DriveListBox). Dentre as principais propriedades deste
controle, podemos destacar:
Path - armazena o caminho na qual os arquivos devem ser relacionados;
FileName - armazena o nome do arquivo que está/estará sendo manipulado;
Pattern - define a extensão dos arquivos visíveis no controle
O evento mais comum a ser utilizado neste controle é o evento Click().
Vamos gerar um simples programa com estes controles para que você entenda o seu funcionamento:
1. Inicie um novo projeto no VB6;
2. Insira no seu formulário os seguintes componentes:
1 DriveListBox;
1 DirListBox;
1 FileListBox;
1 Label
Seu formulário deverá ter o seguinte aspecto:
Altere agora as seguintes propriedades dos componente que foram inclusos no seu projeto:
Componente Propriedade Valor
Form1 Caption Projeto Aprenda em Casa
Label1 Caption apague o conteúdo
Agora, vamos codificar os eventos necessários para que nosso projeto ganhe vida.
Selecione o evento Change do DriveListBox e entre com a seguinte codificação:
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Observe que com a codificação acima, quando o componente DriveListBox tiver o seu valor alterado, será
armazenada na propriedade Path (que indica a unidade), a nova unidade selecionada (Drive1.Drive).
Agora, vamos codificar o evento Change do componente DirectoryListBox:
Private Sub Dir1_Change()
File1.Path = Dir1.Path
Label1.Caption = File1.Path
End Sub
Observe que primeiro estamos vinculando que as pastas (caminhos) a serem exibidos (File1.Path) sejam
aqueles constantes da unidade selecionada (Dir1.Path) e em seguida, estamos mostrando a unidade dentro
do label que inserimos em nosso projeto (Label1.Caption=File1.Path).
Agora, vamos codificar o evento Click do componente FileListBox:
Private Sub File1_Click()
Label1.Caption = File1.Path & " " & File1.FileName
End Sub
Aqui estamos apenas jogando no label, o nome do arquivo que recebeu o clique.
Salve e execute o seu projeto.
- Aula 23 - O que é um MDI Form?

Você provavelmente já operou um aplicativo comercial no Windows. Neste existe uma janela principal,
normalmente com as opções do sistema (menus e botões de atalho) e janelas secundárias, que são abertas
de acordo com as opções selecionadas na janela principal.
O MDI-Form é a janela principal do controle de sua aplicação e, normalmente nesta estão dispostos os
menus do sistema e botões de atalho (acesso rápido) onde neste serão ligadas diversas outras janelas
(formulários), também conhecidos por janelas filhas.
Existe uma propriedade nos formulários denominada MDIChild, conforme mostra a figura a seguir:
Ao setar esta propriedade para True, você está indicando que esta é uma janela filha e que está subordinada
a uma janela mãe, passando seu projeto a operar de forma idêntica ao program manager do Windows 3.1.
Normalmente os MDI-Form, conforme citamos anteriormente, possuem os seguintes componentes:
Um menu de sistema - este menu deverá ser incluso através da seleção da opção de menu Tools ...
Menu Editor. Ao selecionar esta opção, será exibida a seguinte janela na tela do seu equipamento:
Nesta janela você irá construir o menu de sua aplicação (iremos estudar a mesma com riqueza de detalhes
posteriormente)
Uma figura centralizada que normalmente é o logotipo da empresa. Esta figura poderá ser ligada ao
componente IMAGE. Para definir a figura que estará presente dentro do componente, você deverá
seguir os passos:
1. Insira no formulário um componente IMAGE, em destaque na figura a seguir:
2. Na propriedade Picture, selecionar o gráfico que será aprensentado dentro do componente Image.
Botões de atalho rápido para as opções mais importantes de seu sistema.
Porém para se criar um MDI-Form, existe um procedimento especial neste sentido. Veja os passos
seguintes:
1. Clique na opção de menu Project;
2. No menu suspenso que é exibido selecione a opção ADD MDI-FORM. Neste ponto, será exibida a
seguinte janela:
3. Confirme a operação clicando no botão ABRIR. Agora, basta você preparar o seu MDI-Form.
- Aula 24 - Criação de Menus em projetos VB

Você já deve ter observado que todo bom aplicativo for Windows possui na parte superior da janela um
Menu do tipo DropDown. este tipo de menu segue um padrão para os mais conhecidos aplicativos do sistema
operacional Windows. Para criar um menu através do VB o procedimento é muito simples, pois o VB traz um
utilitário com este fim, sem que seja necessário escrever uma única linha de programa sequer. O primeiro
passo é estar com o formulário que irá receber o menu com o foco, feito isso, proceda da seguinte forma:
1. Clique na opção de menu Tools;
2. Clique na opção "Menu Editor", neste ponto será apresentado a seguinte janela na sua área de trabalho:
Esta é a janela do construtor de menus. Dentre as opções disponíveis na mesma, temos:

Caixa de texto Caption -> esta é utilizada para escrever o nome da opção, por exemplo
"Arquivo", "Imprimir", etc...
Caixa de texto Name -> aqui você irá designar uma "Sub" que será vinculada a opção que está
sendo gerada.
Caixa de texto Index ->Você utililizará esta caixa quando se torna necessário o uso de um único
nome de "Subs" criadas, economizando assim rotinas que poderão ser controladas a partir de um
mesmo ponto com uma espécie de múltipla seleção, conforme podemos observar a seguir:
Private Sub MenuPrincipal_Click()
Select Case Index
Case 0
Frminclui.Show
Case 1
Frmaltera.Show
Case x
......
End Select
End Sub
Observe que temos diversas opções em um único comando de seleção.
Caixa de texto "Help Context ID" -> caso você saiba trabalhar com arquivos de Help, poderá
associar um número de arquivo de Help do tipo "RTF" e, caso o usuário pressione a tecla <F1> o
arquivo em questão será exibido.
Caixa de texto ShortCut -> aqui você poderá definir uma tecla de atalho para a opção que está
sendo criada.
Caixa de seleção Checked -> define se a opção é boleana ou não.
- Aula 25 - Criação de Menus em projetos VB - Parte II
Vamos gerar nesta aula um exemplo gerando um pequeno menu para sua aplicação. O primeiro passo é
iniciar uma nova aplicação no VB e em seguida, siga os passos abaixo:
1. Clique na opção de menu Tools ... Menu Editor.
2. Vamos construir a primeira opção de nosso menu:
Em "Caption" digite "&Arquivo";
Em "Name", digite "Teste1". Ao final deste procedimento, sua janela deverá ter o seguinte aspecto:
3. Agora temos que inserir esta opção no menu que será incluso no Form, para isso, clique no botão
INSERT. Neste momento, a linha azul (que indica a opção que está sendo criada) deverá pular para
a linha em branco logo abaixo.
4. Você quer inserir uma nova opção. Esta é uma opção principal do menu ou uma opção do menu
Arquivo? Se for uma opção do menu Arquivo, você deverá clicar agora no botão representado pela
seta apontando para a direita, formando assim uma sub-opção do menu Arquivo. Você identificará
que esta é uma sub-opção pois será observado três pontos antes do nome da nova opção. Após
criar todas as opções do menu Arquivo, para criar uma nova opção de menu principal, basta antes
clicar sobre o botão representado pela seta apontando para a esquerda e, assim sucessivamente
para criar as sub-opções e opções principais do menu. Clique então no botão representado pela seta
apontando para a direita.
5. Vamos então criar a sub-opção do menu Arquivo:
Em Caption digite "A&brir";
Em ShortCut selecione a opção "CTRL+O";
Em Name digite "Teste2";
Clique no botão "Next";
6. Você também deve estar perguntando o porque do símbolo "&". A letra que está logo após este
símbolo será aquela utilizada em conjunto com a tecla ALT para acionar esta opção no menu. Agora
que você já conhece a forma correta de operar o construtor de menu, crie um com a seguinte
estrutura:
7. Clique em OK;
8. Execute seu aplicativo, veja o resultado:
- Aula 26 - Criação de Menus em projetos VB - Parte III
Nem sempre uma opção de menu efetua alguma espécie de ação dentro do próprio formulário que o contém.
Muitas das vezes, ao selecionar uma opção de menu, um novo formulário é aberto para executar o
procedimento proposto na opção selecionada. Este será o objetivo da aula de hoje, exibir como chamar um
novo Form através de uma opção de menu. Para tal, iremos gerar um exemplo para ficar claro como tal
procedimento se realiza.
Execute o VB6;
Solicite a criação de uma nova aplicação;
No Form principal de nossa aplicação, insira um componente de menu, contendo as seguintes
opções:
Arquivo Finaliza
Editor Texto
Editor gráfico
Finaliza
Ao final deste procedimento, sua janela de menus terá o seguinte aspecto:
O próximo passo é criar na aplicação o novo formulário, que iria receber um editor de textos, pois o
Form1, que é criado automaticamente quando solicitamos uma nova aplicação no VB, terá o menu
do sistema (e em um programa comercial, outros elementos, porém estamos gerando um sistema
simples apenas para exemplificar a chamada de outros forms através de menus). Para isso, clique
na opção de menu PROJECT ... ADD FORM. Neste ponto será apresentada a seguinte janela:
Selecione a opção FORM e em seguida clique em OK. O novo Form é apresentado na sua área de
desenvolvimento, tendo como nome inicial FORM2, conforme podemos observar na figura a seguir:
Altere a propriedade NAME do form2 para EDITOR;

Inclua no form EDITOR um componente LABEL e um componente BUTTOM;
Altere a propriedade CAPTION do LABEL para "Você está no editor de textos";
Altere a propriedade CAPTION do BUTTOM para "Fecha Editor". Neste ponto o formulário EDITOR
terá o seguinte aspecto:
Dê um clique duplo no buttom1 e entre com a seguinte codificação:

Unload Me
End Sub
Neste comando estamos solicitando que o formulário EDITOR seja descarregado do sistema quando
solicitado para que o mesmo seja fechado e o controle volte ao formulário que o chamou, porém
até o momento não codificados o FORM1 na opção de menu EDITOR DE TEXTO a chamada ao
formulário EDITOR, para isso, retorne o foco ao FORM1, e entre com a seguinte codificação para a
opção de menu ARQUIVO ... EDITOR DE TEXTO (basta em tempo de desenvolvimento, clicar sobre
esta opção que a janela de código se abre automaticamente):
Private Sub texto_Click()
editor.Show
End Sub
Observe que carregamos no evento Click desta opção de menu o form EDITOR através do comando
EDITOR.SHOW (exiba o form Editor) e, após o mesmo ter sido trabalhado e quando o usuário clicar
no botão FECHA EDITOR, a respectiva janela será fechada, voltando o controle ao formulário
principal de nossa aplicação. Execute o projeto e teste esta opção de menu já codificada.
Agora, tente criar o terceiro FORM que representaria o editor gráfico e fazer com que o usuário
possa fecha-lo e retornar o controle ao menu principal da aplicação. Em caso de dúvidas, consulte o
suporte.
- Aula 27 - Visual Basic 6 e funções - Parte I

Você saberia definir o que é uma função? Uma função nada mais é do que um ou mais comandos que
retornam um valor determinado de acordo com os parâmetros informados. Existem uma série de funções
prontas para uso em VB6. Neste módulo iremos estudar algumas delas.
Vamos começar a citar as funções que tratam de Strings, para isso, vamos criar um simples projeto para
exemplificar as mesmas.
Inicie um novo projeto;
Na parte superior do form criado, insira um componente LABEL e altere a propriedade CAPTION do
mesmo para DIGITE UMA PALAVRA/FRASE;
Ao lado deste label, inclua um componente TEXTBOX e apague o conteúdo da sua propriedade
TEXT;
Inclua abaixo da linha que contém o label e o textbox um componente BUTTOM, e altere a
propriedade CAPTION do mesmo para TESTE DE FUNÇÕES;
Insira na linha abaixo e um abaixo do outro, mais 4 componentes LABELs, alterando a propriedade
CAPTION dos mesmos para: FUNÇÃO LCASE, FUNÇÃO UCASE, FUNÇÃO LEFT, FUNÇÃO RIGHT,
respectivamente.
Ao lado de cada um dos 4 labels inseridos no passo anterior, inclua um componente TEXTBOX,
apagando o conteúdo da sua propriedade TEXT. Ao final deste procedimento, seu formulário terá o
seguinte aspecto:
Antes de codificarmos o botão "TESTE DE FUNÇÕES", vamos ver o que faz cada uma e a sintaxe que deverá
ser empregada nas mesmas:
Função LCASE
Esta função converte as letras minúsculas de uma string em maiúsculas. Sua sintaxe é:
LCASE (string)
Função UCASE
Esta função converte as letras maiúsculas de uma string em minúsculas. Sua sintaxe é:
UCASE (string)
Função LEFT
Esta função retorna os "x" primeiros caracteres de uma string. Sua sintaxe é:
LEFT (string, número_de_caracteres)
Função RIGHT
Esta função retorna os "x" últimos caracteres de uma string. Sua sintaxe é:
RIGHT (string, número de caracteres).
Agora que já sabemos o objetivo das funções que vamos utilizar e suas sintaxes, iremos codificar nosso
pequeno sistema. Para isso, dê um clique duplo no buttom e entre com a seguinte codificação:
Text2.Text = LCase(Text1.Text)
Text3.Text = UCase(Text1.Text)
Text4.Text = Left(Text1.Text, 3)
Text5.Text = Right(Text1.Text, 3)
End Sub
Execute o projeto, entre com o nome "SÃO paulo" no primeiro TextBox, clique no botão que testa as
funções e veja os resultados:
Passo 1 -> executando e digitando a frase citada no TextBox:
Passo 2 -> clicando no botão TESTE DE FUNÇÕES:
- Aula 28 - Visual Basic 6 e funções - Parte II

Neste módulo vamos estudar algumas funções do VB que tem o objetivo de formatar os dados que serão
exibidos em um determinado sistema.
FUNÇÃO FORMATCURRENCY
Esta função tem o objetivo de formatar um determinado numero ou variável numérica para que seu
conteúdo seja exibido em formato de moeda. A sintaxe deste comando é:
FormatCurrency (valor, número_casas_decimais,true1 ou false1, true2 ou false2, true3 ou false3)
Sendo que:
O true1 ou false1 indica se você quer ou não que sejam exibidos zeros à esquerda de uma virgula decimal.
O true2 ou false2 indica se você quer ou não que o valor seja colocado dentro de parênteses no caso de
número negativo.
O true3 ou false3 indica se você quer ou não separar as casas de milhar.
FUNÇÃO FORMATNUMBER
Esta função tem o objetivo de formatar um determinado número ou variável numérica no que se diz respeito
a forma pela qual o valor deste será exibido. é idêntica a função FORMATCURRENCY, porém não trata os
valores como sendo moeda e sim simplesmente números formatados. Sua sintaxe é idêntica a função
FORMATCURRENCY.
FormatNumber (valor, número_casas_decimais,true1 ou false1, true2 ou false2, true3 ou false3)
Sendo que:
O true1 ou false1 indica se você quer ou não que sejam exibidos zeros à esquerda de uma virgula decimal.
O true2 ou false2 indica se você quer ou não que o valor seja colocado dentro de parênteses no caso de
número negativo.
O true3 ou false3 indica se você quer ou não separar as casas de milhar.
Para melhor compreender as duas funções acima, vamos gerar um pequeno exemplo:
1. Inicie o VB e solicite uma nova aplicação;
2. Inclua na parte superior do FORM um Label e ao lado um TextBox;
3. Altere a propriedade CAPTION do label para "Entre com um número";
4. Apague o conteúdo TEXT do componente TEXTBOX;
5. Inclua abaixo dos componentes dos passos anteriores dois CommandButton;
6. Altere a propriedade Caption do primeiro para "Formata em Moeda";
7. Altere a propriedade Caption do segundo para "Formata em número";
8. Ao final deste procedimento seu formulário terá o seguinte aspecto:
9. Vamos codificar o primeiro botão (formata em moeda). Dê um duplo clique sobre este e entre com a
x = Val(Text1.Text)
MsgBox FormatCurrency(x, 2, vbTrue, vbTrue, vbTrue)
End Sub
O primeiro passo foi armazenar na variável "x", o valor do text1.text transformado em número, para isso
usamos a função VAL, pois sabemos que o conteúdo de um TextBox sempre é String e para que possamos
utilizar as funções FormatCurrency e Number, temos que ter um valor do tipo numérico.
Em seguida, criamos uma caixa de diálogo (MSGBOX) que irá conter o valor da variável "x", em formato de
moeda (formatcurrency), com duas casas decimais, com zeros à esquerda da virgula decimal, sendo um
número negativo este será apresentado entre parênteses e com separador de casas decimais.
10. Vamos agora codificar o segundo botão (formata em número). Dê um clique duplo sobre este e entre
com a seguinte codificação:
x = Val(Text1.Text)
MsgBox FormatNumber(x, 2, vbTrue, vbTrue, vbTrue)
End Sub
O primeiro passo foi armazenar na variável "x", o valor do text1.text transformado em número, para isso
usamos a função VAL, pois sabemos que o conteúdo de um TextBox sempre é String e para que possamos
utilizar as funções FormatCurrency e Number, temos que ter um valor do tipo numérico.
Em seguida, criamos uma caixa de diálogo (MSGBOX) que irá conter o valor da variável "x", em formato de
número (formatNumber), com duas casas decimais, com zeros à esquerda da virgula decimal, sendo um
número negativo este será apresentado entre parênteses e com separador de casas decimais.
Execute agora nosso pequeno projeto, e entre com o seguinte número: 123456,58. Em seguida, dê um
clique em cada um dos botões para ver o resultado. A sequência do resultado é exibida nos gráficos a
seguir:
Neste primeiro passo entramos com o valor solicitado.
Aqui está sendo exibida a janela que será mostrada na sua tela quando clicar sobre o
botão "formata em moeda".
Aqui está sendo exibida a janela que será mostrada na sua tela
quando clicar sobre o botão "formata em número".
Coloque agora um sinal de negativo ao lado do número do TextBox e repita a

operação, você irá perceber que os números serão exibidos dentro de parênteses.
- Aula 29 - Manipulando dados em arquivos ASC II - Parte I

No VB6 existem duas maneiras básicas de armazenar informações:
Através do uso de banco de dados (a mais utilizada por oferecer maiores recursos)
Através de arquivos ASC II.
Dentre as características de arquivos ASC II, podemos destacar:
Armazenam dados do tipo texto;
Possuem seus valores (lista de valores) separados por vírgulas (CSV);
Podem especificar uma informação por linha de texto ou por uma formatação determinada por sua
pessoa.
Quando trabalhamos com arquivos ASC II, poderemos manipular este através dos seguintes tipos:
Sequênciais;
Randômicos;
Binários.
O primeiro passo para se trabalhar com arquivos do tipo ASC II é abrir o mesmo. Aqui existe uma
observação importante: Se você especificar para a abertura um arquivo que não exista, este será criado na
hora e terá como conteúdo o valor nulo, ou seja, nada.
Para abrir um arquivo do tipo ASC II, temos o comando OPEN, com a seguinte sintaxe:
OPEN <nome do arquivo> FOR <tipo do arquivo> AS <manipulador>
Sendo que:
Nome do arquivo: nome que será dado ao futuro arquivo ASC II ou o nome do arquivo ASC II já
existente que deverá ser aberto.
Tipo do arquivo: aqui será especificado a forma pela qual o arquivo será aberto. Dentre as possíveis
temos:
o Append
o Input
o OutPut
o Binary
o Random
Manipulador: também conhecido como Handle, que tem a função de concretizar a referência ao
arquivo aberto.
O parâmetro <tipo do arquivo> é opcional e, caso seja omitido, o arquivo será do tipo Random (padrão do
VB).
Após manipular os dados do arquivo, deverá fechar o mesmo através do comando CLOSE, que tem a
seguinte sintaxe:
CLOSE <nome do arquivo>
Vamos começar falando sobre os arquivos ASC II do tipo sequêncial, que é aquele constituído por uma
conjunto de linhas de texto. Neste tipo de arquivo, para que possamos incluir novas informações no mesmo
(escrever dados), deveremos atribuir a este o tipo de arquivo INPUT ou APPEND, sendo que:
No tipo INPUT, os dados serão sobrescritos;
No tipo APPEND, os dados serão acrescentados aos já existentes ao final do conteúdo já
armazenado.
Se o procedimento a ser adotado for a leitura do conteúdo de um arquivo do tipo sequêncial, teremos então
que atribuir a este o tipo de arquivo OUTPUT.
Para que possamos escrever (gravar) informações no arquivo gerado, iremos utilizar o comando PRINT.
Para que estes comandos fiquem claros, vamos gerar um pequeno exemplo em VB e em seguida
acompanhar o seu resultado no WordPad do Windows. Para tal, proceda da seguinte maneira:
Execute o VB6 e solicite a criação de uma nova aplicação;
No novo form que lhe é oferecido, na parte superior, inclua um componente Label e altere a
propriedade CAPTION do mesmo para "Nome do Aluno";
Inclua ao lado do Label um componente TextBox e apague o conteúdo de sua propriedade Text;
Inclua abaixo um componente CommandButton e altere a propriedade Caption deste para "Gravar";
Ao final deste procedimento, seu formulário terá o seguinte aspecto:
Agora dê um clique duplo sobre o Button e entre com a seguinte codificação:

Dim manipulador As Integer
manipulador = FreeFile
Open "C:\meus documentos\apcasa.txt" For Append As manipulador
Print #manipulador, Text1.Text
Close manipulador
Text1.Text = ""
End Sub
O primeiro passo foi criar a variável manipulador, que sendo atribuída a mesma o valor FreeFile faz com que
o sistema retorne o próximo manipulador de arquivos disponível, que deverá ser utilizado em todas as
instruções do tipo Open, Print# e Close. Depois abrimos o arquivo APCASA.TXT que está armazenado no
diretório "meus documentos" para o tipo Append (ou seja, irá receber a adição/inclusão de dados). Em
seguida, gravamos no arquico apcasa.txt o conteúdo armazenado no componente Text1.text, liberando em
seguida o seu conteúdo.
Execute o sistema, digite a seguinte sequência:
Digite no TextBox o conteúdo "Paulo" e clique no botão "Gravar";
Digite no TextBox o conteúdo "Maria" e clique no botão "Gravar";
Digite no TextBox o conteúdo "Manoel" e clique no botão "Gravar";
Digite no TextBox o conteúdo "Fernando" e clique no botão "Gravar".
Encerre a execução do seu aplicativo, clicando sobre o botão "x".
Agora, execute o seu editor de textos WordPad e como "documento de texto", solicite a abertura do arquivo
APCASA.TXT, você terá o seguinte resultado:
Observe que através do seu programa em VB, foi gerado um arquivo texto de nome APCASA e com a
inclusão dos nomes dos alunos digitados anteriormente. Você de uma forma simples, criou um banco de
dados (arquivo contendo informações).
- Aula 30 - Manipulando dados em arquivos ASC II - Parte II

Para melhor compreender os arquivos texto (ASC II), iremos neste módulo começar a elaboração de um
sistema editor de texto, onde iremos desenvolver diversas técnicas, como ler e gravar dados, imprimir os
dados digitados, etc... além de estudarmos novos controles.
Inicie o VB6 e solicite a criação de um novo aplicativo;
Inclua no seu formulário (na parte esquerda e um abaixo do outro), quatro componentes
CommandButtom;
Na parte central do formulário inclua um componente TextBox, redimensionando o mesmo
conforme podemos observar na figura abaixo:
No módulo anterior, especificamos diretamente no código o nome do arquivo a ser gravado. Neste
exemplo, iremos utilizar a caixa padrão do Windows para salvar ou ler arquivos, assim sendo,
deveremos incluir em nossa interface o componente Common Dialog, para isso, siga os passos
abaixo:
o Clique na opção de menu PROJECT;
o No menu suspenso que é apresentado, selecione a opção COMPONENTS, será então
apresentada a seguinte janela:
o Marque a opção MICROSOFT COMMON DIALOG CONTROL 6 e em seguida, clique em OK.

Este controle será acrescentado a sua barra de ferramentas, conforme podemos observar a
seguir:
Inclua o componente CommonDailog em sua aplicação (no Form). Este é um componente não
visível, ou seja, durante a execução do projeto, o mesmo não estará visível.
Para que o TextBox aceite múltiplas linhas (fato comum em um texto), altere a propriedade
Multiline do mesmo para True, apague o conteúdo da propriedade Text e em seguida, altere a
propriedade ScrollBars para 3-Both;
Altere o Caption dos 4 primeiros Buttons para "LER ARQUIVO", "GRAVAR ARQUIVO", "LIMPAR
ÁREA", "FINALIZAR";
Para o botão LER ARQUIVO, entre com a seguinte codificação:
CommonDialog1.Filter = "Arquivos Texto (*.TXT)|*.TXT"
CommonDialog1.ShowOpen
If CommonDialog1.FileName <> "" Then
Open CommonDialog1.FileName For Input Access Read As #1
Do While Not EOF(1)
texto = texto & Input(1, #1)
Loop
Text1.Text = texto
Close #1
End If
End Sub
Observações relativas aos códigos utilizados acima:
1. Primeiro criamos um filtro para o tipo de arquivo na qual iremos trabalhar, neste caso tipo Texto
(TXT), além de exibir a mensagem "Arquivos Texto (*.TXT)", na barra de título da janela padrão do
windows de abertura de arquivos;
2. Em seguida, abrimos o componente Commondialog1, através do método Show (invocando a janela
padrão de abertura de arquivos do Windows), em seu método de abertura de arquivos (Open);
3. No teste realizado pelo comando IF, testamos se o usuário digitou alguma coisa diferente de nada,
ou seja, se o mesmo entrou com um nome de arquivo, este deverá ser lido, o que acontecerá
durante os comandos positivos do IF;
4. O primeiro passo foi abrir o arquivo selecionado no CommonDialog para leitura, sendo que este será
tratado como arquivo número 01 READ AS #1;
5. Após a abertura, o sistema irá percorrer do primeiro ao último caracter DO WHILE NOT EOF(1);
6. Cada caracter do arquivo, será lido (um por vez) e concatenado (somado) à variável TEXTO
texto=texto&input(1,#1);
7. Após termino o loop (todos os caracteres que fazem parte do arquivo serem lidos), iremos transferir
o conteúdo da variável TEXTO para o TEXTBOX1 textbox1.text=texto;
8. Em seguida fechamos o arquivo.
Execute a aplicação, clique no botão LER ARQUIVO e selecione o arquivo APCASA que geremos no
módulo de aula anterior. Observe o resultado final:
No gráfico acima representamos o ato do clique no botão em questão e, em seguida na janela de abertura
de arquivos a seleção do APCASA. Clicando em Ok, você terá como resultado a janela seguinte:
Salve o projeto em questão. Na próxima aula iremos programar o botão GRAVAR ARQUIVO.
- Aula 30 - Manipulando dados em arquivos ASC II - Parte III

Nesta aula iremos programar o botão GRAVAR ARQUIVO, constante do projeto que começamos à algumas
aulas. Para isso, proceda da seguinte forma:
1. Abra o projeto GRAVA ARQUIVO;
2. Dê um clique duplo no botão GRAVA ARQUIVO e entre com a seguinte codificação para o mesmo:
CommonDialog1.Filter = "Arquivos Text (*.TXT)|*.txt"
CommonDialog1.ShowSave
If CommonDialog1.FileName <> "" Then
Open CommonDialog1.FileName For Output As #1
Print #1, Text1.Text
Close #1
End If
O primeiro passo foi estipular o tipo de arquivo a ser aberto na caixa de diálogo padrão do windows (Salvar
arquivo), que seria do tipo TXT: CommonDialog1.Filter = "Arquivos Text (*.TXT)|*.txt"
Em seguida solicitamos a exibição da janela padrão "Salvar Arquivo" do windows:
CommonDialog1.ShowSave
Em seguida testamos se o usuário entrou com um nome de arquivo, ou seja, se não deixou o campo nome
do arquivo em branco, condição não permitida pelo Windows: If CommonDialog1.FileName <> "" Then
Caso o usuário tenha digitado um nome de arquivo, o primeiro passo foi abrir o caminho #1 para a gravação
do arquivo.
Logo após salvamos o conteúdo do Text1 (Text1.Text) no caminho #1 aberto na linha anterior: Print #1,
Text1.Text
E para finalizar fechamos o arquivo que estávamos manipulando: Close #1.
Vamos agora programar o botão LIMPAR ÁREA, para isso, dê um clique duplo no botão em questão e entre
com o seguinte código:
Text1.Text = ""
End Sub
Aqui o procedimento utilizado foi muito simples, ou seja, apenas comparamos o conteúdo "" (vazio) para o
Text1.
Para o botão finalizar, basta incluir o comando END e seu editor de textos está pronto.
- Aula 32 - Trabalhando com arquivos de imagem

Neste módulo de aula, iremos iniciar nossos estudos sobre como trabalhar arquivos de imagem em
aplicações VB6. O procedimento é muito simples e, como exemplo, iremos desenvolver um projeto que entre
outras características irá oferecer ao usuário a possibilidade de selecionar o diretório do arquivo de imagem
para que o mesmo possa ser visualizado.
O componente mais comum para se trabalhar com Imagens em aplicações VB6 é o IMAGE, em destaque na
figura abaixo:
Os arquivos de imagem compatíveis com este controle são:

BMP;
ICO;
WMF;
JPG;
GIF.
O elemento gráfico a ser exibido no controle em questão estará definido na propriedade PICTURE do mesmo.
Outra propriedade fundamental para se trabalhar com este componente é a STRETCH, podendo armazenar
apenas True ou False. Caso esta propriedade esteja setada para TRUE a figura a ser exibida será
redimensionada de acordo com o tamanho do controle definido pelo desenvolvedor, caso contrário a mesma
será cortada para que possa se adequadar ao espaço disponibilizado.
Vamos desenvolver um projeto de exemplo para melhor compreensão dos tópicos estudados até este ponto:
Inicie um novo projeto no VB6;
Inclua no Form os seguintes componentes:
I. DriveListBox;
II. DirListBox;
III. FileListBox;
IV. Image;
V. 2 CommandButtons;
VI. ListBox.
O seu formulário deverá estar com o seguinte aspecto:
A lógica deste projeto é simples: Os arquivos selecionados através de uma determinada unidade de disco
(selecionada pelo componente DriveListBox) e uma determinada pasta deste (selecionada pelo componente
DirListBox), serão exibidos no componente ListBox1 e, ao clicar no primeiro buttom, o referido arquivo será
exibido no controle IMAGE constante da parte superior do formulário em questão.
Altere a propriedade CAPTION do primeiro CommandButton para "Abrir" e a do segundo para "Sair".
Vamos começar a codificar nosso sistema, começando pelo GENERAL DECLARATION do projeto. Neste
declare uma variável chamada CONTADOR do tipo integer, conforme mostra a listagem a seguir:
Public contador As Integer
Esta variável irá na verdade indexar os itens selecionados na caixa LIST BOX para futuras manipulações.
Adiante você irá entender o objetivo desta variável. Em seguida, vamos codificar o evento Form Load do
projeto, onde iremos definir o tipo de arquivo que será aceito pelo sistema, aqui iremos definir arquivos JPG
e GIF. Observe o código completo abaixo:

contador = 0
File1.Pattern = "*.gif;*.jpg"
End Sub
O próximo passo é codificar o controle DriveListBox. O objetivo do mesmo será o de possibilitar ao usuário a
seleção de uma das unidades de disco disponíveis no equipamento. Para isso, no evento CHANGE do controle
em questão, entre com a seguinte codificação:
Private Sub Drive1_Change()

ChDrive Drive1.Drive
Dir1.Path = Drive1.Drive
End Sub
O primeiro passo é utilizar o comando CHDRIVE que possibilita alterar o drive corrente para um novo,
selecionado pelo usuário através de cliques. Esta nova unidade selecionada fica armazenada na propriedade
Drive1.Drive. Em seguida, indicamos ao controle DirListBox (DIR1) o no path (caminho), que foi aquele
selecionado no controle anterior, onde recuperamos a informação pela propriedade Drive1.Drive.
Agora, temos que codificar o controle DirListBox, para que o mesmo possibilite ao usuário alterar a pasta da
unidade selecionada no procedimento anterior. No evento change do controle em questão, entre com a
Private Sub Dir1_Change()
ChDir Dir1.Path
File1.Path = Dir1.Path
End Sub
A lógica aqui empregada é a mesma do componente DriveListBox, sendo que o primeiro trata da unidade
selecionada e o segundo da pasta selecionada.
Salve o projeto e, na próxima aula iremos continuar a codificação do nosso projeto.

Agora vamos codificar o controle FileListBox, que terá a função de exibir os arquivos gráficos da pasta
especificada no controle DirListBox e exibir o respectivo gráfico no controle Image. Os comandos deste
controle são vistos abaixo:
Private Sub File1_Click()

If Right$(Dir1.Path, 1) = "\" Then
arquivo = Dir1.Path + File1.FileName
Else
arquivo = Dir1.Path + "\" + File1.FileName
End If
Image1.Picture = LoadPicture(arquivo)
List1.AddItem arquivo
End Sub
Nas primeiras linhas de comando, estamos testando a principio se o último caracter do caminho selecionado
no controle Dir1 é uma barra, se positivo, poderemos armazenar na variável arquivo o nome da
pasta/caminho e em seguida o nome do arquivo a ser exibido, caso contrário, iremos montar a símbolo de
barra entre o nome da pasta/caminho e o nome do arquivo. Se não existir um caminho completo incluindo a
sintaxe, não teremos como abrir a figura no controle image. A sintaxe é:
unidade:\caminho\nome_arquivo_gráfico
Após ter este caminho somado ao nome do arquivo selecionado no controle FileListBox, iremos carregar o
mesmo no controle Image, conforme a linha Image1.Picture = LoadPicture(arquivo). Em seguida, vamos
adicionar o arquivo selecionado ao controle ListBox, para que este arquivo possa ser recuperado
posteriormente, mesmo que o usuário tenha navegado para outra pasta, tal procedimento se deu com a
linha List1.AddItem arquivo.
Vale a pena lembrar que é interessante que a propriedade Strech do componente Image seja alterada para
True, assim sendo, a figura selecionada terá seu tamanho ajustado para o componente Image do Form.
Agora execute o seu sistema e selecione alguns arquivos de imagem que estejam armazenados nas pastas
do seu disco rígido. Veja um exemplo abaixo, da seleção de um determinado arquivo do disco rígido, com o
programa em execução:
Na próxima aula iremos ver a forma correta de abrir um dos arquivos que foram carregados no controle
ListBox.

Vamos nesta aula codificar o botão ABRIR, para isso, dê um clique duplo no botão em questão e entre com a
arquivo = List1.List(List1.ListIndex)
End Sub
O primeiro passo foi armazenar na variável ARQUIVO o item selecionado no componente ListBox e em
seguida carrega-lo para o controle IMAGE, através do LOADPICTURE.
Basta agora codificar o botão SAIR, entrando com a seguinte codificação para o mesmo:
End
End Sub
Nosso projeto para a visualização de gráficos em um sistema em VB está concluído.
- Aula 34 - Imprimindo o seu código fonte

As vezes se torna necessário a visualização de trechos de código, em determinados Forms para que o
projeto possa ser continuado. Você poderia ler este código diretamente do seu monitor de vídeo, estando
com o projeto aberto, porém vamos imaginar que você está trabalhando em conjunto com mais 5
programadores ... já pensou todos eles "pendurados" sobre o micro para observar o código. Ou ainda se
você precisar comparar o código de 2 forms?
A melhor solução para o controle geral da fonte do sistema é sem dúvida nenhuma, desde a geração DOS, a
impressão do código fonte e, no VB, este procedimento é bem simples, apesar de poucos o conhecer. Nada
melhor do que a prática para explicar tais procedimentos:
1. Abra um projeto qualquer em VB;
2. Clique na opção de menu FILE ... PRINT, será então apresentada a seguinte janela:
Observe que a janela apresentada, apresenta diversas opções para que você possa especificar com o
conteúdo deseja imprimir. Vamos então explicar as diversas opções existentes:
O frame "Range" determina qual parte do projeto será impresso, e este possui as seguintes opções:
SELECTION -> Caso você tenha uma área de texto selecionada na janela CODE, apenas esta área
selecionada será impressa. Quando esta opção não está disponível, indica que não existe nenhum
trecho de código selecionado.
CURRENT MODULE -> Neste caso você irá imprimir o conteúdo especificado no frame "PRINT
WHAT" referente ao formulário que está com o foco neste momento. Iremos explicar o conteúdo do
frame PRINT WHAT logo abaixo.
CURRENT PROJECT -> Ao selecionar esta opção e combinado com a seleção do frame "PRINT
WHAT", será impresso o conteúdo de todos os módulos que compõe o seu projeto.
Já o frame "Print What" define o que será impresso dentro da opção selecionada no frame "RANGE" e, possui
as seguintes opções:
FORM IMAGE -> quando selecionada, irá imprimir a imagem do FORM, representando a aparência
do mesmo em tempo de execução. No caso da impressão da imagem de todos os forms do projeto
(opção current project do frame estudado acima), será impresso um FORM por página.
CODE -> Ao selecionar esta opção será impresso todos os procedimentos de evento de um
formulário, com seus respectivos controle (ou de todos os formulários do projeto). No caso da
impressão do código de todos os Forms, será saltada automaticamente a folha quando o código
representar o inicio de um novo form.
FORM AS TEXT -> Esta opção realiza a impressão de uma listagem das propriedades de seu form e
seus respectivos controles.
Após configurar a impressão de acordo com a sua necessidade, basta então selecionar a impressora para
onde a impressão deverá ser encaminhada e clicar no botão OK.
- Aula 36 - Verificando o hardware com o VB6 - Parte I

Para verificar determinados itens de hardware do computador através do VB6, é necessário que você
trabalhe com a API do Windows. O primeiro passo é entender o que significa a API:
Application Programming Interface
A API na verdade é um conjunto de bibliotecas e arquivos executáveis, que servem para a manipulação dos
recursos do Windows.. São diversas as APIs do Windows, como exemplo, iremos a principio utilizar duas
APIs, que tem a função de oferecer informações sobre a CPU do equipamento e uma outra que tem a função
de exibir informações gerais sobre o disco do equipamento. Estas duas APIs respectivamente são:
GetSystemInfo;
GetDiskFreeSpace.
Vamos então gerar o nosso sistema de exemplo, seguindo os passos abaixo:
1. Execute o VB;
2. Na nova aplicação que é disponibilizada, altere a propriedade CAPTION do formulário para
WINDOWS API;
3. Inclua na parte superior do FORM um componente Buttom e, altere a sua propriedade CAPTION
para MODELO CPU;
4. Ao lado deste Buttom, inclua um componente TextBox e apague o conteúdo da propriedade Text;
5. Abaixo do primeiro Buttom, inclua um novo Buttom e altere a sua propriedade CAPTION para
ESPAÇO LIVRE EM DISCO;
6. Ao lado deste Buttom, inclua um novo componente TextBox e apague o conteúdo da propriedade
Text;
7. Abaixo dos dois buttons, porém na estrema direita do formulário, inclua um novo Buttom, alterando
a sua propriedade CAPTION para FIM;
8. Seu formulário terá o seguinte aspecto:
9. Vamos agora codificar o botão FIM do formulário, que deverá ter a seguinte codificação:
End
End Sub
10. Vamos primeiramente estudar a função GetSystemInfo, que tem o objetivo de retornar informações
gerais sobre o hardware da máquina, entre as quais podemos destacar:
Tipo de processador;
Número de processadores no sistema;
Nível de dependência do processador.
11. A sintaxe para a utilização desta função é a que segue:
Void GetSystemInfo(LPSYSTEM_INFO);
12. Lpsysteminfo é na verdade um parâmetro que determina o tipo de informação sobre o sistema que
deverá ser retornado.
13. Para utilizar as funções da API do Windows em um aplicativo VB6, será necessário declarar estas em um
arquivo de módulo, que será o objeto de estudo do próximo módulo de aula.
- Aula 36 - Verificando o hardware com o VB6 - Parte II

14. Conforme estudamos no módulo de aula anterior, deveremos declarar as funções que irão manipular as
APIs do Windows em um arquivo de módulo. A sintaxe para este procedimento é citada abaixo:
Declare Sub/Function Nome_função lib "bliblioteca" (lista de parâmetros) As Tipo_retorno
15. Vale lembrar que em funções na qual são utilizados parâmetros do tipo String, tem de possuir em seu
alias o nome da função concatenado de um caracter "A".
16. Após conhecer estas regras, poderemos utilizar o API Text, utilitário do próprio VB6 que auxilia o
desenvolvedor na declaração da API que será utilizada. Para executar este aplicativo, você deverá proceder
da seguinte forma:
17. Clique na opção de menu ADD-INS e no menu suspenso que é apresentado, selecione a opção ADD-IN
MANAGER, será apresentada a seguinte janela:
18. Clique sobre a opção VB 6 API VIEWER. Marque também as opções LOADED/UNLOADED e LOAD ON
STARTUP do frame LOAD BEHAVITOR, para que este aplicativo seja carregado no menu ADD-INS
automaticamente;
19. Clique agora no botão OK;
20. Agora clique na opção de menu ADD-INS ... API VIEWER, será então apresentada a seguinte janela:
21. Clique na opção de menu FILE ... LOAD TEXT FILE, para carregarmos o arquivo de texto contendo as
APIs do mesmo, será então apresentada a seguinte janela:
22. Clique na opção WIN32API e em seguida clique no botão ABRIR, será apresentada a seguinte janela:
23. Observe que as APIs disponíveis são listadas na caixa de listagem AVAILABLE ITEMS;
24. Agora você deverá selecionar as funções que serão utilizadas pelo sistema. Vamos selecionar a primeira,
procurando na caixa de listagem em questão a opção GETSYSTEMINFO, marcando-a e em seguida clicando
sobre o botão ADD, veja como ficou a janela do seu aplicativo:
25. Repita a operação para a API GETDISKSPACEFREE, após concluido este procedimento, sua janela terá o
seguinte aspecto:
26. Ao final deste procedimento, clique sobre o botão COPY, assim as declarações serão copiadas para a
área de transferência.
Aula 38 - Verificando o hardware com o VB6 - Parte III

27. Retornando a nossa aplicação vamos criar o arquivo de módulos, para isso clique na opção de menu
PROJECT e em seguida, selecione a opção ADD MODULE, sua área de trabalho passará a ter a seguinte
aparência:
28. No código do módulo, insira a declaração de nossas APIs, colando o conteúdo da API Viewer;
29. Salve as alterações realizadas até o momento;

30. Vamos agora codificar o botão "Modelo CPU". Dê um duplo clique no mesmo e entre com a seguinte
codificação:
Dim minhacpu As SYSTEM_INFO
GetSystemInfo minhacpu
Text1.Text = CStr(minhacpu.dwprocessortype)
End Sub
31. Entre com a seguinte codificação para o botão "ESPAÇO LIVRE EM DISCO":

Dim NUMSETS As Long
Dim NUMBYTES As Long
Dim NUMCLUST As Long
Dim TOTALCLUST As Long
Dim ESPACOLIVRE As Single
ESPACOLIVRE = NUMCLUST * NUMSETS * NUMBYTES
Text2.Text = Format(ESPACOLIVRE, "#,###,###,###,##0 BYTES")
End Sub
Salve todas as alterações. Está finalizado o nosso sistema.
Aula 39 - Gerando Arquivos de Help para Aplicações VB

Neste módulo de aula, iremos começar a explicar os passos que você deverá seguir para a criação de
arquivos de HELP. Iremos abordar a forma de criar arquivos de ajuda On-Line para seus aplicativos.
O processo é relativamente simples, porém requer uma série de regras e técnicas para que seu Help seja
simples e funcional.
No mercado existem diversos aplicativos que são utilizados para a criação e incorporação de arquivos de
ajuda ao aplicativo VB, porém iremos trabalhar com as ferramentas oferecidas pelo próprio VB.
Para Criar o seu HELP, deverá ter instalado em seu micro os seguintes softwares:
· Um processador de textos que salve arquivos no formato RTF (Rich Text Format) e tenha recursos de
trabalho com cabeçalhos e rodapés;
· Compilador de ajuda que gere arquivos HLP. No caso do VB, existe um aplicativo que acompanha o
pacote, o HCW. Este software deverá estar na mesma página do menu iniciar que contém o VB. Observe
na figura a seguir a janela do Microsoft Help WorkShop em execução:
Nada melhor do que a prática para que possamos entender a forma correta de se criar arquivos de ajuda ....
Para se construir um arquivo de ajuda, você deverá passar pela criação de três arquivos distintos e que irão
trabalhar em conjunto. São eles:
· Arquivo de conteúdo – arquivo no formato ASC II, que irá definir o layout e a aparência da guia
CONTENTS do arquivo de ajuda;
· Arquivo de tópico – neste será incluso o texto relativo a ajuda em si que será oferecida no Help;
· Arquivo de projeto – Cria a ligação entre os arquivos de conteúdo e tópico, além de definir a posição
do arquivo de ajuda ao ser executado.
Vamos iniciar então a criação do nosso arquivo de ajuda criando o nosso arquivo de conteúdo. Para isso,
execute o Microsoft Help Workshop e proceda da seguinte forma:
01) Clique na opção de menu FILE;
02) No menu suspenso que é aberto, selecione a opção NEW, será então exibida a seguinte janela:
03) Na caixa de diálogo NEW, selecione a opção HELP CONTENTS e clique em OK. Será então apresentada a
seguinte janela:
04) Primeiramente deveremos definir o nome do arquivo de ajuda, e o mesmo deverá ser digitado na caixa
de edição denominada “DEFAULT FILENAME (AND WINDOW). Neste exemplo, digite MINHAAJUDA.HLP;
05) Ao lado, temos a caixa de edição DEFAULT TITLE, que representa o título principal do seu arquivo ao ser
exibido. Neste caso, digite HELP DO SISTEMA;
06) O próximo passo é a inserção de um título à lista, para isso, clique no botão ADD ABOVE, será então
exibida a seguinte janela:
07) Nas caixas de seleção, deixe marcada a opção HEADING;

08) Observe que os campos TOPIC ID / HELP FILE / WINDOW TYPE não estarão mais ativo;
09) No campo TITLE, digite ARQUIVO DE AJUDA, que será nosso título;
10) Clique no botão OK. Observe como ficou a sua janela neste ponto:
Aula 40 - Gerando Arquivos de Help para Aplicações VB - Parte II

11) Clique agora sobre o botão ADD BELOW para que possamos incluir um novo título, subordinado ao
primeiro. Será aberta a mesma janela do processo anterior, selecione então a opção HEADING e no campo
TITLE, digite “ARQUIVO DE CONTEÚDO”. Confirme a operação clicando em OK. Sua janela neste ponto
estará parecida com a que segue:
12) Agora temos que tornar este novo título que foi inserido como um sub item da opção de menu principal,
que é chamada de ARQUIVO DE AJUDA. Para isso, selecione a opção ARQUIVO DE CONTEÚDO, dando um
clique sobre o mesmo e clicando em seguida no botão MOVE RIGHT. Observe como ficou a sua janela neste
ponto:
13) Vamos então acrescentar os tópicos do arquivo de conteúdo. Clique novamente em ADD BELOW, porém
desta vez, na janela EDITS CONTENTS TAB ENTRY, selecione a opção TOPIC, e configure a mesma conforme
mostra a figura a seguir:
14) Confirme a operação e clique em OK;

15) Adicione mais dois tópicos ao exemplo acima, configurando os mesmos conforme mostra a sequência
gráfica a seguir:
16) Neste ponto, sua janela terá o seguinte aspecto:
17) Agora salve o seu arquivo como MINHAAJUDA.CNT;

18) Você acaba de criar o seu primeiro arquivo de conteúdo.
19) Nosso próximo passo agora é a criação do arquivo de tópicos, que é um arquivo do tipo RTF contendo o
texto e imagens, que serão apresentados quando o arquivo de ajuda é executado. Iremos utilizar o Word,
que gera arquivos do tipo RTF para este fim. Este tópico será abordado no próximo módulo de aula.

20) Execute o Word e crie um novo documento;
21) Altere o modo de exibição para a forma de TÓPICOS;
22) Digite o primeiro tópico : CRIANDO O ARQUIVO DE AUTO CONTEÚDO;
23) Na linha seguinte, digite o texto que será apresentado neste tópico, aqui para simplificar, digitamos: “O
arquivo de conteúdo e criado em formato ASC II”;
24) Devemos agora adicionar uma nota de rodapé, que deverá estar no inicio do tópico, para tal, coloque o
cursor antes da frase CRIANDO O ARQUIVO.....;
25) Clique na opção de menu INSERIR;
26) No menu suspenso que é aberto, selecione a opção NOTAS;
27) Na janela que foi aberta, na seção numeração, marque “Personalizada” e digite na caixa de edição o
sinal de #. Clique em OK;
28) Na área do texto de rodapé, você deverá digitar o ID de tópico respectivo ao texto que está sendo
digitado, neste caso “IDH_CONTEÚDO”;
29) Vamos adicionar agora um título ao tópico, que será o texto exibido quando pesquisamos no arquivo de
ajuda, para isso, proceda da seguinte forma:
30) Posicione o cursor entre o sinal de # e o título que consta na linha;
32) No menu suspenso que é aberto, selecione a opção NOTAS;
33) Na janela que foi aberta, selecione a opção PERSONALIZADA do item NUMERAÇÃO, e na caixa de edição
digite o sinal de $;
34) Clique em OK;
35) Insira o texto da nota de rodapé “O que e arquivo de conteúdo?”, que será o título deste tópico;
36) Vamos agora inserir o sequência da procura do auto-ajuda. Para isso, coloque o cursor entre o sinal de $
e o texto do título;
38) No menu suspenso que foi aberto, selecione a opção NOTAS;
39) Na janela que foi aberta, selecione a opção PERSONALIZADA do item NUMERAÇÃO, e na caixa de
edição, digite o sinal de “+”. Clique em OK;
40) Digite “auto” como texto da nota de rodapé para que o Windows Help crie uma seqüência de
autoprocura em seu arquivo de ajuda. Neste ponto, sua janela deverá ter o seguinte aspecto:
41) O processo para os demais dois tópicos de nosso arquivo de ajuda serão os mesmos. Devido a isso,
iremos apresentar apenas o resultado gráfico dos demais tópicos, que você deverá realizar seguindo os
passos anteriores;
42) Vale lembrar que de um tópico ao outro, deverão ser inclusas quebras de página;
43) Salve o arquivo como MinhaAjuda.RTF

44) O próximo passo é vincular o arquivo de conteúdo e o arquivo de tópicos, para isso temos criar o arquivo
de projeto de ajuda.

45. Clique na opção de menu FILE ... NEW, porém desta vez selecione o arquivo HELP PROJECT, e clique em
OK;
46. Será solicitado um nome para o arquivo de projeto, digite MINHAAJUDA, e clique em OK. Será então
apresentada a seguinte janela:
47. Clique no botão OPTIONS, será exibida então a seguinte janela:
48. Na guia GENERAL, na caixa de edição HELP TITLE, digite o conteúdo ARQUIVO DE AJUDA;
49. Selecione agora a guia COMPRESSION;
50. Selecione a opção CUSTOM e marque a caixa de seleção HALL COMPRESSION, para que nosso arquivo
ajuda não ocupe muito espaço;
51. Selecione a guia FILES;
52. Na caixa de edição HELP FILE, digite o nome do arquivo HLP criado, ou seja, MINHAAJUDA;
53. Clique no botão CHANGE;
54. Será apresentada uma janela denominada “TOPIC FILES”;
55. Na mesma, clique no botão ADD;
56. Selecione o arquivo MINHAAJUDA.RTF, para adicionar o arquivo de tópico ao projeto do arquivo de
ajuda;
57. Clique agora no botão BROWSE;
58. Na janela que é aberta, selecione o arquivo Minhaajuda.cnt;
59. Desta forma você estará vinculando os dois arquivos;
60. Observe como deverá estar a sua janela neste ponto:
61. Clique no botão OK;

62. Observe que o controle do sistema retornou ao programa Microsoft Help Workshop, agora, clique no
botão WINDOWS. Será então aberta a seguinte janela:
63. Neste ponto iremos criar a janela do HELP, que será objeto de estudo do próximo módulo de aula.

64. Clique na caixa de edição CREATE A WINDOWS NAMED e dê o nome de FONTE, neste ponto será exibida
a seguinte janela:
65. Selecione a guia BUTTONS;

66. Marque a caixa de verificação BROWSE, para que sejam incluídos os botões de pesquisa à sua janela de
HELP;
67. Clique em OK;
68. Clique agora no botão MAP. Será aberta a seguinte janela:
69. Agora, para cada um dos tópicos, deveremos ligar ao respectivo mapa do arquivo RTF. Para isso,
proceda da seguinte forma;
70. Clique no botão ADD;
71. Após o final deste processo, sua janela terá o seguinte aspecto:
72. Agora você deverá salvar e compilar o seu arquivo de ajuda, para isso, dê um clique no botão SAVE e
em seguida no botão COMPILE, que estão marcados na figura a seguir:
73. Durante a compilação, a janela do aplicativo em questão ficará minimizada. Se não existirem erros, sua
janela terá ao final o aspecto seguinte:
74. Vamos agora testar nosso aplicativo de ajuda, antes de inserir o mesmo em nossa aplicação, para
evitarmos qualquer tipo de problema;
75. Para isso, ainda com o Microsoft Help Workshop aberto, clique sobre o botão RUN WINHELP,
representado ponto de interrogação na barra de ferramentas. Neste ponto, será apresentada a janela
seguinte;
76. Verifique se nossa arquivo minhaajuda está selecionado em Project File, caso não esteja, procure o
mesmo clicando no menu Browse...;
77. Após isso, clique no botão VIEW HELP;
78. Teste o arquivo de ajuda, expandido as suas pastas, clicando sobre um dos tópicos, etc...
Pronto, você acabou de criar um arquivo de ajuda. Na próxima aula iremos estudar como vincular um
arquivo de ajuda ao seu programa VB.
Aula 44 - Gerando Arquivos de Help para Aplicações VB - Parte VI

Na verdade, linkar o arquivo de ajuda é muito mais fácil do que propriamente criar o mesmo. Podemos
utilizar o arquivo gerado de duas formas:
1. Chamando o arquivo por inteiro, e neste caso o usuário irá navegar dentro das opções disponíveis;
2. Chamando por um dos níveis de tópicos criados, desta forma, você estaria linkando o Help a um
assunto em específico, por intermédio por exemplo de um menu.
Iremos primeiramente estudar a opção 01. O processo para se linkar um HELP a sua aplicação, sendo que
esta ligação seja feita com o total conteúdo do HELP é simples, observe os passos a seguir:
1. acesse o menu Project, escolha o item Project Properties...;
na janela que aparece, na aba General, selecione no campo Help File Name o arquivo Help que você deseja
utilizar no projeto. Observe que o VB suporta arquivos de help tanto no formato HLP quanto no formato
CHM:
2. Para visualizarmos como um projeto chama o help, compile o projeto e quando ele estiver sendo
executado, clique em F1 para que o help seja visualizado
Agora, vamos dificultar um pouco o processo, fazendo com que o sistema possa abrir os arquivos de HELP
através dos tópicos gerados. Mas como isso é possível? A resposta é simples:
Você lembra que ao criar a sua janela de HELP, utilizou o mapeamento dos tópicos através da janela MAP?
Onde, incluímos para o tópico CONTEÚDO o MAP 100 e assim sucessivamente? Pois então, desta forma
podemos dentro de nossa aplicação, chamar um assunto em específico no HELP, para isso, basta proceder
da forma que segue:
1. Inclua na aplicação que irá receber o HELP um componente COMMON DIALOG;
2. Altere a propriedade NAME do mesmo para AJUDA;
3. Clique com o botão direito do mouse em PROJECT1, no PROJECT EXPLORER;
4. No menu suspenso que é apresentado, selecione a opção PROJECT PROPERTIES;
5. Na caixa de diálogo que foi aberta, defina o campo HELP FILE como o arquivo de ajuda a ser vinculado
ao aplicativo;
6. No evento FORM_LOAD() do formulário, entre com a seguinte codificação:
AJUDA.HELPFILE=APP.HELPFILE
7. Lembre-se de que “AJUDA” equivale ao componente COMMON DIALOG que representará o arquivo
ajuda;
8. Em seguida, na opção de menu ou no botão que irá chamar um determinado tópico do arquivo de
ajuda, basta incluir a seguinte sequência de comandos (supondo que a solicitação da abertura da ajuda,
partisse de uma opção de menu) :
Private Sub opcaoajuda_click()
With ajuda
.helpcontext=”100”
.helpcommand=cdlhelpcontext
.ShowHelp
End With
End Sub
Observe que a linha HELPCONTEXT=”100”, representa um dos tópicos que queremos ligar a esta opção do
menu que abre o arquivo de ajuda, neste nosso exemplo, a mesma poderia ser 100/200 ou 300.
Desta forma você vinculou o seu arquivo de ajuda a sua aplicação principal.
Aula 45 - Utilizando Caixas de Diálogo - Parte I

Uma caixa de diálogo na verdade é um recurso nativo do próprio Windows e seu principal objetivo é de
transmitir informações ao usuário do sistema. Quando você realiza um determinado procedimento e recebe
uma notificação do sistema conforme a que podemos observar no gráfico abaixo, estamos na verdade
visualizando uma caixa de diálogo:
Observe que no exemplo acima, temos uma caixa de diálogo de advertência/aviso, ou seja, especificando ao
usuário que para a operação a ser executada é necessário que tenhamos um disco na unidade -A-.
O Visual Basic oferece em sua coleção duas caixa de diálogo distintas:
A caixa de mensagem;
A caixa de entrada.
Para informar ao usuário uma determinada situação, utilizamos as caixas de mensagens representadas pela
instrução MSGBOX. Se necessário for permitir que o usuário além de receber uma determinado informação
também efetue a entrada de dados pelo teclado, utilizamos as caixas de mensagem representadas pela
instrução INPUTBOX.
A sintaxe básica da instrução MSGBOX pode ser observada abaixo:
MSGBOX (texto, ícone, título)
Onde:
Texto -> Representa a mensagem que será exibida ao usuário;
ícone -> Representa o ícone e o botão que serão apresentados no interior da caixa de mensagem;
Title -> representa o texto que será apresentado na barra de títulos da caixa de diálogo.
O parâmetro "ícone" é representado por uma expressão ou código, de acordo com a tabela abaixo:
Expressão Código Representa
vbOkOnly 0 Exibe apenas o botão de OK.
vbOkCancel 1 Exibe os botões de Ok e Cancel.
vbAbortRetryIgnore 2 Exibe os botões de Abortar, Ignorar e Falhar.
vbYesNoCancel 3 Exibe os botões de Sim, Não e Cancelar.
vbYesNo 4 Exibe os botões de Sim e Não.
vbRetryCancel 5 Exibe os botões de Ignorar e Cancelar
vbCritical 16 Exibe o ícone de mensagem crítica
vbQuestion 32 Exibe o ícone de Warning Query
vbExclamation 48 Exibe o ícone de Exclamação
vbInformation 64 Exibe o ícone de Informação
Aula 46 - Utilizando Caixas de Diálogo - Parte II

Vamos neste módulo de aula criar o nosso primeiro exemplo com o uso de caixas de diálogo. Siga os passos
abaixo:
Inicie uma nova aplicação no VB6;
No form que é disponibilizado inclua um CommandButton;
Altere a propriedade "CAPTION" do mesmo para "CLIQUE AQUI";
Dê um clique duplo no controle em questão e entre com a seguinte codificação:
texto = MsgBox("Isto é uma caixa de diálogo", vbOKOnly, "PAC")
End Sub
Execute o seu projeto, ao clicar sobre o botão que inserimos teremos o seguinte resultado:
Observe que o primeiro passo foi definir a frase que seria utilizada dentro da caixa de diálogo, em seguida
especificamos o botão que seria empregado dentro da mesma e como parâmetro final o título da caixa de
diálogo gerada.
Aula 47 Utilizando caixas de diálogo - Parte III
Além da caixa de diálogo padrão que estudamos nos módulos de aula anteriores, o VB6 oferece também caixas de
diálogo que permitem a entrada de dados por parte do usuário. Neste caso ao invés de empregarmos a função
MSGBOX iremos empregar a função INPUTBOX. A sintaxe básica desta função pode ser observada abaixo:
INPUTBOX ("texto do interior da caixa","Título da janela")
Vamos gerar um simples exemplo para entendermos melhor a função em estudo:
Gere um novo aplicativo no VB6;

Insira no Form um componente do tipo <COMMAND BUTTON>;
Altere a propriedade <CAPTION> do mesmo para <CLIQUE AQUI PARA INSERIR SEU NOME>;
Neste ponto seu formulário terá um aspecto parecido com o que segue:
Dê um clique duplo sobre o botão do formulário e entre com a seguinte codificação:

Dim nome As String
nome = InputBox("Entre com o seu nome", "Dados do usuário")
Form1.Caption = nome
End Sub
Execute o seu sistema e observe o resultado:
Após entrar com o nome do usuário e clicar sobre o botão <OK>, o formulário principal de sua aplicação
terá o seguinte aspecto:
O código gerado para o evento On_Click do botão é simples de ser compreendido:

o Primeiro criamos uma variável do tipo String chamada <NOME>;
o Em seguida lançamos para esta variável o conteúdo que seria digitado pelo usuário na caixa de
diálogo de entrada de dados;
o O próximo passo foi alterar a propriedade CAPTION do FORM1 para o conteúdo da variável
<NOME>.
Observe que os dados recolhidos com as caixas de diálogo do tipo "entrada de dados" podem ser
trabalhados no decorrer da rotina.
Aula 48 Trabalhando com eventos do mouse - Parte I
Até o momento você deve ter observado que os controles (como por exemplo os botões) possuem eventos que são
disparados por ações provocadas pelo mouse, como por exemplo o evento Click. A partir deste módulo de aula
iremos estudar os principais eventos que poderão ser disparados em um controle através de ação provocada pelo
mouse.
O evento click()
Este evento é disparado quando um determinado controle recebe um clique. Este evento está associado
principalmente aos botões de comando. Ou seja, neste evento você deeverá programar o que deverá ser executado
pelo sistema. Sempre que for necessário programar este evento, você poderá proceder da seguinte maneira:
1) Selecione o controle que deverá ter o evento Click programado;
2) Dê um clique duplo sobre o mesmo para abrir a janela de código;
3) Observe se está selecionada na janela de código o controle desejado e o evento Click para ser programado,
conforme podemos observar no gráfico abaixo:
Clique agora sobre a caixa de seleção que representa os eventos (a que está a sua direita superior) da janela de
código. Observe que diversos outros eventos estão disponíveis:
Vamos abaixo citar o objetivo dos principais eventos disponíveis relacionados ao mouse:
BdlClick()
Este evento é disparado quando um determinado controle recebe um clique duplo. Observe que o controle
Command Button não possui este evento, porém o mesmo é encontrado no controle <ComboBox>. De acordo com
o controle utilizado um deeterminado evento aqui citado poderá ou não estar disponível.
DragDrop()
Este evento é disparado quando você solta em qualquer lugar do formulário um determinado controle que estava
sendo arrastado. Você poderá utilizar este evento para programar uma ação que ocorrerá quando o usuário
dimensionar uma imagem gráfica por exemplo.
DragOver()
Este evento é disparado quando o usuário arrasta um objeto qualquer sobre um determinado controle.
MouseDown()
Este evento é disparado quando você clica sobre um determinado controle e mantém o botão do clique pressionado.
MouseMove()
Este evento é disparado quando um ocorre a movimentação do ponteiro do mouse (sem cliques) sobre um
determinado controle.
MouseUp()
Este evento é disparado quando um contrrole qualquer recebe um clique e o usuário solta o botão do mouse, ou
seja, seria algo como um pós-clique.
No próximo módulo de aula iremos especificar a sintaxe destes eventos e gerar alguns exemplos.
Aula 49 trabalhando com eventos do mouse - Parte II
Insira em seu formulário um botão de comando e dê um clique duplo sobre o mesmo. Observe como ficará a sua
janela de código:
Observe que na parte superior da janela de código temos o nome do controle e o evento Click a ser programado. Na
verdade quem dispara o evento é o mouse e não o controle Button. Observe a sintaxe deste evento:
nome do controle_click()
Muitos atribuem ao botão o evento, o que é um erro, pois agora sabemos que ele apenas recebe a ação provocada
pelo mouse.
Alguns controles recebem também o evento DBLCLICK() ou seja, apenas será disparado se o usuário clicar duas
vezes com um pequeno intervalo de tempo entre o primeiro clique e o segundo sobre o controle em questão. O
controle Button por exemplo não oferece suporte a este evento. Já o controle LISTBOX oferece suporte ao mesmo,
como por exemplo selecionar um determinado item de sua lista através do clique duplo. Observe na janela de
código abaixo o controle LISTBOX e o evento disparado pelo mouse DBLCLICK():
A propriedade que armazena o item a ser selecionado através de um duplo clique em uma caixa de listagem é a
TEXT. Observe abaixo como ficaria a rotina principal de seu sistema para uma escolha através de um clique duplo
sobre um item da lista:
No próximo módulo de aula iremos estudar sobre o evento DragDrop().
Aula 50 trabalhando com eventos do mouse - Parte III
Quando você clica e arrasta um objeto, em determinado momento irá soltar este objeto, ou seja, soltará o mesmo
em um determinado ponto do formulário. Este evento pode ser tratado através de um programa em VB6, para isso
deverá programar o evento DragDrop().
A sintaxe do evento em questão pode ser observada abaixo:
Private Sub Command1_DragDrop(Source As Control, X As Single, Y As Single)
Observe que na sintaxe acima estamos tratando o evento "DragDrop" no componente Command1. A sua xintaxe é
formada por 3 parâmetros, a saber:
Source -> armazena o nome do controle solto no controle atual;

X e Y -> armazenam as coordenadas (horizontal e vertical respectivamente) do ponteiro do mouse quando
o evento é gerado.
No próximo módulo de aula iremos estudar sobre o evento DargOver().
Aula 51 trabalhando com eventos do mouse - Parte IV
Conforme citamos, vamos estudar neste módulo de aula o evento DragOver() do mouse, que é disparado quando o
usuário arrasta um determinado objeto sobre um controle qualquer. Este evento possui a seguinte sintaxe:
Provate Sub target_DragOver(Source As Control, X as Single, Y as Single, State as Integer.
Sendo que:
O parâmetro Source tem o objetivo de especificar o nome do controle que está sendo arrastado sobre o objeto alvo.
Os parâmetros "x" e "y" representam as coordenadas de linha e coluna por onde o ponteiro do mouse está sendo
arrastado sobre o objeto alvo;
O parâmetro State é representado por um número inteiro e representa o estado do controle propriamente dito,
conforme podemos observar abaixo:
Quando possui valor "0" indica que o controle está entrando nos limites do alvo;
Quando possui valor "1" indica que o controle está saindo dos limites do alvo;
Quanto possui valor "2" indica que o controle está sendo arrastado dentro dos limites do alvo.
No próximo módulo de aula iremos estudar com detalhes o evento MouseDown().
Aula 52 Trabalhando com eventos do mouse - Parte V
O evento MouseDown() é disparado quando você clica sobre um determinado componente e mantém o botão do
mouse pressionado por um determinado tempo. A sintaxe deste evento pode ser observada abaixo:
Private Sub target_MouseDown(Button as Integer, Shift as Integer, X as Single, Y as Single)
Na sintaxe acima, temos os parâmetros "x" e "y", que representam as coordenadas do ponteiro do mouse sobre um
determinado componente.
Outro parâmetro existente é representado pelo Button e, este poderá assumir três valores distintos, a saber:
Valor do parâmetro Descrição

1 Botão esquerdo do Mouse
2 botão direito do Mouse
4 botão do meio do Mouse
Este parâmetro é utilizado para que o desenvolvedor tenha o controle sobre qual botão do mouse foi pressionado.
Já os parâmetros Shift é representado por um valor inteiro que indica a tecla que foi pressionada enquanto o botão
do mouse era mantido pressionado. Os valores são:
1 -> representa a tecla <SHIFT>;

2 -> Representa a tecla <CTRL>;
4-> Representa a tecla <ALT>.
Aula 53 Trabalhando com eventos do mouse - Parte VI
Ao movimentar o ponteiro do mouse sobre um determinado controle, é disparado o evento MouseMove(). Os

desenvolvedores empregam este evento para alterar o estado do controle que está com o ponteiro do mouse sobre
o mesmo. Este evento opera com a seguinte sintaxe:
Private Sub Target_MouseMove(Button As Integer, Shift As Integer, X as Single, Y as Single)
Os parâmetros citados acima são os mesmos daqueles estudados no evento MouseDown().
No próximo módulo de aula iremos estudar sobre o evento MouseUp().
Aula 54 Trabalhando com eventos do mouse - Parte VII
Se você solta o ponteiro do mouse sobre um determinado controle, neste momento é gerado o evento
<MOUSEUP()>. Os parâmetros deste evento são idênticos aos que estudamos nos eventos das aulas 52 e 53 e sua
sintaxe pode ser observada abaixo:
Private Sub Target_MouseUp(Button as Integer, Shift As Integer, A as Single, B as Single)
A insrtução mais utilizada neste evento é a de finalização de um determinado programa, pois se o usuário soltar o
clique do ponteiro do mouse sobre um botão de <FINALIZAR> o programa por exemplo, não teremos nenhum risco
de que o programa não seja finalizado.
Aula 55 Documentando o seu código
Em sistemas comerciais complexos, temos uma infinidade de linhas de código e, todo sistema requermanutenção.
Com o passar do tempo você poderá esquecer de alguns detalhes ou "para que serve" um determinado trecho de
código. Assim sendo, a documentação do código é muito importante para a manutenção do sistema, bem como
para facilitar o estudo das fontes por parte de uma equipe de profissionais.
Os comentários de código são empregados em três objetivos distintos:
Especificar a finalidade de uma linha de comando do programa;

Especificar a finalidade de um procedimento completo do programa;
Especificar o objetivo de um determinado módulo do aplicativo.
Documentar o código não é uma prática saudável apenas para um aplicativo VB, mas em qualquer linguagem de
programação/ambiente de desenvolvimento.
Para inserir uma linha de documentário em seu aplicativo, em qualquer um dos níveis informados, você deverá usar
o símbolo ao lado ( ' ). Observe abaixo um exemplo de sequência de linhas de comentários:

arquivo = List1.List(List1.ListIndex)
'na linha acima estamos armazenando o conteúdo selecionado na caixa de listagem List1
'na variável arquivo
'na linha acima estamos informando que o componente que irá receber a imagem deverá
'carrega-la no disco através de um nome identico ao da variável arquivo.
End Sub
No exemplo acima utilizamos o primeiro modo de documentar um programa, ou seja, linha a linha. Este método
não é empregado em todo o sistema, pois em um aplicativo comercial, teremos milhares de linhas de programas e,
deveremos empregar este método apenas em comandos mais complexos ou que possuam uma finalidade especial
no contexto do programa.
No próximo módulo de aula iremos estudar sobre a documentação de um determinado trecho de programa.
Aula 56 Documentando o seu código - Parte II
Em sistemas comerciais, teremos diversos procedimentos e módulos que irão compor o sistema e, é importante
documentar cada módulo ou procedimento, fazendo com que os demais desenvolvedores envolvidos no projeto,
tenham uma exata noção do objetivo ou da função daquele procedimento ou módulo. Este tipo de comentário
poderá ajudar também que outros programadores da equipe, possam reutilizar o módulo ou procedimento, sabendo
a função do mesmo, em outros projetos da própria empresa. Abaixo estamos sugerindo um padrão para comentar o
inicio de um módulo ou de um procedimento:
'Nome_arquivo: controle_acesso.cls
'Autor: Paulo Matuszewski
'Data: 09/11/2004
'Descrição: este módulo tem por objetivo realizar o controle de acesso aos usuários cadastrados e
'.................. devidamente autorizados a utilizarem o sistema. Utiliza o banco de dados Empresa.MDB e a tabela
'.................. usuarios.
'Última alteração da rotina: 05/06/2004
Observe que incluindo um comentário completo no inicio de um módulo ou procedimento/rotina, você estará
facilitando a vida de colegas de trabalho assim como a sua, pois você poderá ficar meses sem a necessidade de
realizar alterações no sistema e, quando o fizer, conseguirá interpretar com facilidade a função das mesmas.
Não existe um padrão definido para a inclusão dos mesmos, o trecho acima é apenas uma sugestão e, poderá ser
livremente adaptado para as suas necessidades.
No próximo módulo de aula iremos estudar sobre as convenções de nomeação.
Aula 57 Convenções de nomeação
Quando você cria um aplicativo completo ou um formulário, pode observar que, se incluir 10 controles do tipo botão
de comando, cada um receberá um nome, que ficará armazenado na propriedade NAME do respectivo componente.
O VB irá nomear os componentes como Command1, Command2, etc.
Mas esta identificação é gerada automaticamente pelo VB e, de acordo com o número de componentes de um
formulário ou de um projeto, convêm nomear estes controles um a um, principalmente com o objetivo de identificar
com mais facilidade, caso contrário a interpretação do código fonte poderá ser complicada.
Assim sendo, o primeiro procedimento ao incluir um componente em um formulário é alterar a sua propriedade
NAME para algum conteúdo descritivo, fazendo com que seu código fique mais legível e de forma automática o
tempo de desenvolvimento e depuração dos procedimentos seja reduzido.
Para gerar os nomes de controles, existem algumas regras de nomeação, as quais discutiremos a seguir:
Ao nomear variáveis, utilize sempre letras minusculas;

Sempre escreva constantes com letras maiúsculas;
Utilize nomes que lembrem o controle ou sua função, como por exemplo:
o btn_incluidados - utilizado para nomear um botão que tem a função de incluir dados de um
formulário
o btn_pesquisa - utilizado para nomear um botão que tem a função de carregar uma rotina de
busca.
Procure não utilizar nomes muito longos, para facilitar a escrita de código;
Crie prefixos para cada tipo de controle, como por exemplo para os botões o prefixo "btn" e, padronize
esses para todo o seu código.

Apostila de Visual Basic 6

Enviado por

Direitos autorais:

Formatos disponíveis

Apostila de Visual Basic 6

Enviado por

Dados do documento

Direitos autorais

Formatos disponíveis

Compartilhar este documento

Compartilhar ou incorporar documento

Opções de compartilhamento

Você considera este documento útil?

Este conteúdo é inapropriado?

Direitos autorais:

Formatos disponíveis

Apostila de Visual Basic 6

Enviado por

Direitos autorais:

Formatos disponíveis

Apostila de Visual Basic 6

Curso passo a passo para iniciante

Marcelino Macêdo -1-

Aula 01 - Visual Basic e seu ambiente de desenvolvimento

Marcelino Macêdo -2-

Marcelino Macêdo -3-

verdade é sobre o formulário que iremos

Marcelino Macêdo -4-

CTRL + J Ativa a lista de métodos e propriedades

- Aula 02 - A Estrutura de um aplicativo desenvolvido em VB

Marcelino Macêdo -5-

Os arquivos contendo a estrutura de um formulário possuem a extensão FRM.

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

Marcelino Macêdo -6-

1. Dando um clique duplo sobre qualquer parte vaga do formulário;

Marcelino Macêdo -7-

Guia Editor Format

Marcelino Macêdo -8-

Marcelino Macêdo -9-

- Aula 03 - Conhecendo um formulário e desenvolvendo seu primeiro aplicativo

Conforme já especificamos, as propriedades são as características de um componente/objeto, como os de

WindowState 0 - normal O formulário é aberto em seu estado normal

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

- Aula 04 - Conhecendo um formulário e desenvolvendo seu primeiro aplicativo

Double -1.79769633486232 a 4.94065645841247E-324

- Aula 05 - Constantes, vetores e matrizes

Dim faixasalarial(10) as currency

- Aula 06 - Eventos - Aprendendo na prática

Vamos trabalhar com três componentes:

Nosso sistema, terá o seguinte objetivo:

- Aula 07 - Caixa de Ferramentas e Controles

ou se o mesmo poderá aceitar gráficos. No caso de inserir uma figura, deverá

- Aula 07 - Caixa de Ferramentas e Controles

Controle :Caixa de seleção : Check Box

- Aula 09 - Personalizando a sua caixa de ferramentas

Observe que temos duas GUIAS : GENERAL

- Aula 10 - Alterando as propriedades em tempo de execução

Private Sub Form_Load()

- Aula 11 - Nosso primeiro projeto

- Aula 12 - Funções VB6

- Aula 13 - Funções VB6

O próximo passo é alterar a propriedade Caption dos CommandButton 01 ao 10 para 0,1,2,3,4,5,6,7,8,9,0

Private Sub Command3_Click()

Text1.Text = Text1.Text + "3"

Private Sub Command4_Click()

Private Sub Command5_Click()

Private Sub Command6_Click()

Private Sub Command7_Click()

Private Sub Command8_Click()

Private Sub Command9_Click()

Private Sub Command10_Click()

Private Sub Command12_Click()

Private Sub Command13_Click()

Private Sub Command15_Click()

- Aula 14 - Estruturas de repetição

Neste ponto, seu formulário terá o seguinte aspecto:

- Aula 16 - Estruturas de repetição (continuação)

Label1.Caption = "Contagem Finalizada"

- Aula 18 - Barras de rolagem

O primeiro controle em destaque é o da barra de rolagem horizontal e o segundo da barra de rolagem