Question

我是vb 6.0的新手。

我必须在vb的web浏览器控件中打开除Internet Explorer之外的任何浏览器（默认情况下打开IE）

我尝试了很多代码，现在我可以打开浏览器，就像它是新窗口一样（通过使用process.start等）

有没有办法在现有的vb控件中打开它？

Answer 1

Web浏览器控件是Internet Explorer。因此，除非chrome等人发布了他们浏览器的ActiveX控件，否则这是不可能的。

有一种解决方法是启动chrome然后将其挂钩到CreateWindowsEx并将您的Apps窗口作为所有者。然后使用Yii::setAlias('@tests', dirname(__DIR__) . '/tests'); $params = require(__DIR__ . '/params.php'); $db = require(__DIR__ . '/db.php'); return [ 'id' => 'basic-console', 'basePath' => dirname(__DIR__), 'bootstrap' => ['log', 'gii'], 'controllerNamespace' => 'app\commands', 'modules' => [ 'gii' => 'yii\gii\Module', ], 'components' => [ 'mailer' => [ 'class' => 'yii\swiftmailer\Mailer', 'viewPath' => '@app/mail', // send all mails to a file by default. You have to set // 'useFileTransport' to false and configure a transport // for the mailer to send real emails. 'useFileTransport' => false, 'transport' => [ 'class' => 'Swift_SmtpTransport', 'host' => '...', 'username' => '...', 'password' => '...', 'port' => '...', //'encryption' => 'tls', ], ], 'cache' => [ 'class' => 'yii\caching\FileCache', ], 'authManager' => [ 'class' => 'yii\rbac\DbManager', ], 'log' => [ 'targets' => [ [ 'class' => 'yii\log\FileTarget', 'levels' => ['error', 'warning'], ], ], ], 'db' => $db, ], 'params' => $params, ];调整Web浏览器控件的大小。这提供了以下功能

拥有的窗口始终位于Z顺序中的所有者之上。
系统会在其所有者被销毁时自动销毁拥有的窗口。
拥有的窗口在其所有者最小化时隐藏。

Answer 2

Private Sub Command1_Click()

  sAppName = "Google Chorme"
  sAppPath = "C:\Users\082043\AppData\Local\Google\Chrome\Application\chrome.exe"


    Shell sAppPath, vbMinimizedFocus

End Sub

Answer 3

'您可以尝试以下代码来调用默认浏览器（适用于VB 6）

'将它置于最顶部，但低于'选项'声明

私有声明函数ShellExecute Lib“shell32.dll”别名“ShellExecuteA”（ByVal hwnd As Long，ByVal lpOperation As String，ByVal lpFile As String，ByVal lpParameters As String，ByVal lpDirectory As String，ByVal nShowCmd As Long ）长期

'将此位置放置在'Sub'的位置'这将调用默认浏览器转到google.com。

私有子cmdBUTTON_Click（）

ShellExecute 0＆amp;，vbNullString，“http://www.google.com”，vbNullString，vbNullString，10

结束次

'你可以在这里找到有关变量的信息

“https://msdn.microsoft.com/en-us/library/windows/desktop/bb762153(v=vs.85).aspx

在vb“web浏览器控件”中打开chrome浏览器

3 个答案: