cmdNo_Click secundario privado ()
accObj dévil como nuevo Access.Application
strDSF dévil como secuencia
¡strDSF = [formas]! ¡[frmMain]! [txtTarget]
Con el accObj
strDSF de .OpenCurrentDatabase
. Visible = verdad
.UserControl = verdad
Extremo con
Fijar el accObj = nada
Terminar el submarino
|