Return an object variable of type database that represents the current database.
CurrentDb provides a way of accessing the current database from VB without having to know (or hard code) the name of the database. A variable that points to the current database you can manipulate other objects in the Data Access Objects (DAO) hierarchy.
Dim dbsCurrent as Database Set dbsCurrent = CurrentDB MsgBox strDescription
“You see things; and you say 'Why?' But I dream things that never were; and I say 'why not?'” ~ George Bernard Shaw