Formularios
Se puede cerrar un formulario mediante código VBScript, pulsando el botón cerrar o la cruz de la ventana.
Ver código ejemplo
Opción 1:
'Pulsar el botón cerrar.
Sub Cerrar()
gForm.Controls("Botonera").botonexecute ("botCerrar")
End sub
Opción 2:
'Usando el shell de windows para simular el shortcut Alt+F4
Sub Cerrar()
Set oShell = CreateObject("WScript.Shell")
oShell.SendKeys "%{f4}"
End sub