Visual Basic para Aplicaciones - ¿La base de datos está abierta?

Estimados Latinos:

Estoy con uma duda en mi aplicación MDI. En el evento Terminate hice la siguiente instrucción para cerrar la base de datos:

bd.close

Solamente en una ocasión esta instrucción podrá causar un error. Para quitar este error, necesito saber si hay alguna instrucción p/ ver si la base de datos está abierta.

si base_datos = abierta
entonces cerrar base_datos

Saludos desde Brazil

Hola que tal:
Mira con que le pongas el siguiente código es mas que suficiente:

On Error Resume Next
bd.Close
On Error Goto 0

Esto lo que hace es que si la base de datos esta abierta, pues la va a cerrar y si no,en caso de que ya este cerrada, te mandaria un mensaje de error, pero este mensaje de error se eliminaria con : ON ERROR RESUME NEXT..... entonces pues ya no le haria nada porque ya esta cerrada.

Espero y te sirva, hasta luego....