在列中访问VBA设置焦点

Question

下午好，

我具有一个带有特定列（ CD_SENHA ）的子表单（ sub_frm_robo2 ）的访问权限。

在表单加载事件中，我输入了代码：（ Me.sub_frm_robo2.Form！SENHA.InputMask =“ Password” ）< / p>

，并且我正在尝试创建一个条件，此列 （ CD_SENHA ）获得焦点（ Me.sub_frm_robo2.Form！SENHA.SetFocus ），

数据掩码被删除（ Me.sub_frm_robo2.Form！SENHA.InputMask =“” ）

，当焦点更改为下一列时，将数据掩码恢复为初始格式（ Me.sub_frm_robo2.Form！PASSWORD =“ Password” ）

下面一些图片可以更好地举例说明

聚焦之前

关注

聚焦后

我认为代码看起来像这样

Do While Me.sub_frm_robo2.SetFocus = True
If Me.sub_frm_robo2.Form!SENHA.SetFocus Then
    Me.sub_frm_robo2.Form!SENHA.InputMask = ""
End If
Next

你能帮我吗？

Answer 1

好吧，我在这里没有任何帮助，但是经过几次尝试和错误，我设法解决了这个问题，只是在subformaluario的每一列中都编写了代码以使其正常工作。祝大家好运

Private Sub CNPJ_AF_GotFocus()

Me.Form!SENHA.InputMask = "Password"

End Sub

Private Sub SENHA_GotFocus()

Me.Form!SENHA.InputMask = ""

End Sub