I never use the End statement here is what I do

VB Code:
  1. Private Sub Form_Unload() 'Unload routine for main form
  2.      Dim frm as Form
  3.      For Each frm in Forms
  4.           Unload frm
  5.      Next frm
  6. End Sub

This way you actually unload all of your forms and when all of your forms are unloaded then the program ends on it's own.