|
Use your pdf converter to make your pdf files easy! You can now buy software that makes converting pdf to doc possible! Did you know you can even convert pdf to word? Home Page Bloglines 1906 CelebrateStadium 2006 OfficeZealot Scobleizer TechRepublic AskWoody SpyJournal Computers Software Microsoft Windows Excel FrontPage PowerPoint Outlook Word 
Host your Web site with PureHost! 
|
 
Saturday, August 26, 2017 – Permalink – Access Field HighlightingMore codeThis technique can also be applied to controls like option groups. Instead of using OnGotFocus and OnLostFocus events you must use the OnEnter and OnExit events. In addition, the control group's BackStyle property must be set to Normal to take advantage of the Windows color scheme: Function Highlight(Stat As String) As Integer Dim ctrl As Control On Error Resume Next Set ctrl = Screen.ActiveControl If Stat = "GotFocus" Then ctrl.BackColor = vbHighlight ctrl.ForeColor = vbHighlightText ElseIf Stat = "LostFocus" Then ctrl.BackColor = vbWindowBackground ctrl.ForeColor = vbWindowText End If End Function Take advantage of global constants. Just add the following two statements to a module: Global Const Orange = 39423 Global Const LightBlue = 16776960 Then, set the OnGotFocus and OnLostFocus events for the controls in the following format: Private Sub controlName_GotFocus() controlname.BackColor = Orange End Sub Private Sub controlName_LostFocus() controlname.BackColor = LightBlue End Sub Highlight data on forms by using conditional formatting See all Topics access <Doug Klippert@ 3:17 AM
Comments:
Post a Comment
|
