Keypress 1

[Ouch]

i want to have a button on my form that when presses does 'Shift F2'to open the zoom window for the associated control

i have looked up vbKeyShift vbKeyF2 but i dont know how to implement them.

can any help?

 

[oharab]

Try this:

Private Sub Command3_Click()
On Error Resume Next
me.controls("txtZoom&quot.setfocus
'where txtzoom is the name of the textbox you want to zoom on
DoCmd.RunCommand acCmdZoomBox
End Sub


HTH

B ----------------------------------------
Ben O'Hara
Home: bpo@SickOfSpam.RobotParade.co.uk
Work: bo104@SickOfSpam.westyorkshire.pnn.police.uk
(in case you've not worked it out get rid of Sick Of Spam to mail me!)
Web:

http://www.RobotParade.co.uk

----------------------------------------

 

[Ouch]

thanks...worked spot on