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
No Visual Basic, no menu Projeto, selecione Referências....
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
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
No Microsoft Access, selecione ou crie um módulo na guia Módulos, na janela Banco de Dados.
No menu Ferramentas, selecione HDInsight.
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)
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