Vba 在一个命令Visual Basic中导航多个浏览器

例如，如果我有三个WebBrowser，我想让他们都导航到google.com，我必须这样做：

 webbrowser1.navigate("google.com")
 webbrowser2.navigate("google.com")
 webbrowser3.navigate("google.com")

---

可以用一行代码来完成吗

您可以使用数组和for循环，如下所示

Dim webbrowser(3) As WebBrowser
    For value As Integer = 0 To 3
        webbrowser(value) = New WebBrowser
        webbrowser(value).Navigate("www.google.com")
    Next

注意：-仅对于3个实例，此代码可能不是必需的，但对于30个实例，它肯定会有所帮助。

子程序：

NavigateTo "google.com"

哪个叫

sub NavigateTo(url as string)
    webbrowser1.navigate(url)
    webbrowser2.navigate(url)
    webbrowser3.navigate(url)
end sub

---

webbrowser1.navigate（“google.com”）：webbrowser2.navigate（“google.com”）：webbrowser3.navigate（“google.com”）

请不要破坏您的帖子。一旦您发布了一个问题，您就已经将内容授权给了Stack Overflow社区（在CC by SA许可下）。如果您想解除此帖子与您帐户的关联，请参阅。