在 VBA 中直接引用用户窗体条目，而不是将值传递给变量

Question

伙计们。我是编程新手，但我正在编写一些宏来帮助管理我的工作共享 Excel 工作簿。

我正在为需要访问此工作簿的人员实施几个不同的用户角色。安全性不是很关键，只是为了防止人们意外地对他们不应该做的事情进行（和保存）更改。我只是有一个用户窗体提示输入密码，并根据输入的内容授予适当的访问权限。

我已将其写入，以便用户在 UserForm 上的文本框中输入直接引用为 Me.textboxPasswordEntry.Value 以进行任何比较。我突然想到这可能不是最佳实践，但我无法说明原因。也许我只是想多了？同时，声明一个变量，将值传递给变量，然后进行分析，这似乎很愚蠢和浪费。

下面的 Sub 来自用户窗体，我将其包含在内是为了向您展示我的意思。这是一个非常直接的场景，我知道，但是如果我通过更复杂的练习继续这种练习，我是否会遇到麻烦？如果是这样，我可能会遇到什么样的问题？

谢谢。

Private Sub buttonOK_adminPW_Click()
'The subs SetUserType_[level] are in the ChangeUserType module
'AdminPass and DesignPass are module-level variables set on UserForm initialization
'Default user type is User. Read-only access.
'Admins can edit the workbook, but must save via a macro to ensure
'   things are reset properly for Users (some sheets hidden, etc.)
'Designers can edit the workbook, but also have full ability to save using
'   the regular file menu/ctrl+s/etc.

    Application.ScreenUpdating = False
    Select Case Me.textboxPasswordEntry.Value
        Case AdminPass
            'Shows right control buttons and unlocks the wkbk for admin access
            SetUserType_admin
            Unload Me
        Case DesignPass
            'Shows all control buttons and unlocks the wkbk for designer access
            SetUserType_design
            Unload Me
        Case Else
            MsgBox ("Password incorrect. Please retry.")
            With Me.textboxPasswordEntry
                .Value = ""
                .SetFocus
            End With
    End Select
    Application.ScreenUpdating = True
End Sub

Answer 1

是的，这些年来我也思考过用户表单的“最佳实践”……我想这只是通过经验，我最常使用以下方法：

1. 在用户窗体本身中使用尽可能少的代码（思考 是，如果表单尽可能少，它就更“可重用” 回到它的父级......它存在的原因只是为了获得输入）
2. 请在表单的“激活”事件上使用代码来清除所有 表单上的字段（这在表单中是有意义的，因为那时 您无需记住要清除的表单上的每个控件 你使用它的每一点）
3. 直接引用来自 您调用代码中的表单（即 stPassword = userform1.tbPassword.value) 或...
4. 在 userform ...即在userform中的所有代码声明“public stPasswordInput as string”之前，您可以在调用代码中引用例如stPassword = userform1.stPasswordInput

不过，我很想看看其他人的建议！