將C＃轉換為vb.net Webbrowser

Question

試圖將此C＃轉換為具有webbrowser控件的vb.net，但感到困惑。 該代碼在用戶控件中。

C＃

 private void SetupEvents()
    {
        webBrowser1.Navigated += new WebBrowserNavigatedEventHandler(webBrowser1_Navigated);
        webBrowser1.GotFocus += new EventHandler(webBrowser1_GotFocus);
    }

 [Browsable(true)]
    public override Color BackColor
    {
        get
        {
            return base.BackColor;
        }
        set
        {
            base.BackColor = value;
            if (ReadyState == ReadyState.Complete)
            {
                SetBackgroundColor(value);
            }
        }
    }



public HtmlDocument Document
        {
            get { return webBrowser1.Document; }
        }

錯誤“已導航公共事件（作為對象發送，作為System.Windows.Forms.WebBrowserNavigatedEventArgs發送）”是一個事件，不能直接調用。 使用“ RaiseEvent”語句引發事件。

請幫忙

Answer 1

假設webBrowser1_Navigated和webBroswer1_GotFocus是同一類中的方法，則在SetupEvents（）方法中：

AddHandler WebBrowser1.Navigated, AddressOf webBrowser1_Navigated
AddHandler WebBrowser1.GotFocus, AddressOf webBrowser1_GotFocus

Answer 2

您必須使用AddHandler關鍵字而不是+ =來設置事件處理程序。

Answer 3

試試這個代碼：

Private Sub SetupEvents()
    AddHandler webBrowser1.Navigated, AddressOf Me.webBrowser1_Navigated
    AddHandler webBrowser1.GotFocus, AddressOf Me.webBrowser1_GotFocus
End Sub    
<Browsable(true)>  _
Public Overrides Property BackColor As Color
    Get
        Return MyBase.BackColor
    End Get
    Set
        MyBase.BackColor = value
        If (ReadyState = ReadyState.Complete) Then
            SetBackgroundColor(value)
        End If
    End Set
End Property

Public ReadOnly Property Document As HtmlDocument
    Get
        Return webBrowser1.Document
    End Get
End Property

Private Sub SetupEvents()
    AddHandler webBrowser1.Navigated, AddressOf Me.webBrowser1_Navigated
    AddHandler webBrowser1.GotFocus, AddressOf Me.webBrowser1_GotFocus
End Sub