HelloData: um aplicativo ADO simples
Este aplicativo simples percorre cada uma das quatro principais operações do ADO: obtenção, análise, edição e atualização de dados. Essas operações são executadas no banco de dados de exemplo Northwind incluído no SQL Server. Para se concentrar nos conceitos básicos do ADO e evitar a desordem de código, o tratamento de erros no exemplo é mínimo.
Para executar HelloData
Crie um novo projeto do Visual Basic EXE Padrão que faça referência à biblioteca do ADO. Para obter mais informações, consulte Referenciando as bibliotecas do ADO.
Crie quatro botões de comando na parte superior do formulário, definindo as propriedades Name e Caption para os valores mostrados na tabela no final deste tópico.
Abaixo dos botões, adicione um Controle do Microsoft DataGrid (Msdatgrd.ocx). O arquivo Msdatgrd.ocx está incluído no Visual Basic e está localizado no diretório \windows\system32 ou \winnt\system32. Para adicionar o controle DataGrid ao painel da caixa de ferramentas do Visual Basic, selecione Componentes... no menu do Projeto. Em seguida, marque a caixa ao lado de "Microsoft DataGrid Control 6.0 (SP3) (OLEDB)" e clique em OK. Para adicionar o controle ao projeto, arraste o controle DataGrid da Caixa de Ferramentas para o formulário do Visual Basic.
Crie um TextBox no formulário abaixo da grade e defina suas propriedades, conforme mostrado na tabela. O formulário deve ser semelhante à figura a seguir quando você terminar.
Por fim, copie o código listado em Código HelloDatae cole-o na janela do editor de código do formulário. Pressione F5 para executar o código.
Nota
No exemplo a seguir e em todo o guia, a ID de usuário "MyId" com uma senha de "123aBc" é usada para autenticar no servidor. Você deve substituir esses valores por credenciais de logon válidas para o servidor. Além disso, substitua o valor "MySQLServer" pelo nome do servidor.
Para obter uma descrição detalhada do código, consulte Comentários no HelloData.
HelloData
| Tipo de controle | Propriedade | Valor |
|---|---|---|
| Formulário | Nome | Formulário1 |
| Altura | 6500 | |
| Largura | 6500 | |
| MS DataGrid | Nome | grdDisplay1 |
| Caixa de Texto | Nome | txtDisplay1 |
| Multilinha | verdadeiro | |
| Botão Comando | Nome | cmdGetData |
| Legenda | Obter dados | |
| Botão Comando | Nome | cmdExamineData |
| Legenda | Examinar dados | |
| Botão Comando | Nome | cmdEditarDados |
| Legenda | Editar dados | |
| Botão Comando | Nome | cmdUpdateData |
| Legenda | Atualizar dados |