Code Examples

Display Field in Zoombox

acCmdZoomBox

This example displays a zoom box for a control. To use the code, create a button on the form and paste the code into the On Click event.

'************ Start of Code *****************
'Code courtesy of Terry Kreft

Sub cmdZoom_Click()
  Screen.PreviousControl.SetFocus
  RunCommand acCmdZoomBox
End Sub
'************** End of Code *****************

© 1998 - 2011 Terry Wickenden TKW Design Site developed, maintained and hosted by TKW Design. This site is best viewed at 1024 x 768. Optimised for Firefox.