>Hi Allan,
>
>The following are the codeing in my function, i hope it will make u more understand what I need :
>
>Let say txtFormName.text = "Form1"
>
>Private Sub Button1_Click()
> OpenForm (txtFormName.text)
> 'Call function OpenForm to open the form called "Form1"
>End Sub
>
>Private Function OpenForm(lcFormName as object)
> 'The compiler will highlight the lcFormName and say "Type Mismatch"
> lcFormName.SHOW
>End Sub
>
>
>Is there any method allow this function to open any form by typing from txtFormName?
>
>
>Please Help
>Thanks
>
>Aston