Cursos de Informática Grátis www.megainforcursos.com

1 de novembro de 2011

criando Programa pra Cadastro de Clientes com o Visual Basic


Vamos criar um programa para cadastro de clientes

Crie um banco de dados no programa Microsoft Access.
Dê um nome a este banco de dados, como exemplo usaremos ?Cadastro de Clientes?.
Escolha o local a ser salva. Para este exemplo usamos ?C:\Meus documentos\Meus programas\Banco de dados\Cadastro de Clientes.mdb?
Crie uma tabela com os seguintes campos
Nome, Endereço, Telefone.
Todos com tipo de dados Texto.

Salve sua tabela.
Dê a ela o nome de ?Clientes?.
Inclua alguns registro (preencha com alguns dados).

Feche seu banco de dados.

Atenção se você estiver usando o Access 2000 talvez tenha que converter seu banco de dados para um a versão anterior

Inicie o Visual Basic.
Iniciar/ Programas/ Microsoft Visual Basic 6/ Visual Basic 6
Selecione o projeto padrão (StandardEXE), e clique no botão Abrir

Insira mais um formulírio (MDIForm1). Project/Add MDIForm.
Insira os objetos no ?form1?.
Data,
Text1
Text2
Text3
Label1
Label2
Label3
Command1
Command2

Defina as propriedades de uma só vez de todos Textbox
Selecione todos de uma vez arrastando o cursor do mouse sobre todos.
Width = 3000
Height = 360
Isso caso você queira tamanhos iguais para as caixas de texto

Definas as propriedades dos rótulos (Label).
Selecione todos rótulos.
Width = 1000
Height = 360

Defina as propriedades do botões (Commandbutton).
Selecione todos botões.
Width = 1000
Height = 360

Defina as propriedades:

Form1
Name = clientes
Caption = Cadastro de Clientes
MDIChild = True

MDIForm1
Name = cadastro
Caption = Cadastro de Clientes

Data

Caption = Cadastro de Clientes
DatabaseName = ? C: \Meus documentos\ Meus programas\Banco de dados\Cadastro de Clientes. mdb?. Procure pelas pastas o banco de dados criado no Access.
Width = 360
Height = 3000
RecordsedType = 0 ? Table
RecordSource = Clientes


Text1

Name = txt1
Text = deixe em branco
DataSource = Data1
DataField = Nome


Text2

Name = txt2
Text = deixe em branco
DataSource = Data1
DataField = Endereço


Text3

Name = txt3
Text = deixe em branco
DataSource = Data1
DataField = Telefone


Label1

Name = lbl1
Caption = Nome


Label2

Name = lbl2
Caption = Endereço


Label3

Name = lbl3
Caption = Telefone


Command1

Name = cmd1
Caption = &Incluir


Command2

Name = cmd2
Caption = &Excluir


Salve seu projeto agora.
File/Save Project.
Dê um nome. Exemplo CadastroDeClientes.

Rode seu programa.
Run/Start

Antes de iniciarmos a construção dos códigos para os botões vamos mudar a forma de carregamento do programa.
Clique em Project/Project1 Properties...
Clique em Startup Objetct. Selecione cadastro (MDIForm) e clique em ?OK?.

Rode novamente o programa.
Notou que o formulírio para incluir e excluir cadastro não aparece.
Porque às vezes você não quer cadastrar um cliente quer ver um relatório ou uma consulta.

Então selecione o formulírio ?cadastro? (MDIForm).
Clique no Menu Editor na barra de ferramentas

Defina:
Caption = Arquivo
Name = mnuarquivo

Clique em Netx.
Dê um clique na seta para direita, defina.

Caption = Abrir
Name = mnuabrir
Clique em OK.

Clique no menu que você acabou de criar no formulírio cadastro (MDIForm).
Clique em abrir.

Digite o seguinte código.
clientes.Show

Selecione agora o form (clientes).
Dê um clique duplo no botão Incluir (cmd1) e digite o seguinte código.
Data1.Recordset.AddNew

Dê um clique duplo no botão Excluir (cmd2) e digite o seguinte código.
Data1.Recordset.Delete

Faça os testes necessírios.
Rode o programa.
Run/Start.

Salve o projeto e crie um executível.
File/Make CadastroDeClientes.exe...

Erros podem ocorrer tanto ao incluir ou excluir registros.
Para isso anote o número do erro que aparecer retorne ao projeto e siga as instruções clicando no botão Help.

espero ter ajudado...

0 comentários:

Postar um comentário

 
Design by Wordpress Theme | Bloggerized by Free Blogger Templates | coupon codes