Solved

Determining the calling function name.

Posted on 2009-05-06
5
341 Views
Last Modified: 2013-11-07
Simple situation:

public function foo() as boolean
    bar()
end function

public function foo2() as boolean
    bar()
end function

public sub bar()
   'code to determine whether the function was called from foo or foo2
end sub

Which code would I place in the sub bar() to determine the calling function, without having to send it to the sub manually?
0
Comment
Question by:Onthrax
5 Comments
 
LVL 9

Expert Comment

by:Deathrace
ID: 24313594
hey , i got a general idea,, is the below code helps you.


string whereimcalled = null; //declare globally
 

public function foo() as boolean

{

   whereimcalled = "Hey its method foo"; 

}
 

public function foo2() as boolean

{

  whereimcalled ="Hey its method foo2";

}
 

public subbar()

{

   // evaluate the string variable///

}
 

}

Open in new window

0
 
LVL 4

Expert Comment

by:cauos
ID: 24313614
you have to choices; you can pass extra parameter to the called function and then check the value of the passed parameter.
or you can use stacktrace class to know which is the calling function
  private void f1()

        {

            calledfunction();

        }

        private void f2()

        {

            calledfunction();

        }

        private void calledfunction()

        {
 

            System.Diagnostics.StackTrace st = new System.Diagnostics.StackTrace(1);

            System.Diagnostics.StackFrame sf = st.GetFrame(0);

            string msg =sf.GetMethod().Name;

            MessageBox.Show(msg);
 

        }

Open in new window

0
 
LVL 8

Expert Comment

by:OBonio
ID: 24313622
Have a look at the StackFrame and StackTrace classes.  I'm not sure what you're trying to achieve though.  If the function does something different based on who is calling it, then it should really have another function to run the different code....
0
 
LVL 4

Accepted Solution

by:
cauos earned 500 total points
ID: 24313668
ok you are using vb not c#;
        sub f1()       

            calledfunction()

        end sub

        sub f2()

            calledfunction()

        sub 

        sub calledfunction()
 

            dim st as   new System.Diagnostics.StackTrace(1)

            dim sf as System.Diagnostics.StackFrame  = st.GetFrame(0)

            dim msg  as string =sf.GetMethod().Name

            MessageBox.Show(msg)

       end sub

Open in new window

0
 
LVL 13

Author Comment

by:Onthrax
ID: 24324334
Thanks all for replying.

The stacktrace solution will work just fine without any extra manual settings. Great!

Cheers :)

0

Featured Post

3 Use Cases for Connected Systems

Our Dev teams are like yours. They’re continually cranking out code for new features/bugs fixes, testing, deploying, testing some more, responding to production monitoring events and more. It’s complex. So, we thought you’d like to see what’s working for us.

Question has a verified solution.

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

Suggested Solutions

Today I had a very interesting conundrum that had to get solved quickly. Needless to say, it wasn't resolved quickly because when we needed it we were very rushed, but as soon as the conference call was over and I took a step back I saw the correct …
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
When you create an app prototype with Adobe XD, you can insert system screens -- sharing or Control Center, for example -- with just a few clicks. This video shows you how. You can take the full course on Experts Exchange at http://bit.ly/XDcourse.
Need to grow your business through quality cloud solutions? With everything required to build a cloud platform and solution, you may feel like the distance between you and the cloud is quite long. Help is here. Spend some time learning about the Con…

930 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

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now