VB System.NullReferenceException未被用户代码处理

时间:2013-05-29 09:20:38

标签: vb.net

以下是代码:

Private Sub GeckoWebBrowser1_Navigated(sender As Object, e As Gecko.GeckoNavigatedEventArgs) Handles GeckoWebBrowser1.Navigated
    ToolStripTextBox1.Text = GeckoWebBrowser1.Url.OriginalString
    **Parent.Text = GeckoWebBrowser1.Site.Name.ToString** 
    ''GeckoWebBrowser1.DocumentTitle.ToString
    ''GeckoWebBrowser1.Site.Name.ToString()
End Sub

如果我启动程序VB,请说我的粗线上的用户代码未处理System.NullReferenceException。

2 个答案:

答案 0 :(得分:0)

尝试将代码更改为:

Private Sub GeckoWebBrowser1_Navigated(sender As Object, e As Gecko.GeckoNavigatedEventArgs) Handles GeckoWebBrowser1.Navigated
    ToolStripTextBox1.Text = GeckoWebBrowser1.Url.OriginalString
    if GeckoWebBrowser1 isnot nothing AndAlso GeckoWebBrowser1.Site isnot nothing then
    Parent.Text = GeckoWebBrowser1.Site.Name.ToString
    ''GeckoWebBrowser1.DocumentTitle.ToString
    ''GeckoWebBrowser1.Site.Name.ToString()
    end if
End Sub

答案 1 :(得分:0)

好的,我有。我把计时器放在

  

Parent.Text = GeckoWebBrowser1.Site.Name.ToString

因为app在加载网站之前不会获得网站名称