If statement 关于当前事件的表格-访问2013

If statement 关于当前事件的表格-访问2013,if-statement,textbox,If Statement,Textbox,CompName是一个文本框,我在其中输入公司名称,一旦有输入,用户就无法编辑它,除非“txtName is Maxie”中的用户 txtName是一个未绑定的文本框,用于从登录表单获取用户名 问题是,即使txtName包含“Maxie”,CompName文本框仍然被锁定 请帮我解决这个问题 顺便说一句,我在ON CURRENT Event下使用了这段代码。让它与修改后的代码一起工作 Private Sub Form_Current() If Nz(Me!CompName, "") =

CompName是一个文本框,我在其中输入公司名称,一旦有输入,用户就无法编辑它,除非“txtName is Maxie”中的用户 txtName是一个未绑定的文本框,用于从登录表单获取用户名

问题是,即使txtName包含“Maxie”,CompName文本框仍然被锁定

请帮我解决这个问题


顺便说一句,我在ON CURRENT Event下使用了这段代码。

让它与修改后的代码一起工作

Private Sub Form_Current()

   If Nz(Me!CompName, "") = "" Then
      Me!CompName.Locked = False

   Else
    If (txtName = "Maxie") Then
        Me!CompName.Locked = False
        Else
        Me!CompName.Locked = True
    End If
End if
End Sub
Private Sub Form_Current()

Me.Refresh
Dim UserAdmin As String
UserAdmin = "Maxie"

    If Nz(Me!CompName, "") = "" Then
    Me!CompName.Locked = False
    Me.Refresh
    Else
        If (txtName.Value = UserAdmin) Then
             Me!CompName.Locked = False
             Me.Refresh
                Else
                    Me!CompName.Locked = True
                    Me.Refresh
                        End If
   End If
End Sub