In this video I talk about how to program vba object items like the ms access form.
Specifically we look at the Access Form Open Event, and add a password prompt in the open event of the form, cancelling the open event if it is incorrect.
Also we will look at controlling the Form_Load with a public variable and the Form_Current event.
The possibilities for the Form_Current event procedure.
-diplay a message box
-display data in the caption of the form.
-display the customer’s previous order
-display all the books by the publisher (based on publisher id)
-perform form level calculation on form data
Remember:
The Current Event happens before the Load Event.
Option Compare Database
Option Explicit
Public strUser As String
Private Sub Form_Current()
'possibilities for the current record.
'diplay a message box
'display data in the caption of the form.
'display the customer's previous order
'display all the books by the publisher (based on publisher id)
'perform form level calculation on form data
'Caption
If Len(Me.txtTitle) Then
Forms!frmFormEvents.Caption = txtTitle.Value
End If
End Sub
Private Sub Form_Load()
MsgBox "Welcome, " & strUser
End Sub
Private Sub Form_Open(Cancel As Integer)
'happens before the load event
Dim strPassword As String
strUser = InputBox("Enter The User")
strPassword = InputBox("Enter The Password")
If strPassword <> "Password" Then
MsgBox "Incorrect Password"
Cancel = True
End If
End Sub
<< VBA Form Object Event Procedures | MS Access Form Events – PT2 >>
How To Make An Access Form Time Picker
Here is a relatively easy way to select times for your time entry text boxes. It’s a reusable form that allows you to pick a time from an Access form. There are probably different ways to do this but here is the way I would do it. On the form that has the time fields, […]
How to pick a file to load In VBA
Picking a file to load in your Microsoft App is a very important skill to know. In this blog post you will see how to do it. First you need to set a reference to the MS office object library From VBE editor –> select Tools > MS office object library (click check mark) Sub […]
What is the purpose of the Me keyword in Access VBA?
What does the Me keyword mean? “Me” refers to the Access form currently in focus. Instead of writing out the entire form reference, you can just use the keyword “Me” which is easier. Like: Me.txtbox = “I am a textbox on the form that currently has the focus.” or you can update a label’s caption […]
How do I run VBA code when form opens
How do I run VBA code when form opens? There are probably several ways people do it, and some may say “He’s not doing it right. It’s done this way…” Good for you. This is the way I do it now, and it has worked well for me. 1. Find the form you want to […]