在VB.NET项目中使用GeckoWebBrowser（v45.0.34.0）

Question

我试图使GeckoWebBrowser（版本45.0.34.0）控件工作到我的VB.NET项目，没有运气！

这是我遵循的步骤......

1.我右键单击我的项目到解决方案资源管理器列表，然后管理NuGet包。

2.我找到并安装了Geckofx45。

3.然后我进入Project的属性，进入Compile选项卡，然后将Target CPU更改为x86。

4.我重建我的项目。

5.然后通过从GeckoWebBrowser文件夹中选择Geckofx-Winforms.dll文件，将...\packages\Geckofx45.45.0.34\lib\net45控件添加到我的工具箱中。

6.我将GeckoWebBrowser控件添加到我的表单中，只是为了测试，我将GeckoWebBrowser1.Navigate("www.google.com")添加到我的表单的Load事件中。

7.我开始我的应用程序，我什么都没得到！

有什么步骤我想念或什么？

Answer 1

在通过互联网进行了令人筋疲力尽的研究之后，我设法让它发挥作用！以下是任何想要将GeckoWebBrowser用于他/她的VB.NET项目的人的步骤。

1.创建一个新的VB.NET项目或只打开一个现有项目。

2.转到菜单项目，然后单击管理NuGet包。

3.单击“浏览”选项卡，然后搜索Geckofx45。

4.选择带描述的库：允许在C＃应用程序中嵌入gecko的库，然后单击Install按钮。

5.关闭NuGet窗口并转到项目的属性。

6.在Application选项卡中，单击View Application Events按钮。

7.删除那里的所有内容并粘贴这部分代码并保存。

Imports Gecko
Imports System.IO
Namespace My
    ' The following events are available for MyApplication:
    '
    ' Startup: Raised when the application starts, before the startup form is created.
    ' Shutdown: Raised after all application forms are closed.  This event is not raised if the application terminates abnormally.
    ' UnhandledException: Raised if the application encounters an unhandled exception.
    ' StartupNextInstance: Raised when launching a single-instance application and the application is already active.
    ' NetworkAvailabilityChanged: Raised when the network connection is connected or disconnected.
    Partial Friend Class MyApplication
        Protected Overrides Function OnStartup(ByVal eventArgs As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) As Boolean
            Dim ProfileDirectory As String = My.Application.Info.DirectoryPath & "\Firefox\Profile"
            If Not Directory.Exists(ProfileDirectory) Then
                Directory.CreateDirectory(ProfileDirectory)
            End If
            Xpcom.ProfileDirectory = ProfileDirectory
            Gecko.Xpcom.Initialize("Firefox")
            Return True
        End Function
    End Class
End Namespace

8.现在，返回项目属性，单击Compile选项卡并将Target CPU值设置为x86。

9.构建或重建您的项目。

10A。要将GeckoWebBrowser控件添加到工具箱中，首先要创建一个新的Tab，然后命名GeckoFX 45或任何你喜欢的名称。

10B。右键单击它，然后单击选择项目。

10B。进入.NET Framework组件，然后单击“浏览”按钮。

10C。将Geckofx-Winforms.dll找到your-project-folder\packages\Geckofx45.45.0.34\lib\net45\并单击“打开”按钮。

10D。确保选中GeckoWebBrowser，然后单击“确定”。

Answer 2

可能有一年太晚，针对x64的变体：

第3步和第4步：嵌入GeckoFx 60

第7步：将OnStartup函数替换为：

Protected Overrides Function OnStartup(ByVal eventArgs As ApplicationServices.StartupEventArgs) As Boolean

        Dim m_StartupPath As String = System.Windows.Forms.Application.StartupPath
        Dim m_ProfileDirectory As String = System.IO.Path.Combine(m_StartupPath, "Firefox", "Profile")
        If Not New System.IO.DirectoryInfo(m_ProfileDirectory).Exists Then System.IO.Directory.CreateDirectory(m_ProfileDirectory)
        Xpcom.ProfileDirectory = m_ProfileDirectory

        Dim m_BinDirectory As String = System.IO.Path.Combine(m_StartupPath, "Firefox64")
        Xpcom.Initialize(m_BinDirectory)

        Return True

    End Function

第8步：将项目定位到x64

可以省略步骤10a至10d。