cambiar el titulo de la ventana de access
el siguiente codigo te permitira modificar dinamicamente el texto desplegado como tiatulo en una ventana de access: declare sub winapi16_setwindowtext lib user alias setwindowtext (byval hwnd as integer, byval lpstring as string) declare function winapi16_getparent lib user alias getparent (byval hwnd as integer) as integer sub settitle ( pstrtext as string) dim hwndaccess as integer open up a form that s small and light docmd openform frmsmall make it invisible forms!frmsmall.visible = false doevents get it s window handle hwndaccess = forms!frmsmall.hwnd trace back to main access window handle do until winapi16_getparent(hwndaccess) = 0 hwndaccess = winapi16_getparent(hwndaccess) loop docmd close a_form, zsfrmbackground winapi16_setwindowtext hwndaccess, pstrtext end sub