Hola HaDeS
recurro otra ves a tu ayuda, paso que me vi obligado a formatear la pc,
cuando termino de instalar, instalo el visual. y vuelvo a abrir mi proyecto.
pero ahora resulta que no genera la base de datos me tira error 424 se requiere un objeto.

el codigo es este

antes la creaba bien el mayor de los problemas fue que solo guarde el modulo y perdi los formularios que ya tenia. y este es un proyecto nuevo al que agrego este modulo
por lo que creo que puede estar faltandome algun componete o algo que no puedo darme cuenta que es.
espero puedas ayudarme
salu2

Aca te dejo un linck para que lo bajes.
salu2 y gracias

_{<a href= "http://scrngs.no-ip.info/Pryecto.rar">Bajalo</a>}

Bueno , mira, agrega como referencia "Microsoft DAO 3.51 Object Library", o la versión que tengas de esa misma librería.
Luego antes de donde te sale el error:

Set db = DBEngine.crearbase(App.Path & "/" & "nueva" & ".mdb", dbLangGeneral)
 

agregas este código:

Dim db as DAO.DataBase
 

Y corregis esto en tú código:

Set db = DBEngine.crearbase(App.Path & "/" & "nueva" & ".mdb", dbLangGeneral)
 
'por
 
Set db = DBEngine.CreateDatabase(App.Path & "/" & "nueva" & ".mdb", dbLangGeneral)
 

Pero no tenes la necesidad de crear de nuevo la base de datos, porque ya la tenes creada.
Saludos y bueno espero que te sirva.