AFAIK No way :-)
but why you need this? just make sure you have right alias selected in all your code.

>Hi everyone,
>
>Whenever a grid event fires the current alias is set to the grids recordsource until the grid loses focus.
>
>How can I prevent the grid from changing the current alias?
>
>I get the same problem under VFP 9 Service pack 1 and also under VFP 7.
>
>The following code demonstrates the problem:
>
>

>*** START OF GRID PROBLEM SAMPLE
>CREATE CURSOR curTmp2 (cid C(5), cproduct C(25))
>
>CREATE CURSOR curTmp1 (cid C(6), cname C(20))
>INSERT INTO curTmp1 (cid, cname) VALUES ('000001', 'test')
>
>oF1 = CREATEOBJECT('clsMyForm')
>oF1.Width = 600
>oF1.oCmd1.Height = 20
>
>oF1.AddObject('oGrid', 'clsMyGrid')
>
>oF1.oGrid.Recordsource = ''
>oF1.oGrid.Recordsourcetype = 1
>oF1.oGrid.Recordsource = 'curTmp1'
>oF1.oGrid.Columncount = 2
>
>oF1.oGrid.Visible = .T.
>oF1.oGrid.Refresh()
>
>
>SELECT curTmp2
>oF1.Caption = "Starting with alias '" + ALIAS() + "'"
>
>oF1.AddObject('oTimer', 'clsMyTimer')
>oF1.oTimer.Interval = 500 && Once per half second
>oF1.oTimer.Enabled = .T.
>
>oF1.Show()
>
>READ EVENTS
>
>RETURN
>
>DEFINE CLASS clsMyForm AS Form
>	ADD OBJECT oCmd1 AS CommandButton
>	>	PROCEDURE QueryUnload
>		CLEAR EVENTS
>	ENDPROC
>	>	PROCEDURE oCmd1.Click
>		lcAlias = ALIAS()
>		SELECT curTmp2
>		MESSAGEBOX("The alias was '" + lcAlias + "' but is now forced to 'CURTMP2'")
>	ENDPROC
>	>ENDDEFINE
>
>
>DEFINE CLASS clsMyGrid AS Grid
>	Top = 30
>	>ENDDEFINE
>
>DEFINE CLASS clsMyTimer AS Timer
>	Interval = 500  && Once per half second
>	>	PROCEDURE Timer
>		THISFORM.Caption = TIME() + " Current alias is '" + ALIAS() + "'.  It should be 'CURTMP2'"
>	ENDPROC
>	>ENDDEFINE
>*** START OF GRID PROBLEM SAMPLE
>

>
>
>The sample shows a form with a command button and a grid. The command button has the focus and the currently selected area is alias 'curTmp2'. The grid shows records from alias 'curTmp1' (recordsource = 'curTmp1' and recordsourcetype = 1).
>
>As soon as I tab to the grid (or click on it) and the grid receives focus the current alias automaticly changes from 'curTmp2' to 'curTmp1'.
>
>When I then press CTRL+TAB to move the focus out of the grid and back to the button the current alias automaticly reverts back to 'curTmp2'.
>
>How can I prevent the grid from automaticly changing the current alias?
>
>Thanks.