You can use your favorite social network to register or link an existing account:
Or use your email address to register without a social network:
Sign in with these social networks:
Or enter your username and password
Forgot your password?
Yes, please link my existing account with for quick, secure access.
No, I would like to create a new account with my profile information.
I often use hidden controls on Access forms and reports to hold intermediate values, temporary "flag" values, and the like. Because these controls are invisible at runtime, it's useful to set their colors to garish combinations (like red fore color over a yellow back color) so that, in design view, it's immediately apparent they're not meant to be viewed by users.
I also use hidden controls as a way of leaving 'comments' about the form or report's design. Because invisible controls are only seen by myself and other developers in design view, a hidden label describing the purpose of a particular control or explaining some unexpected design issue (such as a calculated control) to make it easier for the next person to figure out my logic.
Comments: (3) Collapse
I do exactly the same. Works really well.
I've used these for years. The nice thing about these is that you can set them to visible for testing and see the results for calculated values. If you have a lot of these unbound controls doing calculations, just put them all in the footer. That way you can simply turn the footer visibility on or off. And I typically use a hidden chk box on my forms for data validation. Then create a private sub on the form that I call before allowing the User to leave the record or close the form. If stepping through the validation and all data is complete, the chk box is set to true. See the following close button and data validation example: Private Sub cmdClose_Click() Call ValidateData If Me.chkDataValidated = False Then Cancel = True Exit Sub End If DoCmd.Close End Sub Private Sub ValidateData() Me.chkDataValidated = False Dim stTitle As String stTitle = CurrentDb.Properties("AppTitle") 'Ensure all required data is complete before proceeding. If Not IsNull(Me.DecomProjectID) Then If IsNull(Me.txtProjectNumber) Then 'Project Number MsgBox "You must assign a Project Number before closing or press ESC to cancel.", vbOKOnly, stTitle Me.txtProjectNumber.SetFocus Me.chkDataValidated = False Exit Sub ElseIf IsNull(Me.DecomAddress1) Then 'Address MsgBox "You must assign an address to this project before closing or press ESC to cancel.", vbOKOnly, stTitle Me.chkDataValidated = False Exit Sub ElseIf IsNull(Me.txtprjOwner) Then MsgBox "You must provide an Owner name or press ESC to cancel", vbOKOnly, stTitle Me.txtprjOwner.SetFocus Exit Sub End If End If Me.chkDataValidated = True End Sub
Awesome--thanks for the code, Larry!
Comments: (loading) Collapse