Usando o ADO com o Microsoft Visual Basic e o Visual Basic for Applications
Configurar um projeto do ADO e escrever código ADO é semelhante se você usar o Visual Basic ou o Visual Basic for Applications. Este tópico aborda o uso do ADO com o Visual Basic e o Visual Basic for Applications e observa as diferenças.
Referenciando a biblioteca do ADO
A biblioteca do ADO deve ser referenciada pelo seu projeto.
Para fazer referência ao ADO do Microsoft Visual Basic
No Visual Basic, do menu Projeto , selecione Referências ....
Selecione Biblioteca de Objetos de Dados do Microsoft ActiveX x.x na lista. Verifique se pelo menos as seguintes bibliotecas também estão selecionadas:
Visual Basic for Applications
Objetos e procedimentos de runtime do Visual Basic
Objetos e procedimentos do Visual Basic
Automação OLE
Clique em OK.
Você pode usar o ADO tão facilmente com o Visual Basic for Applications, usando o Microsoft Access, por exemplo.
Para fazer referência ao ADO no Microsoft Access
No Microsoft Access, selecione ou crie um módulo na guia Módulos na janela Banco de Dados.
No menu Ferramentas, selecione Referências....
Selecione da Biblioteca x.x dos Objetos de Dados do Microsoft ActiveX na lista. Verifique se pelo menos as seguintes bibliotecas também estão selecionadas:
Visual Basic for Applications
Biblioteca de objetos do Microsoft Access 8.0 (ou posterior)
Biblioteca de Objetos do Microsoft DAO 3.5 (ou posterior)
Clique em OK.
Criando objetos ADO no Visual Basic
Para criar uma variável de automação e uma instância de um objeto para essa variável, você pode usar dois métodos: Dim ou CreateObject.
Ofuscar
Você pode usar a palavra-chave New com Dim para declarar e criar instâncias de objetos ADO em uma etapa:
Dim conn As New ADODB.Connection
Como alternativa, a declaração da instrução Dim e a instanciação de objeto também podem ser duas etapas:
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
Nota
Não é necessário usar explicitamente o progid ADODB
com a instrução Dim, supondo que você tenha referenciado corretamente a biblioteca ADO em seu projeto. No entanto, usá-lo garante que você não terá conflitos de nomenclatura com outras bibliotecas.
Nota
Por exemplo, se você incluir referências ao ADO e à DAO no mesmo projeto, deverá incluir um qualificador para especificar qual modelo de objeto usar ao instanciar recordset objetos, como no seguinte código:
Dim adoRS As ADODB.Recordset
Dim daoRS As DAO.Recordset
CreateObject
Com o método CreateObject, a instanciação de declaração e objeto deve ser duas etapas discretas:
Dim conn1
Set conn1 = CreateObject("ADODB.Connection") As Object
Objetos instanciados com CreateObject são associados tardiamente, o que significa que eles não são fortemente tipados e a conclusão da linha de comando está desabilitada. No entanto, ele permite ignorar a referência à biblioteca do ADO do seu projeto e permite criar uma instância de versões específicas de objetos. Por exemplo:
Set conn1 = CreateObject("ADODB.Connection.2.0") As Object
Você também pode fazer isso criando especificamente uma referência à biblioteca de tipos do ADO versão 2.0 e criando o objeto.
A instanciação de objetos usando o método CreateObject normalmente é mais lenta do que usar a instrução Dim.
Manipulando eventos
Para lidar com eventos do ADO no Microsoft Visual Basic, você deve declarar uma variável no nível do módulo usando a palavra-chave WithEvents. A variável pode ser declarada apenas como parte de um módulo de classe e deve ser declarada no nível do módulo. Para obter uma discussão mais detalhada sobre como lidar com eventos do ADO, consulte Manipulando eventos do ADO.
Exemplos do Visual Basic
Muitos exemplos do Visual Basic são incluídos na documentação do ADO. Para obter mais informações, consulte exemplos de código do ADO no Microsoft Visual Basic.
Consulte Também
Microsoft ActiveX Data Objects (ADO)Usando o ADO com o Microsoft Visual C++Usando o ADO com linguagens de script