Visual Basic 发件人不作为控制返回答案

【问题标题】：Visual Basic sender not coming back as controlVisual Basic 发件人不作为控制返回
【发布时间】：2014-08-15 20:29:27
【问题描述】：

我有一个包含 2 个表单的 Windows 应用程序。

frmMain 上有一个按钮 (btnEditAgent) 可以打开 frmEditAgent：

Public Sub btnEditAgent_Click(sender As Object, e As EventArgs) Handles btnEditAgent.Click
    frmAgentEdit.ShowDialog()
End Sub

然后在 frmEditAgent 上加载：

Private Sub frmAgentEdit_Load(ByVal sender As Object, e As EventArgs) Handles MyBase.Load

    MsgBox(sender.Name, vbOKOnly, "verify")

End Sub

发件人作为“frmEditAgent”返回，而不是“btnEditAgent”

我不明白为什么会这样。为了让我的其余代码正常工作，我需要知道哪个按钮打开了 frmEditAgent。为什么发件人指的是同一个表单？

【问题讨论】：

【解决方案1】：

Load 事件的发送者是刚刚加载的Form。否则sender 的语义将毫无意义。

这样想：按钮打开表单，但表单自己加载，因此调用自己的Load 事件，将自己作为发送者。

如果您想知道哪个按钮打开了表单，那么您可以在对话框表单的类中添加一个实例变量，然后将该变量设置为btnEditAgent_Click。

frmAgentEdit 然后可以使用该实例变量来知道是哪个按钮导致它被打开。

【讨论】：