为什么?未找到方法:“Void System.Collections.Generic.Dictionary`2.System.Collections.Generic.ICollection.Add(!0)”

发布于 2024-10-20 17:38:11 字数 1279 浏览 2 评论 0原文

我在标有“<<<”的行上收到以下错误

Method not found: 'Void System.Collections.Generic.Dictionary`2.System.Collections.Generic.ICollection<TKey>.Add(!0)'.

这是代码。

请注意,uiControl 包含对 UI 控件的引用,而 eventHandler 并不是什么都没有。

    Public Function AddControlChangedEventHandler(ByVal uiControl As Control, _
                                                  ByVal eventName As String) As Boolean

        'determine which value changed event handler this control accepts...
        Dim eventHandler As EventInfo = GetControlValueChangedEventHandler(uiControl, eventName)
        Dim eventSubscribed As Boolean = eventHandler IsNot Nothing

        'if I found it
        If eventSubscribed Then

            Try

                '...subscribe to it
                SubscribeToChangedEvent(uiControl, eventHandler) '<<<<<<

            Catch ex As Exception

                'uh oh, control doesn't support
                'this event name
                eventSubscribed = False

            End Try

        End If

        Return eventSubscribed

    End Function

End Sub 

Private Sub SubscribeToChangedEvent(ByVal uiControl As Control, ByVal eventHandler As EventInfo)

   'details removed

End Sub

I am getting the following error on the line that is marked with "<<<"

Method not found: 'Void System.Collections.Generic.Dictionary`2.System.Collections.Generic.ICollection<TKey>.Add(!0)'.

Here's the code.

Note that uiControl contains reference to a UI control and eventHandler is not nothing.

    Public Function AddControlChangedEventHandler(ByVal uiControl As Control, _
                                                  ByVal eventName As String) As Boolean

        'determine which value changed event handler this control accepts...
        Dim eventHandler As EventInfo = GetControlValueChangedEventHandler(uiControl, eventName)
        Dim eventSubscribed As Boolean = eventHandler IsNot Nothing

        'if I found it
        If eventSubscribed Then

            Try

                '...subscribe to it
                SubscribeToChangedEvent(uiControl, eventHandler) '<<<<<<

            Catch ex As Exception

                'uh oh, control doesn't support
                'this event name
                eventSubscribed = False

            End Try

        End If

        Return eventSubscribed

    End Function

End Sub 

Private Sub SubscribeToChangedEvent(ByVal uiControl As Control, ByVal eventHandler As EventInfo)

   'details removed

End Sub

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文