使用vb.net在word中添加超链接

Question

我目前正在尝试通过VB程序在word中添加一个指向web url的超链接。我跌跌撞撞地试图找到正确的语法和完成此任务所需的内容，因为我已经得到了许多毫无帮助的VBA示例，而这些示例根本不是我所需要的。

我的代码如下所示：

sPara2 = oDoc.Content.Paragraphs.Add
sPara2.Range.Text = attachmentRdr("attachmentName")
sPara2.Range.Hyperlinks.Add(attachmentRdr("attachmentPath"))
sPara2.Format.SpaceAfter = 24    '24 pt spacing after paragraph.
sPara2.Range.InsertParagraphAfter()

其中attachmentRdr是从数据库读取文本字符串(附件名称和路径)的sqlDatareader。如果我运行它，我会得到一个错误的参数(从hyperlinks.add()得到处理)。

Answer 1

将range作为第一个参数传递给Add函数，后跟您的URL：

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