Sharing forms between 2 menuitems and changing name property based on each selection using VB.Net 2003

Posted on 2006-11-28
Last Modified: 2010-04-23
I have a windows application (VS 2003) with a 2 menu item

Menu1 has the following submenus

Menu2 has the following submenus

Only one copy each of form1, form2 and form3 exist.
I want to be able to use the threee forms between the two submenus
so that when a user clicks on Menu1- form1 he gets this
and when a user clicks on Menu2 - form1 he still gets form1.
The name property should show where the form is been called.

I will be reading sqlconnection strings from the app.config file
and they each vary for Menu1 and Menu2(totally different)

How can I code this so that when the user clicks on Menu1 - form1,
the connectionstring from app.config is retrieved and when
user clicks on Menu2 - form1, another connection string from app.config is used.


Question by:Sirdots
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 3
  • 2
LVL 16

Expert Comment

ID: 18032291
Hi Sirdots,

in your menu item click event, set the name property of the form:

form1.Name = "Form1 - from menu1"

and from the other:

form1.Name = "Form1 - from menu2


Author Comment

ID: 18032327
Thanks Hillwaaa, Maybe I should explain better. I want to be able to determine where (i.e from which menuItem) the forms are been called. This is because

Menu1 - form1 has a different connection string

Menu2 - form2 has a differenct connection string.

I hope this helps.

LVL 16

Accepted Solution

Hillwaaa earned 500 total points
ID: 18032371
maybe something like

In form1

'declare variable
Dim calledFrom as String

'add sub
    Public Sub setCalledFrom(ByRef from As String)
        calledFrom = from
    End Sub

'in the onload:
if calledFrom = "Menu1" then
    'called from Menu1
    'called from Menu2
end if


and in the MenuItem click event, use:

form1.setCalledFrom("Menu1") or form1.setCalledFrom("Menu2") as appropriate.
Instantly Create Instructional Tutorials

Contextual Guidance at the moment of need helps your employees adopt to new software or processes instantly. Boost knowledge retention and employee engagement step-by-step with one easy solution.


Author Comment

ID: 18032484
Thanks Hilwaaaa. Now what does the ByRef "from"  stand for?
Am I going to pass the name of Menu1?
LVL 16

Expert Comment

ID: 18032512
No worries-  the "from" is just a string.

So when you click on Menu1 - form1, you would call the "setCalledFrom" function in form1 passing in this string, which can be whatever you want it to be, but the idea is that it indicates that the form was opened using Menu1.  This string then gets set to the "calledFrom" string - which should be a variable declared in form1.

Then when you are building your connection string, you can just use the IF statement to see if "calledFrom" indicates if the form was opened using menu1 or menu2.

Does that help?

Author Comment

ID: 18032669
Thanks. Now I am very close. What is happening is that I do not have access to the setCalledFrom("Menu1") if I do a  form1.setcalledFrom("Menu1")
from my menuclick event. I thought once I hit the dot it should give me the setCalledFrom in the intellisence but it is not doing that.

LVL 16

Expert Comment

ID: 18032967
Did you set the "setCalledFrom" sub as "private"? - this will prevent access from your menuclick.  If so, change it to "public" or "friend".

Expert Comment

by:Mohamed Zedan
ID: 18036781
May I suggest a different approach ?

in Form1 create a sub new(ConnectionString as string)
and that should be it !

Like so

public class Form1
'these are the new lines to add
              Private ConnString as string = string.empty
              Public sub New(ConnectionString as string) 'New In the form code
                     me.ConnString = ConnectionString
                     me.ConnectionVariable = new Connection(ConnString)

                     'where ConnectionVariable is  the name of the connection variable you have in the form
                     'new Connection --- should be new SqlConnection or whatever connection type you have in the form
              end sub

end class

in your menuItem Click event where you create the form do this

private sub Menu1Form1_click(sender as object, e as eventargs) handles
        dim frm as new form1("Menu1 Connection String should go here")
end sub

private sub Menu2Form1_click(sender as object, e as eventargs) handles
        dim frm as new form1("Menu2 Connection String should go here")
end sub

this should do it for you :)

Expert Comment

by:Mohamed Zedan
ID: 18036796
note that you need to reinitialize your database objects after setting the new connection string

Featured Post


Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This tutorial demonstrates one way to create an application that runs without any Forms but still has a GUI presence via an Icon in the System Tray. The magic lies in Inheriting from the ApplicationContext Class and passing that to Application.Ru…
It was really hard time for me to get the understanding of Delegates in C#. I went through many websites and articles but I found them very clumsy. After going through those sites, I noted down the points in a easy way so here I am sharing that unde…
In this video we outline the Physical Segments view of NetCrunch network monitor. By following this brief how-to video, you will be able to learn how NetCrunch visualizes your network, how granular is the information collected, as well as where to f…
Monitoring a network: why having a policy is the best policy? Michael Kulchisky, MCSE, MCSA, MCP, VTSP, VSP, CCSP outlines the enormous benefits of having a policy-based approach when monitoring medium and large networks. Software utilized in this v…

617 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question