Grant access over a button via login security level

[guestbb]

I have a table with usernames, passwords and security levels in form of number 1,2,3...
What I want is when you open a database using a login form where you enter you username and password,and you login that based on your security level you are allowed, when clicking on certain buttons to open forms, or if you dont have big enough security level to not be able to open them.
I am using a VBA code for a login screen from a video on youtube (https://youtu.be/356ylQn6kkA) where he uses recordsets to find users (VBA code for it below).
So where I need help is with connecting the security level with the buttons so if they dont open if security level is less then 2 for example.
Is there anything I should add to the login code, and how can I code buttons to check for the security level. My problem is that I dont know how to get to the security level number of the person that is login so that it would check it.

Code for login screen button

Private Sub btnLogin_Click()
    Dim rs As Recordset
    
    Set rs = CurrentDb.OpenRecordset("tbl1Employees", dbOpenSnapshot, dbReadOnly)
    
    rs.FindFirst "UserName='" & Me.txtUserName & "'"
    
    If rs.NoMatch Then
        Me.lblWrongUser.Visible = True
        Me.txtUserName.SetFocus
        Exit Sub
    End If
    Me.lblWrongUser.Visible = False
    
    If rs!Password <> Nz(Me.txtPassword, "") Then
        Me.lblWrongPass.Visible = True
        Me.txtPassword.SetFocus
        Exit Sub
    End If
    Me.lblWrongPass.Visible = False
    DoCmd.OpenForm "frmMain"
    DoCmd.Close acForm, Me.Name
End Sub

 

[jdraw]

See this link for some ideas.

 

[GinaWhipp]

And here...
http://www.access-diva.com/f7.html (more links at the bottom)