超链接(Hyperlink)可以看做是一个“热点”,它可以从当前Web页定义的位置跳转到其他位置,包括当前页的某个位置、Internet、本地硬盘或局域网上的其他文件,甚至跳转到声音、图片等多媒体文件。浏览Web页是超链接最普遍的一种应用,通过超链接还可以获得不同形态的服务,如文件传输、资料查询、电子函件、远程访问等。我们可以直接在Word中对文字或图片添加超链接,本文将通过C#/VB.NET程序代码对创建图片超链接做详细介绍,下面是具体方法和步骤。
本次用到Spire.Doc for .Net系列的dll库文件作为示例,它能够轻松便捷实现我们的日常办公需求,并且不需安装任何办公软件。下面是我整理的具体步骤及方法。
首先,我们需要安装dll文件。这一共有三种方法供大家参考,可以选择适用的方式进行安装。
1.通过NuGet安装dll(2种方法)
1.1可以在Visual Studio中打开“解决方案资源管理器”,鼠标右键点击“引用”,“管理NuGet包”,然后搜索“Free Spire.Doc”,点击“安装”。等待程序安装完成。
1.2将以下内容复制到PM控制台安装。
Install-Package FreeSpire.Doc -Version 10.2
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 CreateImageHyperlink
{
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 CreateImageHyperlink
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 ,文件路径也可自定义为其他路径。