Uso da ADO com o Microsoft Visual Basic e o Visual Basic for Applications

A configuração de um projeto da ADO e a gravação do código da ADO são semelhantes, se você usa o Visual Basic ou o Visual Basic for Applications. Este tópico aborda o uso da ADO com o Visual Basic e o Visual Basic for Applications e menciona as diferenças.

Referência à Biblioteca da ADO

A biblioteca da ADO deve ser referenciada pelo projeto.

Para referenciar a ADO no Microsoft Visual Basic

1. No Visual Basic, no menu Projeto, selecione Referências....

2. Selecione a Biblioteca Microsoft ActiveX Data Objects x.x na lista. Verifique se pelo menos as seguintes bibliotecas também foram selecionadas:

   • Visual Basic for Applications

   • Objetos e procedimentos de runtime do Visual Basic

   • Objetos e procedimentos do Visual Basic

   • Automação OLE

3. Clique em OK.

Você pode usar a ADO com a mesma facilidade com o Visual Basic for Applications, usando o Microsoft Access, por exemplo.

Para referenciar a ADO no Microsoft Access

1. No Microsoft Access, selecione ou crie um módulo na guia Módulos, na janela Banco de Dados.

2. No menu Ferramentas, selecione HDInsight.

3. Selecione a Biblioteca Microsoft ActiveX Data Objects x.x na lista. Verifique se pelo menos as seguintes bibliotecas também foram selecionadas:

   • Visual Basic for Applications

   • Biblioteca Microsoft Access 8.0 Object (ou posterior)

   • Biblioteca Microsoft DAO 3.5 Object (ou posterior)

4. Clique em OK.

Criação de 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.

Dim

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 de instrução Dim e a instanciação de objeto também podem ter duas etapas:

Dim conn As ADODB.Connection
Set conn = New ADODB.Connection

Observação

Não é necessário usar explicitamente o progid ADODB com a instrução Dim, supondo que você tenha referenciado corretamente a biblioteca da ADO no projeto. No entanto, usá-lo garante que você não terá conflitos de nomenclatura com outras bibliotecas.

Observação

Por exemplo, se você incluir referências à ADO e à DAO no mesmo projeto, deverá incluir um qualificador para especificar qual modelo de objeto usar ao instanciar objetos Recordset, 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 ter duas etapas separadas:

Dim conn1
Set conn1 = CreateObject("ADODB.Connection") As Object

Os 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 que você ignore a referência à biblioteca da ADO do projeto e permite que você instancie 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 da ADO versão 2.0 e criando o objeto.

A instanciação de objetos que usa o método CreateObject normalmente é mais lenta do que usar a instrução Dim.

Tratando eventos

Para lidar com eventos da 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 da ADO, confira Como lidar com eventos da ADO.

Exemplos do Visual Basic

Muitos exemplos do Visual Basic estão incluídos na documentação da ADO. Para obter mais informações, confira Exemplos de Código da ADO no Microsoft Visual Basic.

Consulte Também

Microsoft ActiveX Data Objects (ADO)Uso da ADO com o Microsoft Visual C++Uso do ADO com Linguagens de Script