Criar uma aplicação com acesso a banco de dados com funcionalidades como : incluir , alterar , excluir , atualizar e cancelar no VB .NET é mais fácil do que você pensa. Para mostrar que isto é verdade , neste artigo vou mostrar como criar uma agenda de endereços com acesso a um banco de dados e todas estas funcionalidades com a ajuda do assistente de aplicação do VB .NET.(veja também o artigo : Meu Primeiro Acesso a Dados com o VB.NET )
Vou criar uma tabela no SQL Server no banco de dados Teste com a estrutura mostrada abaixo e com o nome de agenda:
Nota: Você pode usar também uma base de dados Access com a mesma estrutura.
Com a tabela criada podemos iniciar o nosso projeto no VB .NET.
1- Inicie um novo projeto no VS .NET dando a ele o nome : AgendaEndereco
2- No menu File selecione a opção : Add New Item... . Selecionando na janela Add New Item o template: Data Form Wizard
3- A janela do Assistente de formulário - DataForm Wizard - click no botão Next >
4- Na próxima janela do assistente informe o nome agenda para o DataSet que será criado e clique no botão - Next>
Na janela do assistente para escolher uma conexão clique no botão : New Connection
Na janela de propriedade de vinculação de dados informei o nome do meu servidor SQL Server , do banco de dados ; testando a conexão em seguida. Finalmente clique no botão OK quando a janela de conexão de dados voltar clique no botão Next >
Nota:
Se você estiver usando um banco de dados Access neste ponto você deve
indicar um provedor apropriado para acessar o Access na aba Provedor e
na aba Conexão informar a localização do banco de dados. |
Na próxima janela do assistente serão exibidas as tabelas do banco de dados em Available Items. Selecione a tabela agenda e clique no botão > para que ela migre para Selected item(s). A seguir clique no botão Next >.
A próxima janela do assistente exibe os campos da tabela agenda. Você deve selecionar os campos que desejar exibir no formulário. Vamos marcar todos os campos e clica no botão Next.
Na próxima janela vamos escolher o estilo do formulário que será criado. Selecione a opção : Single record in individual controls . Como eu quero criar o formulário com todos os : Add , Delete , Cancel e os botões de navegação além do botão Cancel , vou marcar todas as caixas de opção , conforme abaixo.
Clicando no botão Finish teremos o formulário criado com todos os botões conforme abaixo:
Agora vamos alterar o nome dos botões e fazer uma ordenação dos botões no formulário até obter o seguinte layout:
Temos que tornar o formulário acima como o formulário que será executado quando a aplicação for executada. Fazemos isto clicando com o botão direito do mouse sobre o nome da solução e selecione a opção Properties. A seguir na janela Property Pages na opção Startup object altere para o formulário agenda.
`
Pronto ! Já estamos prontos para executar o projeto. Antes vamos selecionar a opção : Build Solution no menu Build. Após isto basta pressionar F5 e clicar no botão carregar após a carga do formulário.
Para permitir que a navegação entre os controles TextBox seja feita pela tecla ENTER ( quando o usuário pressionar ENTER o foco irá para o próximo controle) vamos inserir o código abaixo no evento Key_Down do projeto agenda:
Private
Sub Agenda_KeyDown(ByVal
sender As
Object,
ByVal e
As System.Windows.Forms.KeyEventArgs)
Handles
MyBase.KeyDown
If e.KeyCode = Keys.Enter
Then
e.Handled = TrueSendKeys.Send("{TAB}") End If End Sub |
Acabamos de criar uma agenda de endereços completamente funcional sem escrever uma única linha de código , usando o assistente de formulário do VB.NET , acredita agora !!!
José Carlos Macoratti