Stephen Bond
stephen at bondsoftware.co.nz
Thu Nov 13 20:45:30 CST 2003
Which means is that you would have to put the line in each SUB. Not very elegant, what? Stephen > -----Original Message----- > From: Stephen Bond > Sent: Friday, 14 November 2003 3:41 p.m. > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A2K: Get Current Sub Name > > > Darren > > A common way to do this (this means I saw a guru do it so I > copied him <g>) relies on inserting in each module at initial > design time the following line of code: > > Private Const thisModuleName As String = "basWhatever" > > Not very swept up sorry! > > Stephen Bond > > > > > -----Original Message----- > > From: Darren DICK [mailto:d.dick at uws.edu.au] > > Sent: Friday, 14 November 2003 2:35 p.m. > > To: AccessD List > > Subject: [AccessD] A2K: Get Current Sub Name > > > > > > Hello all > > Is there a way to determine the current sub name once you are > > in it then display it > > Is there a Current Sub Property? etc > > > > eg (PSEUDO Code) > > Private Sub MySub() > > Msgbox "My Sub Name is " & Application.SubName > > End sub > > > > Many thanks in advance > > > > Darren > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > >