hi samsul,
  this code will solve your problem
    Dim fForm As Form
    
    Set fForm = Forms.Add(FormName)
    DoEvents
    fForm.Show
    Set fForm = Nothing



regards
tl wong


_____________________________________________________________
Get 25MB, POP3, Spam Filtering with LYCOS MAIL PLUS for $19.95/year.
http://login.mail.lycos.com/brandPage.shtml?pageId=plus&ref=lmtplus