大家好，vb打开谷歌浏览器相信很多的网友都不是很明白，包括vbs打开谷歌浏览器也是一样，不过没有关系，接下来就来为大家分享关于vb打开谷歌浏览器和vbs打开谷歌浏览器的一些知识点，大家可以关注收藏，免得下次来找不到哦，下面我们开始吧！

本文目录

1. vb在ie不是默认浏览器的情况下怎样打开网页
2. 谷歌浏览器 win7任务栏出现两个图标
3. VB如何获得浏览器地址栏全部内容。
4. VB有人有办法控制Chrome内核的浏览器吗
5. 怎么用VB打开网页
6. 电脑XP系统的IE浏览器打不开
7. VB文件夹浏览器控件有吗

一、vb在ie不是默认浏览器的情况下怎样打开网页

默认浏览器不是IE浏览器，VB可以打开自行设置的默认浏览器来浏览网页。

代码1）用Shell函数直接调用explorer.exe来打开网页。

strOpen=Shell("explorer.exe"&Text1,1)

Text1=""

EndSub

代码2）使用Api函数ShellExecute实现打开网页。

代码2）使用Api函数ShellExecute实现打开网页。

PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"(ByValhwndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDirectoryAsString,ByValnShowCmdAsLong)AsLong

PrivateSubOpenUrl(tUrlAsString)

ShellExecuteMe.hwnd,"Open",tUrl,0,0,0

Text1=""

EndSub

两种方式都能在设置谷歌浏览器为默认浏览器状况下，打开想看的网页。

两种方式都能在设置谷歌浏览器为默认浏览器状况下，打开想看的网页。

二、谷歌浏览器 win7任务栏出现两个图标

1、一般情况下，要么是chrome设置了google账户，要么是快捷方式锁定。

2、如果不需要登录google账户，建议就使用默认的。快捷方式锁定到任务栏的话，就没办法调用，所以会出现一个新的栏，这种情况下建议找到chrome运行程序的原地址，然后直接添加到任务栏。

3、或者，卸载再重新安装，卸载的时候注意完全卸载干净，包括注册表。

三、VB如何获得浏览器地址栏全部内容。

窗体中添加一个List控件一个按钮

EnumWindows AddressOf enumproc, 0

Public Declare Function EnumWindows Lib"user32"(ByVal lpEnumFunc As Long, ByVal lParam As Long) As Long

''枚举窗口列表中的所有父窗口（顶级和被所有窗口）

Public Declare Function GetWindowText Lib"user32" Alias"GetWindowTextA"(ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long'取得指定窗口的司法题

Public Declare Function GetClassName Lib"user32" Alias"GetClassNameA"(ByVal hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long'为指定的窗口取得类名

Public Declare Function GetWindow Lib"user32"(ByVal hwnd As Long, ByVal wCmd As Long) As Long'取得窗口句柄

Declare Function SendMessage Lib"user32" Alias"SendMessageA"(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long'发送消息

Public Function enumproc(ByVal app_hwnd As Long, ByVal lParam As Long) As Boolean

length= GetWindowText(app_hwnd, buf, Len(buf))

If InStr(title,"Internet Explorer") Then

Public Function getziwin(window_hwnd As Long) As String

buflen= GetClassName(window_hwnd, buf, buflen)

buf= Left$(buf, buflen)'取得子窗口的类名

If Right(buf, 4)="Edit" Then'判断是否为地址栏子窗口

getziwin= getwintext(window_hwnd)

child_hwnd= GetWindow(window_hwnd, gw_child)'取得第 1个子窗口的句柄

Do While child_hwnd<> 0'如果有子窗口

num_children= num_children+ 1

ReDim Preserve children(1 To num_children)

children(num_children)= child_hwnd

child_hwnd= GetWindow(child_hwnd, gw_hwndnext)'取得下一个兄弟窗口的句柄

Public Function getwintext(window_hwnd As Long) As String'取得子窗口的值

'通过 sendmessage发送 wm_gettext取得 ie地址栏的值

If window_hwnd= 0 Then Exit Function

txtlen= SendMessage(window_hwnd, wm_gettextlength, 0, 0)

If txtlen= 0 Then Exit Function

txtlen= SendMessage(window_hwnd, wm_gettext, txtlen, ByVal txt)

getwintext= Left$(txt, txtlen)

Form1.List1.AddItem getwintext

四、VB有人有办法控制Chrome内核的浏览器吗

首先为什么需要使用webkit或chrome浏览器内核？本人之前一直使用IE控件中的IE浏览器，对于简单的开发已经够用了，但是IE有它的诟病，特立独行，对HTML5新特性兼容性非常差，由于近期在研究HTML5以及2.5D和3D地图相关技术，所以一开始就摒弃了使用IE内核的想法。关于windows下使用chrome浏览器内核或webkit内核，已经专研了好几天，一直在碰壁，我相信也有不少网友也跟我一样，查阅了几天都没有任何进展，下面我说说这几天查阅资料遇到的问题：

（1）关于webkit或chrome相关源码都需要编译，而且编译环境相当复杂，很多时候按照文章流程走，要么走不通，要么出一连串解决不了的错误，最终心灰意冷，直到放弃（大多数搞windows开发的在编译这块都缺少相关经验，不比linux开发员）；

（2）能找到人家已经编译好的webkit或chrome内核库，但是不是最新的库，很多都是2012年之前的，太老的，对于近几年HTML5的飞速发展，我想那些陈旧的库已经不再适用了。

五、怎么用VB打开网页

方法1)可用Shell函数执行一个可执行文件explorer.exe来打开网页。

执行一个可执行文件，返回一个 Variant

(Double)，如果成功的话，代表这个程序的任务 ID，若不成功，则会返回 0。

Shell"explorer.exe "

方法2)使用WebBrowser直接建立浏览器。

在 Visual Basic里还可以向工程中增加其它类型的 Internet功能，包括：

Visual Basic应用程序的 Internet扩展。可以使用一些特殊控件，它们提供了和Internet有关的功能。这些控件包括

Internet Transfer控件、 WebBrowser控件，以及 WinSock控件。

WebBrowser1.Navigate""

六、电脑XP系统的IE浏览器打不开

IE浏览器出现问题的原因多种多样，像楼主这样的情况，很有可能是操作过程中导致IE组件或者注册表出了问题，当然也可能是由于某些加载项IE不兼容或者兼容性不好。在确定网络链接没有问题的前提下（您可以在电脑管家主界面右下角的工具箱里点击测试网速，测试即时网速）。最便捷的方法就是使用电脑管家的电脑诊所一键修复功能，这是腾讯电脑管家为修复IE浏览器定制的专修工具，楼主点击上方绿色的【立即修复】按钮即可。

附：手动修复步骤（来源：腾讯电脑管家电脑诊所，自动修复请点击上方的【立即修复】）

1.打开IE浏览器→点击【工具】→【Internet选项】→【删除】：

2.勾选所有选项→点击【确定】→在确认窗口中点击【确定】(如使用其他浏览器，请用类似方法清除浏览器缓存)

1.点击【开始】菜单→在搜索框中输入"cmd"→按键盘enter(回车)键：

2.在弹出的黑色窗口中，按顺序输入以下内容，按键盘enter(回车)键，再逐一完成以下全部部件注册：

建议点击本回答上侧【立即修复】按钮，使用电脑诊所一键自动完成所有修复步骤。

1.点击【开始】菜单→在搜索框中输入"regedit"→按键盘enter键：

2.定位到\HKEY_ROOT\IE.HTTP\shell，双击打开右侧【(默认)】将默认值设置为空→点击【确定】：

3.根据前2个步骤，依次设置如下注册表项

3.1.设置\HKEY_CLASSES_ROOT\IE.HTTP\shell\open\command默认值为""C:\Program Files\Internet Explorer\iexplore.exe"-nohome"（64位系统则，设置为"\%ProgramFiles(x86)%\Internet Explorer\iexplore.exe-nohome"）(不包括最外层的双引号)类型为REG_SZ

3.2.设置\HKEY_CLASSES_ROOT\IE.HTTP\shell\open\ddeexec默认值为""%1",,-1,0,,,,"(不包括最外层的双引号)类型为REG_EXPAND_SZ

3.3.设置\HKEY_CLASSES_ROOT\IE.HTTP\shell\open\ddeexec\Application默认值为"IExplore"(不包括最外层的双引号)类型为REG_SZ

3.4.设置\HKEY_CLASSES_ROOT\IE.HTTP\shell\open\ddeexec\Topic默认值为"WWW_OpenURL"(不包括最外层的双引号)类型为REG_SZ

3.5.设置\HKEY_CLASSES_ROOT\http\shell\open\command默认值为"%programFile%\internet explorer\iexplore.exe-nohome"（64位系统则，设置为"\%ProgramFiles(x86)%\Internet Explorer\iexplore.exe-nohome"）(不包括最外层的双引号)类型为REG_SZ

3.6.设置\HKEY_CLASSES_ROOT\http\shell\open\ddeexec默认值为""%1",,-1,0,,,,"(不包括最外层的双引号)类型为REG_EXPAND_SZ

3.7.设置\HKEY_CLASSES_ROOT\http\shell\open\ddeexec\Application默认值为"IExplore"(不包括最外层的双引号)类型为REG_SZ

3.8.设置\HKEY_CLASSES_ROOT\http\shell\open\ddeexec\Topic默认值为"WWW_OpenURL"(不包括最外层的双引号)类型为REG_SZ

1.打开IE浏览器→点击【工具】→【Internet选项】

2.点击【隐私】→将【选择Internet区域设置】调为【中】→点击【确定】：

方案五：关闭GPU加速（适用于IE9以上版本）

1.打开IE浏览器→点击【工具】→【Internet选项】

2.点击【高级】→勾选【使用软件呈现而不使用GPU呈现*】→点击【确定】：

如果以上诉步骤未能生效，再进入后续步骤：

（说明：如果您使用网络代理或者对浏览器有特殊设置，请保存设置后再进行操作）

1.打开IE浏览器→点击【工具】→【Internet选项】

2.点击【高级】→点击【重置】→勾选【删除个性化设置】→点击【确定】→【确定】：

1.打开【电脑管家】→选择【软件管理】→点击【软件仓库】→输入"Internet Explorer"开始搜索→点击【修复】（IE8以下的版本可以直接点击【下载】）：

2.安装时根据提示选择【我不想立即参与(O)】→点击【下一步(N)】→点击【我同意(A)】

1.不勾选【安装更新(I)】→【下一步(N)】→点击【立即重新启动(推荐)(H)】

方案八：安装其他浏览器后设置其他浏览器为默认浏览器

1.打开电脑管家→点击【软件管理】，在搜索框中输入"谷歌浏览器"→找到软件后点击安装

2.打开电脑管家→点击【工具箱】，点击【默认程序设置】→在上网浏览器列表中选择【谷歌浏览器】：

注：腾讯电脑管家为IE浏览器出错崩溃问题定制部分修复步骤，因为操作过于繁杂，故未全部列出。若问题仍未解决，建议点击本回答上侧的【立即修复】按钮，进行深度修复。

如果还有其它问题，欢迎来电脑管家企业平台咨询，我们会尽快为您解决哦~~

腾讯电脑管家企业平台：

七、VB文件夹浏览器控件有吗

Visual Basic 6.0WebBrowser控件（也称作 Microsoft Internet控件或 Shdocvw.dll）是一种 ActiveX控件，使用它可以在应用程序内承载 Internet Explorer。

Visual Basic 2008WebBrowser控件为WebBrowserActiveX控件提供了托管包装。这样，便可以在 Windows窗体客户端应用程序中显示网页。使用WebBrowser控件，可以复制应用程序中的 Internet Explorer Web浏览功能，还可以禁用默认的 Internet Explorer功能，并将该控件用作简单的 HTML文档查看器。此外，可以使用该控件将基于 DHTML的用户界面元素添加到窗体中，还可以隐瞒这些元素在WebBrowser控件中承载的事实。通过这种方法，可以将 Web控件和 Windows窗体控件无缝地整合到一个应用程序中。

Visual Basic 6.0 Microsoft Internet控件由两个组件组成：WebBrowser控件和Internet Explorer对象，使用它们可以通过 OLE自动化来控制 Internet Explorer的实例。

Visual Basic 2008中没有Internet Explorer对象的等效项，与其相关的属性、方法和事件也不再存在。不再支持 OLE自动化；使用类似 VBScript的脚本语言可以控制 Internet Explorer的外部实例。

在 Visual Basic 6.0中，Document属性返回包含 HTML文档名称的字符串；在 Visual Basic 2008中，该属性返回 HTML文档本身。

Visual Basic 6.0Refresh2方法带有一个用于指定刷新级别的参数；Visual Basic 2008Refresh方法带有一个可用于指定刷新级别的可选参数。

WebBrowser控件的属性、方法和事件的等效项

关于本次vb打开谷歌浏览器和vbs打开谷歌浏览器的问题分享到这里就结束了，如果解决了您的问题，我们非常高兴。