MS Access Form Events – PT1

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 >>




By the way, if you got or are getting value from the VBA information, please give me a tip, thanks!


These posts may help answer your question too...

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 […]

Simple Custom Progress Bar in Microsoft Access Forms Example

So I had a question come in regarding showing the progress of a task. Access has an ActiveX control that you can use called the ProgressBar and you can follow the guide in the image above to add it to your form. On you long running process you can show the progress bar so the […]

Previous Post

MS Access VBA Control Events – PT1

Next Post

MS Access Form Events – PT2

Leave a Reply

Your email address will not be published. Required fields are marked *