Frame... example for Access 2.0

This example sets the control's frame properties. For example purposes, both inner and outer bands are turned on. However, normal three-dimensional effects use inner bands or outer bands, but not both.

Me![LEAD1].Object.AutoRepaint = False
Me![LEAD1].Object.FrameThickness = 2
Me![LEAD1].Object.FrameColor = RGB(0, 0, 0)
Me![LEAD1].Object.FrameInnerStyle = EFX_INNERSTYLE_INSET
Me![LEAD1].Object.FrameOuterStyle = EFX_OUTERSTYLE_INSET
Me![LEAD1].Object.FrameInnerHiliteColor = RGB(255, 255, 0)   'Yellow
Me![LEAD1].Object.FrameInnerShadowColor = RGB(128, 128, 128) 'Dark Gray
Me![LEAD1].Object.FrameOuterHiliteColor = RGB(255, 0, 0)    'Red
Me![LEAD1].Object.FrameOuterShadowColor = RGB(192, 192, 192) 'Light Gray
Me![LEAD1].Object.FrameInnerThickness = 3
Me![LEAD1].Object.FrameOuterThickness = 3
Me![LEAD1].Object.ForceRepaint