Procedure FormCollect Lparam cformname For i = 1 To _Screen.FormCount * check if the name of the form is equal to your reference form name If Upper(_Screen.forms(i).name) = Upper(cformname) * do whatever you like to do in the form here _Screen.forms(i).Activate Exit Endif EndforCall the form anywhere in your application without declaring it public.
Do FormCollect With 'MyForm'Another way is that Invoke the form specifying the name in the do form command:
Do Form Myform Name MyformNameso that you can call the form by its name anywhere in the application: