20-06-2009, 07:33 AM
Code:
frmmainmenu.show
dim frm As form
for each frm In vb.forms
if frm.name "frmMainMenu" then
unload frm
end if
next
That will load your main menu and close everything else.