--------------------------------------
en GENERAL --> DECLARACIONES tengo:
Private basedatos As ADODB.Connection
en GENERAL --> show_grilla tengo:
Private Sub show_grilla()
Dim usuario, contrasena, servidor, basestring As String
Dim basedatos As Connection
Dim Coneccion As String
Dim Rs As Recordset
usuario = "mi_usuario"
contrasena = "mi_contrasena"
servidor = "mi_servidor"
basestring = "mi_base"
Set basedatos = New ADODB.Connection
---------------------------------------
A ver, hace tiempo que no toco VB, pero probare suerte.
Has declarado en general la variable basedatos bien, pero dentro del procedimiento la has vuelto a declarar (local), y si haces referencia a ella desde dentro del procedimiento te ira a la local, y no a la declarada en general.
Quita:
"Dim basedatos As Connection"
Y prueba suerte.