Bloquear campo de formulário após autenticar

Preciso Bloquear campo de formulário após autenticar com determinado usuário e como criar essa autenticação, se houver algum exemplo agradeço.

ve se isso te ajuda !

faz a validação se tiver algo no textbox caso não deixa aberto pra validação constituído por 2 form

form 1 (mascara de dados)
Form 2 (se nao tiver entao botao de validação)


.enanbled fica impossibilitado de clicar
.block para não sobre escrever em textbox

em baixo tem um dinâmica de validação.

Código:

If Not IsNull(Forms!PAINEL!data3 = Me.DT_INICIO_ANaLISE_CLaUSULA) = True Then
Forms!PAINEL!data3.Enabled = False
Forms!PAINEL!data3.Visible = True
Forms!PAINEL!validarnome3.Enabled = True
Forms!PAINEL!validarnome3.Visible = True
Forms!PAINEL!Comando2.Enabled = False
Forms!PAINEL!Rótulo26.Visible = False
Forms!PAINEL!Comando2.Visible = True
Else
Forms!PAINEL!data3.Enabled = True
Forms!PAINEL!data3.Visible = False
Forms!PAINEL!validarnome3.Enabled = False
Forms!PAINEL!validarnome3.Visible = False
Forms!PAINEL!Comando2.Enabled = True
End If

botão pra validão

Código:

If IsNull(Me.data1) Then
     If MsgBox("Deseja fazer alteração?", vbQuestion + vbYesNo, "Atenção") = vbYes Then
        Me.data1.Visible = True
        Me.data1 = Date
        Me.validarnome1.Visible = True
        Me.validarnome1 = getUsuarioAtual()
        Me.data1.Enabled = False
        Me.validarnome1.Enabled = False
        Me.Comando0.Enabled = False
        Me.Comando1.Visible = True
        Me.Rótulo25.Visible = True
          
        Dim rs As Recordset
        Set rs = CurrentDb.OpenRecordset("select numeroprest, DT_ENTRADA_CONTRATO_PARA_EQUIPE from planilha1 where numeroprest = " & Me.nmprest & "")
        rs.Edit
        rs("DT_ENTRADA_CONTRATO_PARA_EQUIPE") = Me.data1
        rs.Update
        rs.Close
        
      Else
        Me.data1 = Empty
        MsgBox "Informação Cancelada !!!", vbInformation, "Cancel"

End If
End If
    
End Sub