ControlCollection.AddWebBrowser 方法 (Range, Single, Single, String) (2007 system)

项目
09/04/2008

更新：2007 年 11 月

按照指定的大小和位置向文档中添加一个新的 WebBrowser 控件。

命名空间： Microsoft.Office.Tools.Word
程序集： Microsoft.Office.Tools.Word.v9.0（在 Microsoft.Office.Tools.Word.v9.0.dll 中）

语法

声明
Public Function AddWebBrowser ( _
    range As Range, _
    width As Single, _
    height As Single, _
    name As String _
) As WebBrowser
用法
Dim instance As ControlCollection
Dim range As Range
Dim width As Single
Dim height As Single
Dim name As String
Dim returnValue As WebBrowser

returnValue = instance.AddWebBrowser(range, _
    width, height, name)

public WebBrowser AddWebBrowser(
    Range range,
    float width,
    float height,
    string name
)

参数

range
类型：Microsoft.Office.Interop.Word.Range

提供控件的位置的 Range。

width
类型：System.Single

控件的宽度（以磅为单位）。

height
类型：System.Single

控件的高度（以磅为单位）。

name
类型：System.String

可用于索引 ControlCollection 实例中控件的名称。

返回值

类型：Microsoft.Office.Tools.Word.Controls.WebBrowser

添加到 ControlCollection 实例的 WebBrowser 控件。

异常

异常	条件
ArgumentNullException	name 或 range 参数为 nullnull 引用（在 Visual Basic 中为 Nothing），或者 name 参数长度为零。
ControlNameAlreadyExistsException	ControlCollection 实例中已存在一个同名控件。
InvalidRangeException	指定的范围无效。

备注

此方法使您能够将 WebBrowser 对象添加到 ControlCollection 的末尾。

若要移除通过编程方式添加的 WebBrowser，请使用 Remove 方法。

示例

下面的代码示例向文档的第一个段落添加一个 WebBrowser 控件，然后导航至 www.microsoft.com。

Private Sub WordRangeAddWebBrowser()
    Me.Paragraphs(1).Range.InsertParagraphBefore()
    Dim WebBrowser1 As Microsoft.Office.Tools.Word.Controls. _
        WebBrowser = Me.Controls.AddWebBrowser( _
        Me.Paragraphs(1).Range, 450, 400, "WebBrowser1")
    WebBrowser1.Navigate("https://www.microsoft.com")

End Sub

private void WordRangeAddWebBrowser()
{
    this.Paragraphs[1].Range.InsertParagraphBefore();
    Microsoft.Office.Tools.Word.Controls.WebBrowser
        webBrowser1 = this.Controls.AddWebBrowser(
        this.Paragraphs[1].Range, 450, 400, "webBrowser1");
    webBrowser1.Navigate("https://www.microsoft.com");
}