Carina-baby

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 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 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 ,文件路径也可自定义为其他路径。

posted on 2022-05-13 13:47  Carina-baby  阅读(716)  评论(0编辑  收藏  举报

导航