主题：mht文件用WebBrowser控件能否打开，与什么有关？

经测试，发现mht文件用WebBrowser控件（在64位win10 谷歌浏览器 这样的环境下）可以打开，在32位win7 360浏览器环境下 打不开？请问WebBrowser控件打开mht格式文件和电脑安装的系统和浏览器有关系吗？

WebBrowser控件使用的是IE内核，和其它外部浏览器没有关系。电脑安装最新版的IE11

如何用代码检验是否为IE11

检测不了

Private Shared Sub SetWebBrowserFeatures(ByVal ieVersion As Integer)

    If LicenseManager.UsageMode <> LicenseUsageMode.Runtime Then Return

    ‘Get the program and name

    Dim appName = System.IO.Path.GetFileName(System.Diagnostics.Process.GetCurrentProcess().MainModule.FileName)

    ‘Get the value of the browser‘s mode

    Dim ieMode As UInt32 = GeoEmulationModee(ieVersion)

    Dim featureC

    ‘Set the browser to run the app (appName) in what mode (ieMode)

    Registry.SetValue(featureControlRegKey & "FEATURE_BROWSER_EMULATION", appName, ieMode, RegistryValueKind.DWord)

    ‘enable the features which are "On" for the full Internet Explorer browser

    Registry.SetValue(featureControlRegKey & "FEATURE_ENABLE_CLIPCHILDREN_OPTIMIZATION", appName, 1, RegistryValueKind.DWord)

End Sub

 

‘get version

Private Shared Function GetBrowserVersion() As Integer

    Dim browserVersion As Integer = 0

 

    Using ieKey = Registry.LocalMachine.OpenSubKey("SOFTWAREMicrosoftInternet Explorer", RegistryKeyPermissionCheck.ReadSubTree, System.Security.AccessControl.RegistryRights.QueryValues)

        Dim version = ieKey.GetValue("svcVersion")

 

        If version Is Nothing Then

            version = ieKey.GetValue("Version")

            If version Is Nothing Then Throw New ApplicationException("Microsoft Internet Explorer is required!")

        End If

 

        Integer.TryParse(version.ToString().Split("."c)(0), browserVersion)

    End Using

 

    If browserVersion < 7 Then

        Throw New ApplicationException("Not Support!")

    End If

 

    Return browserVersion

End Function

 

Private Shared Function GeoEmulationModee(ByVal browserVersion As Integer) As UInt32

    Dim mode As UInt32 = 11000

 

    Select Case browserVersion

        Case 7

            mode = 7000

        Case 8

            mode = 8000

        Case 9

            mode = 9000

        Case 10

            mode = 10000

        Case 11

            mode = 11000

    End Select

 

    Return mode

End Function