FINALIZANDO APLICACAO COM END

USUARIO.EXCLUIDOS 15/04/2004 07:55:24
#20633 Resposta escolhida

exitste um artigo aqui mesmo que fala sobre isso tb com alguns exemplos que voce pode tirar a prova

http://www.vbmania.com.br/vbmdetail.php?varID=765

USUARIO.EXCLUIDOS 15/04/2004 10:39:00
#20685

Public Sub FinalizaPrograma
dim Frm as form

for each Frm in forms
unload frm
next frm

'se tiver colecoes:
set Collection1 = nothing

'se tiver arrays dinamicos
Erase Arrays

'se tiver classes
set Class1 = nothing

'se tiver subclassing
Unsubclass
end sub