Uso do ADO com o Microsoft Visual Basic
Aplica-se ao: Access 2013, Office 2013
A configuração de um projeto ADO e a criação de um código ADO é semelhante quando você usa 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 indica as diferenças.
Referenciando a biblioteca do ADO
A biblioteca ADO deve ser referenciada pelo seu projeto.
Para fazer referência ao ADO a partir do Microsoft Visual Basic
No Visual Basic, no menu Projeto, selecione Referências....
Selecione Biblioteca Microsoft ActiveX Data Objects x.x na lista. Verifique se pelo menos as bibliotecas a seguir também estão selecionadas:
- Visual Basic for Applications
- Procedimentos e objetos em tempo de execução do Visual Basic
- Procedimentos e objetos do Visual Basic
- Automação OLE
Clique em OK.
Você pode usar o ADO facilmente com o Visual Basic for Applications, por meio do Microsoft Access, por exemplo.
Para fazer referência ao ADO a partir do Microsoft Access
No Microsoft Access, selecione ou crie um módulo a partir da guia Módulos na janela Banco de dados.
No menu Ferramentas, selecione Referências....
Selecione Biblioteca Microsoft ActiveX Data Objects x.x na lista. Verifique se pelo menos as bibliotecas a seguir também estão selecionadas:
- Visual Basic for Applications
- Biblioteca de objetos do Microsoft Access 11.0 (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
Use a palavra-chave New com Dim para declarar e instanciar objetos ADO em uma única etapa:
Dim conn As New ADODB.Connection
Opcionalmente, a declaração de instrução Dim e a instanciação de objeto também pode ter duas etapas:
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
Observação
Não é necessário usar explicitamente o progid do ADODB com a instrução Dim , supondo que você tenha referenciado corretamente a biblioteca do ADO em seu projeto. Entretanto, sua utilização garante a ausência de conflitos de nomeação com outras bibliotecas.
Por exemplo, se você incluir referências a ADO e a DAO no mesmo projeto, inclua um qualificador para especificar qual modelo de objeto será usado ao instanciar objetos Recordset, como no código a seguir:
Dim adoRS As ADODB.Recordset
Dim adoRS As DAO.Recordset
CreateObject
Com o método CreateObject, a declaração e a instanciação de objeto deverá ter duas etapas separadas:
Dim conn1
Set conn1 = CreateObject("ADODB.Connection") As Object
Os objetos instanciados com CreateObject são acoplados posteriormente, ou seja, eles não são do tipo de alta segurança, e a conclusão da linha de comando estará desabilitada. Entretanto, com ele, você não precisará fazer referência à biblioteca ADO a partir de seu projeto e poderá instanciar versões específicas de objetos. Por exemplo:
Set conn1 = CreateObject("ADODB.Connection.2.0") As Object
Você também pode fazer isso desenvolvendo uma referência específica à biblioteca de tipos ADO versão 2.0 e criando o objeto.
A instanciação de objetos com o método CreateObject geralmente é mais lenta do que o uso da 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 de módulo. Para obter uma discussão mais completa sobre como lidar com eventos do ADO, consulte Capítulo 7: Manipulação de eventos ADO.
Exemplos do Visual Basic
Vários exemplos de Visual Basic são incluídos com a documentação do ADO. Para obter mais informações, confira Exemplos de código do ADO no Microsoft Visual Basic.