允许事件在表单上工作的最佳方法

Question

在 VBA 中，我有一个子表单，可用于许多表单；但是我有一些代码，我只希望这个代码在“一种形式”上工作；因此，如果我在表单 1、表单 2 和表单 3 中有带有文本框的子表单，我希望更新后事件仅适用于表单 2。

最好的方法是什么？

Answer 1

子表单具有Parent 属性。所以你可以检查子表单的Parent 的Name 属性。

Dim strParent As String
strParent = Me.Parent.Name
If strParent = "form 2" Then
    ' do stuff for form 2
End If

注意事项：

1. 该代码用于子表单上文本框的更新后事件。如果目标文本框出现在父表单上，那就更简单了；只需直接检查父表单的名称 (Me.Name)。
2. 如果子窗体是单独打开的，即不是作为另一个窗体的子窗体，Me.Parent 将抛出错误。然后，您需要捕获该错误并忽略它。