C#/VB.NET 创建图片超链接

超链接(Hyperlink)可以看做是一个“热点”，它可以从当前Web页定义的位置跳转到其他位置，包括当前页的某个位置、Internet、本地硬盘或局域网上的其他文件，甚至跳转到声音、图片等多媒体文件。浏览Web页是超链接最普遍的一种应用，通过超链接还可以获得不同形态的服务，如文件传输、资料查询、电子函件、远程访问等。那么可以直接在Word中添加超链接，当然你也可以选择对图片添加超链接。并且图片超链接更富有趣味性和设计感，更容易吸引读者增加点击率。本文将通过C#程序代码示例做详细介绍，并附上VB.NET代码供参考。下面是具体方法和步骤。

dll文件安装（3种方法）

1.通过NuGet安装dll（2种方法）

1.1可以在Visual Studio中打开“解决方案资源管理器”，鼠标右键点击“引用”，“管理NuGet包”，然后搜索“Free Spire.Doc”，点击“安装”。等待程序安装完成。

1.2将以下内容复制到PM控制台安装。

Install-Package FreeSpire.Doc -Version 9.9.7

2.手动添加dll引用

可通过手动下载包到本地，然后解压，找到BIN文件夹下的Spire.Doc.dll。然后在Visual Studio中打开“解决方案资源管理器”，鼠标右键点击“引用”，“添加引用”，将本地路径BIN文件夹下的dll文件添加引用至程序。

代码思路

创建图片超链接时可参考如下步骤：

• 创建Document类的对象，并通过Document.LoadFromFile()方法加载Word文档。

• 添加文章段落并通过Image.FromFile（）加载图像为DocPicture对象

• 然后通过paragraph.AppendHyperlink（）方法对图片添加超链接

• 最后，调用doc.SaveToFile（）方法保存文档

C#

using System;
using System.Drawing;
using Spire.Doc;
using Spire.Doc.Documents;
using Spire.Doc.Fields;

namespace ConsoleApp6
{
    class Program
    {
        static void Main(string[] args)
        {
            //加载文档
            string input = "BlankTemplate.docx";
            Document doc = new Document();
            doc.LoadFromFile(input);

            Section section = doc.Sections[0];
            //添加文章段落
            Paragraph paragraph = section.AddParagraph();
            //加载图像为DocPicture对象
            Image image = Image.FromFile("Spire.Doc.png");
            DocPicture picture = new DocPicture(doc);
            //对段落添加图片超链接
            picture.LoadImage(image);
            paragraph.AppendHyperlink("https://www.e-iceblue.com/Introduce/word-for-net-introduce.html", picture, HyperlinkType.WebLink);

            //保存文档
            string output = "CreateImageHyperlink.docx";
            doc.SaveToFile(output, FileFormat.Docx);

VB.NET

Imports System
Imports System.Drawing
Imports Spire.Doc
Imports Spire.Doc.Documents
Imports Spire.Doc.Fields

Namespace ConsoleApp6

    Class Program

        Private Shared Sub Main(ByVal args() As String)
            '加载文档
            Dim input As String = "BlankTemplate.docx"
            Dim doc As Document = New Document
            doc.LoadFromFile(input)
            Dim section As Section = doc.Sections(0)
            '添加文章段落
            Dim paragraph As Paragraph = section.AddParagraph
            '     加载图像为DocPicture对象
            Dim image As Image = Image.FromFile("Spire.Doc.png")
            Dim picture As DocPicture = New DocPicture(doc)
            '对段落添加图片超链接
            picture.LoadImage(image)
            paragraph.AppendHyperlink("https://www.e-iceblue.com/Introduce/word-for-net-introduce.html", picture, HyperlinkType.WebLink)
            '保存文档
            Dim output As String = "CreateImageHyperlink.docx"
            doc.SaveToFile(output, FileFormat.Docx)
        End Sub
    End Class
End Namespace

效果图

注意事项

代码中生成的文档路径为的VS程序的Debug路径，如本次路径为：C:\Users\Tina\source\repos\ConsoleApp1\ConsoleApp1\bin\Debug ，文件路径也可自定义为其他路径。