Insert Hyperlink to Word in VB.NET

Insert Hyperlink to Word in VB.NET

程序代码：

Dim range As Microsoft.Office.Interop.Word.Range
range = Me.Application.Selection.Range
range.Hyperlinks.Add(range, "http://www.tiancao.net")

程序代码：

    '插入超链接，换行
    Public Sub AddURL(ByVal Display As String, ByVal URL As String)
        Dim R As Microsoft.Office.Interop.Word.Range
        R = W.Selection.Range
        R.Hyperlinks.Add(W.Selection.Range, URL, , , Display)
    End Sub