PM> Install-Package Spire.Doc

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"Sample.docx");
    
                //Get the first section in the document
                Section section = document.Sections[0];
    
                //Get the first paragraph in the section
                Paragraph paragraph = section.Paragraphs[0];
                //Add a comment to the paragraph
                Comment comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.");
                //Set comment author
                comment.Format.Author = "Eiceblue";
                comment.Format.Initial = "CM";
    
                //Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("Sample.docx")
    
                'Get the first section in the document
                Dim section As Section = document.Sections(0)
    
                'Get the first paragraph in the section
                Dim paragraph As Paragraph = section.Paragraphs(0)
                'Add a comment to the paragraph
                Dim comment As Comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.")
                'Set comment author
                comment.Format.Author = "Eiceblue"
                comment.Format.Initial = "CM"
    
                'Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddCommentsToText
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"CommentTemplate.docx");
    
                //Find a specific string
                TextSelection find = document.FindString("Microsoft Office", false, true);
    
                //Create the comment start mark and comment end mark
                CommentMark commentmarkStart = new CommentMark(document);
                commentmarkStart.Type = CommentMarkType.CommentStart;
                CommentMark commentmarkEnd = new CommentMark(document);
                commentmarkEnd.Type = CommentMarkType.CommentEnd;
    
                //Create a comment and set its content and author
                Comment comment = new Comment(document);
                comment.Body.AddParagraph().Text = "Developed by Microsoft.";
                comment.Format.Author = "Shaun";
    
                //Get the found text as a single text range
                TextRange range = find.GetAsOneRange();
    
                //Get the owner paragraph of the text range
                Paragraph para = range.OwnerParagraph;
    
                //Add the comment to the paragraph
                para.ChildObjects.Add(comment);
    
                //Get the index of text range in the paragraph
                int index = para.ChildObjects.IndexOf(range);
    
                //Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart);
                //Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd);
    
                //Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddCommentsToText
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("CommentTemplate.docx")
    
                'Find a specific string
                Dim find As TextSelection = document.FindString("Microsoft Office", False, True)
    
                'Create the comment start mark and comment end mark
                Dim commentmarkStart As CommentMark = New CommentMark(document)
                commentmarkStart.Type = CommentMarkType.CommentStart
                Dim commentmarkEnd As CommentMark = New CommentMark(document)
                commentmarkEnd.Type = CommentMarkType.CommentEnd
    
                'Create a comment and set its content and author
                Dim comment As Comment = New Comment(document)
                comment.Body.AddParagraph().Text = "Developed by Microsoft."
                comment.Format.Author = "Shaun"
    
                'Get the found text as a single text range
                Dim range As TextRange = find.GetAsOneRange()
    
                'Get the owner paragraph of the text range
                Dim para As Paragraph = range.OwnerParagraph
    
                'Add the comment to the paragraph
                para.ChildObjects.Add(comment)
    
                'Get the index of text range in the paragraph
                Dim index As Integer = para.ChildObjects.IndexOf(range)
    
                'Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart)
                'Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd)
    
                'Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Fields;
    
    namespace ReplyToComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Get the first comment in the document
                Comment comment1 = document.Comments[0];
    
                //Create a new comment and specify its author and content
                Comment replyComment1 = new Comment(document);
                replyComment1.Format.Author = "Michael";
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.");
    
                //Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1);
    
                //Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Fields
    
    Namespace ReplyToComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Get the first comment in the document
                Dim comment1 As Comment = document.Comments(0)
    
                'Create a new comment and specify its author and content
                Dim replyComment1 As Comment = New Comment(document)
                replyComment1.Format.Author = "Michael"
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.")
    
                'Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1)
    
                'Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    
    namespace DeleteComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Delete the first comment in the document
                document.Comments.RemoveAt(0);
    
                //Delete all comments in the document
                //document.Comments.Clear();
    
                //Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    
    Namespace DeleteComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Delete the first comment in the document
                document.Comments.RemoveAt(0)
    
                'Delete all comments in the document
                'document.Comments.Clear();
    
                'Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

PM> Install-Package Spire.Doc

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"Sample.docx");
    
                //Get the first section in the document
                Section section = document.Sections[0];
    
                //Get the first paragraph in the section
                Paragraph paragraph = section.Paragraphs[0];
                //Add a comment to the paragraph
                Comment comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.");
                //Set comment author
                comment.Format.Author = "Eiceblue";
                comment.Format.Initial = "CM";
    
                //Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("Sample.docx")
    
                'Get the first section in the document
                Dim section As Section = document.Sections(0)
    
                'Get the first paragraph in the section
                Dim paragraph As Paragraph = section.Paragraphs(0)
                'Add a comment to the paragraph
                Dim comment As Comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.")
                'Set comment author
                comment.Format.Author = "Eiceblue"
                comment.Format.Initial = "CM"
    
                'Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddCommentsToText
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"CommentTemplate.docx");
    
                //Find a specific string
                TextSelection find = document.FindString("Microsoft Office", false, true);
    
                //Create the comment start mark and comment end mark
                CommentMark commentmarkStart = new CommentMark(document);
                commentmarkStart.Type = CommentMarkType.CommentStart;
                CommentMark commentmarkEnd = new CommentMark(document);
                commentmarkEnd.Type = CommentMarkType.CommentEnd;
    
                //Create a comment and set its content and author
                Comment comment = new Comment(document);
                comment.Body.AddParagraph().Text = "Developed by Microsoft.";
                comment.Format.Author = "Shaun";
    
                //Get the found text as a single text range
                TextRange range = find.GetAsOneRange();
    
                //Get the owner paragraph of the text range
                Paragraph para = range.OwnerParagraph;
    
                //Add the comment to the paragraph
                para.ChildObjects.Add(comment);
    
                //Get the index of text range in the paragraph
                int index = para.ChildObjects.IndexOf(range);
    
                //Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart);
                //Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd);
    
                //Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddCommentsToText
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("CommentTemplate.docx")
    
                'Find a specific string
                Dim find As TextSelection = document.FindString("Microsoft Office", False, True)
    
                'Create the comment start mark and comment end mark
                Dim commentmarkStart As CommentMark = New CommentMark(document)
                commentmarkStart.Type = CommentMarkType.CommentStart
                Dim commentmarkEnd As CommentMark = New CommentMark(document)
                commentmarkEnd.Type = CommentMarkType.CommentEnd
    
                'Create a comment and set its content and author
                Dim comment As Comment = New Comment(document)
                comment.Body.AddParagraph().Text = "Developed by Microsoft."
                comment.Format.Author = "Shaun"
    
                'Get the found text as a single text range
                Dim range As TextRange = find.GetAsOneRange()
    
                'Get the owner paragraph of the text range
                Dim para As Paragraph = range.OwnerParagraph
    
                'Add the comment to the paragraph
                para.ChildObjects.Add(comment)
    
                'Get the index of text range in the paragraph
                Dim index As Integer = para.ChildObjects.IndexOf(range)
    
                'Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart)
                'Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd)
    
                'Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Fields;
    
    namespace ReplyToComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Get the first comment in the document
                Comment comment1 = document.Comments[0];
    
                //Create a new comment and specify its author and content
                Comment replyComment1 = new Comment(document);
                replyComment1.Format.Author = "Michael";
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.");
    
                //Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1);
    
                //Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Fields
    
    Namespace ReplyToComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Get the first comment in the document
                Dim comment1 As Comment = document.Comments(0)
    
                'Create a new comment and specify its author and content
                Dim replyComment1 As Comment = New Comment(document)
                replyComment1.Format.Author = "Michael"
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.")
    
                'Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1)
    
                'Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    
    namespace DeleteComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Delete the first comment in the document
                document.Comments.RemoveAt(0);
    
                //Delete all comments in the document
                //document.Comments.Clear();
    
                //Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    
    Namespace DeleteComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Delete the first comment in the document
                document.Comments.RemoveAt(0)
    
                'Delete all comments in the document
                'document.Comments.Clear();
    
                'Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

PM> Install-Package Spire.Doc

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"Sample.docx");
    
                //Get the first section in the document
                Section section = document.Sections[0];
    
                //Get the first paragraph in the section
                Paragraph paragraph = section.Paragraphs[0];
                //Add a comment to the paragraph
                Comment comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.");
                //Set comment author
                comment.Format.Author = "Eiceblue";
                comment.Format.Initial = "CM";
    
                //Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("Sample.docx")
    
                'Get the first section in the document
                Dim section As Section = document.Sections(0)
    
                'Get the first paragraph in the section
                Dim paragraph As Paragraph = section.Paragraphs(0)
                'Add a comment to the paragraph
                Dim comment As Comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.")
                'Set comment author
                comment.Format.Author = "Eiceblue"
                comment.Format.Initial = "CM"
    
                'Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddCommentsToText
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"CommentTemplate.docx");
    
                //Find a specific string
                TextSelection find = document.FindString("Microsoft Office", false, true);
    
                //Create the comment start mark and comment end mark
                CommentMark commentmarkStart = new CommentMark(document);
                commentmarkStart.Type = CommentMarkType.CommentStart;
                CommentMark commentmarkEnd = new CommentMark(document);
                commentmarkEnd.Type = CommentMarkType.CommentEnd;
    
                //Create a comment and set its content and author
                Comment comment = new Comment(document);
                comment.Body.AddParagraph().Text = "Developed by Microsoft.";
                comment.Format.Author = "Shaun";
    
                //Get the found text as a single text range
                TextRange range = find.GetAsOneRange();
    
                //Get the owner paragraph of the text range
                Paragraph para = range.OwnerParagraph;
    
                //Add the comment to the paragraph
                para.ChildObjects.Add(comment);
    
                //Get the index of text range in the paragraph
                int index = para.ChildObjects.IndexOf(range);
    
                //Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart);
                //Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd);
    
                //Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddCommentsToText
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("CommentTemplate.docx")
    
                'Find a specific string
                Dim find As TextSelection = document.FindString("Microsoft Office", False, True)
    
                'Create the comment start mark and comment end mark
                Dim commentmarkStart As CommentMark = New CommentMark(document)
                commentmarkStart.Type = CommentMarkType.CommentStart
                Dim commentmarkEnd As CommentMark = New CommentMark(document)
                commentmarkEnd.Type = CommentMarkType.CommentEnd
    
                'Create a comment and set its content and author
                Dim comment As Comment = New Comment(document)
                comment.Body.AddParagraph().Text = "Developed by Microsoft."
                comment.Format.Author = "Shaun"
    
                'Get the found text as a single text range
                Dim range As TextRange = find.GetAsOneRange()
    
                'Get the owner paragraph of the text range
                Dim para As Paragraph = range.OwnerParagraph
    
                'Add the comment to the paragraph
                para.ChildObjects.Add(comment)
    
                'Get the index of text range in the paragraph
                Dim index As Integer = para.ChildObjects.IndexOf(range)
    
                'Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart)
                'Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd)
    
                'Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Fields;
    
    namespace ReplyToComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Get the first comment in the document
                Comment comment1 = document.Comments[0];
    
                //Create a new comment and specify its author and content
                Comment replyComment1 = new Comment(document);
                replyComment1.Format.Author = "Michael";
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.");
    
                //Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1);
    
                //Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Fields
    
    Namespace ReplyToComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Get the first comment in the document
                Dim comment1 As Comment = document.Comments(0)
    
                'Create a new comment and specify its author and content
                Dim replyComment1 As Comment = New Comment(document)
                replyComment1.Format.Author = "Michael"
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.")
    
                'Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1)
    
                'Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    
    namespace DeleteComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Delete the first comment in the document
                document.Comments.RemoveAt(0);
    
                //Delete all comments in the document
                //document.Comments.Clear();
    
                //Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    
    Namespace DeleteComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Delete the first comment in the document
                document.Comments.RemoveAt(0)
    
                'Delete all comments in the document
                'document.Comments.Clear();
    
                'Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

PM> Install-Package Spire.Doc

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"Sample.docx");
    
                //Get the first section in the document
                Section section = document.Sections[0];
    
                //Get the first paragraph in the section
                Paragraph paragraph = section.Paragraphs[0];
                //Add a comment to the paragraph
                Comment comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.");
                //Set comment author
                comment.Format.Author = "Eiceblue";
                comment.Format.Initial = "CM";
    
                //Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("Sample.docx")
    
                'Get the first section in the document
                Dim section As Section = document.Sections(0)
    
                'Get the first paragraph in the section
                Dim paragraph As Paragraph = section.Paragraphs(0)
                'Add a comment to the paragraph
                Dim comment As Comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.")
                'Set comment author
                comment.Format.Author = "Eiceblue"
                comment.Format.Initial = "CM"
    
                'Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddCommentsToText
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"CommentTemplate.docx");
    
                //Find a specific string
                TextSelection find = document.FindString("Microsoft Office", false, true);
    
                //Create the comment start mark and comment end mark
                CommentMark commentmarkStart = new CommentMark(document);
                commentmarkStart.Type = CommentMarkType.CommentStart;
                CommentMark commentmarkEnd = new CommentMark(document);
                commentmarkEnd.Type = CommentMarkType.CommentEnd;
    
                //Create a comment and set its content and author
                Comment comment = new Comment(document);
                comment.Body.AddParagraph().Text = "Developed by Microsoft.";
                comment.Format.Author = "Shaun";
    
                //Get the found text as a single text range
                TextRange range = find.GetAsOneRange();
    
                //Get the owner paragraph of the text range
                Paragraph para = range.OwnerParagraph;
    
                //Add the comment to the paragraph
                para.ChildObjects.Add(comment);
    
                //Get the index of text range in the paragraph
                int index = para.ChildObjects.IndexOf(range);
    
                //Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart);
                //Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd);
    
                //Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddCommentsToText
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("CommentTemplate.docx")
    
                'Find a specific string
                Dim find As TextSelection = document.FindString("Microsoft Office", False, True)
    
                'Create the comment start mark and comment end mark
                Dim commentmarkStart As CommentMark = New CommentMark(document)
                commentmarkStart.Type = CommentMarkType.CommentStart
                Dim commentmarkEnd As CommentMark = New CommentMark(document)
                commentmarkEnd.Type = CommentMarkType.CommentEnd
    
                'Create a comment and set its content and author
                Dim comment As Comment = New Comment(document)
                comment.Body.AddParagraph().Text = "Developed by Microsoft."
                comment.Format.Author = "Shaun"
    
                'Get the found text as a single text range
                Dim range As TextRange = find.GetAsOneRange()
    
                'Get the owner paragraph of the text range
                Dim para As Paragraph = range.OwnerParagraph
    
                'Add the comment to the paragraph
                para.ChildObjects.Add(comment)
    
                'Get the index of text range in the paragraph
                Dim index As Integer = para.ChildObjects.IndexOf(range)
    
                'Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart)
                'Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd)
    
                'Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Fields;
    
    namespace ReplyToComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Get the first comment in the document
                Comment comment1 = document.Comments[0];
    
                //Create a new comment and specify its author and content
                Comment replyComment1 = new Comment(document);
                replyComment1.Format.Author = "Michael";
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.");
    
                //Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1);
    
                //Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Fields
    
    Namespace ReplyToComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Get the first comment in the document
                Dim comment1 As Comment = document.Comments(0)
    
                'Create a new comment and specify its author and content
                Dim replyComment1 As Comment = New Comment(document)
                replyComment1.Format.Author = "Michael"
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.")
    
                'Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1)
    
                'Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    
    namespace DeleteComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Delete the first comment in the document
                document.Comments.RemoveAt(0);
    
                //Delete all comments in the document
                //document.Comments.Clear();
    
                //Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    
    Namespace DeleteComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Delete the first comment in the document
                document.Comments.RemoveAt(0)
    
                'Delete all comments in the document
                'document.Comments.Clear();
    
                'Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

PM> Install-Package Spire.Doc

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"Sample.docx");
    
                //Get the first section in the document
                Section section = document.Sections[0];
    
                //Get the first paragraph in the section
                Paragraph paragraph = section.Paragraphs[0];
                //Add a comment to the paragraph
                Comment comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.");
                //Set comment author
                comment.Format.Author = "Eiceblue";
                comment.Format.Initial = "CM";
    
                //Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("Sample.docx")
    
                'Get the first section in the document
                Dim section As Section = document.Sections(0)
    
                'Get the first paragraph in the section
                Dim paragraph As Paragraph = section.Paragraphs(0)
                'Add a comment to the paragraph
                Dim comment As Comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.")
                'Set comment author
                comment.Format.Author = "Eiceblue"
                comment.Format.Initial = "CM"
    
                'Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddCommentsToText
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"CommentTemplate.docx");
    
                //Find a specific string
                TextSelection find = document.FindString("Microsoft Office", false, true);
    
                //Create the comment start mark and comment end mark
                CommentMark commentmarkStart = new CommentMark(document);
                commentmarkStart.Type = CommentMarkType.CommentStart;
                CommentMark commentmarkEnd = new CommentMark(document);
                commentmarkEnd.Type = CommentMarkType.CommentEnd;
    
                //Create a comment and set its content and author
                Comment comment = new Comment(document);
                comment.Body.AddParagraph().Text = "Developed by Microsoft.";
                comment.Format.Author = "Shaun";
    
                //Get the found text as a single text range
                TextRange range = find.GetAsOneRange();
    
                //Get the owner paragraph of the text range
                Paragraph para = range.OwnerParagraph;
    
                //Add the comment to the paragraph
                para.ChildObjects.Add(comment);
    
                //Get the index of text range in the paragraph
                int index = para.ChildObjects.IndexOf(range);
    
                //Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart);
                //Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd);
    
                //Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddCommentsToText
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("CommentTemplate.docx")
    
                'Find a specific string
                Dim find As TextSelection = document.FindString("Microsoft Office", False, True)
    
                'Create the comment start mark and comment end mark
                Dim commentmarkStart As CommentMark = New CommentMark(document)
                commentmarkStart.Type = CommentMarkType.CommentStart
                Dim commentmarkEnd As CommentMark = New CommentMark(document)
                commentmarkEnd.Type = CommentMarkType.CommentEnd
    
                'Create a comment and set its content and author
                Dim comment As Comment = New Comment(document)
                comment.Body.AddParagraph().Text = "Developed by Microsoft."
                comment.Format.Author = "Shaun"
    
                'Get the found text as a single text range
                Dim range As TextRange = find.GetAsOneRange()
    
                'Get the owner paragraph of the text range
                Dim para As Paragraph = range.OwnerParagraph
    
                'Add the comment to the paragraph
                para.ChildObjects.Add(comment)
    
                'Get the index of text range in the paragraph
                Dim index As Integer = para.ChildObjects.IndexOf(range)
    
                'Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart)
                'Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd)
    
                'Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Fields;
    
    namespace ReplyToComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Get the first comment in the document
                Comment comment1 = document.Comments[0];
    
                //Create a new comment and specify its author and content
                Comment replyComment1 = new Comment(document);
                replyComment1.Format.Author = "Michael";
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.");
    
                //Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1);
    
                //Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Fields
    
    Namespace ReplyToComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Get the first comment in the document
                Dim comment1 As Comment = document.Comments(0)
    
                'Create a new comment and specify its author and content
                Dim replyComment1 As Comment = New Comment(document)
                replyComment1.Format.Author = "Michael"
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.")
    
                'Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1)
    
                'Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    
    namespace DeleteComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Delete the first comment in the document
                document.Comments.RemoveAt(0);
    
                //Delete all comments in the document
                //document.Comments.Clear();
    
                //Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    
    Namespace DeleteComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Delete the first comment in the document
                document.Comments.RemoveAt(0)
    
                'Delete all comments in the document
                'document.Comments.Clear();
    
                'Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

PM> Install-Package Spire.Doc

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"Sample.docx");
    
                //Get the first section in the document
                Section section = document.Sections[0];
    
                //Get the first paragraph in the section
                Paragraph paragraph = section.Paragraphs[0];
                //Add a comment to the paragraph
                Comment comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.");
                //Set comment author
                comment.Format.Author = "Eiceblue";
                comment.Format.Initial = "CM";
    
                //Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("Sample.docx")
    
                'Get the first section in the document
                Dim section As Section = document.Sections(0)
    
                'Get the first paragraph in the section
                Dim paragraph As Paragraph = section.Paragraphs(0)
                'Add a comment to the paragraph
                Dim comment As Comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.")
                'Set comment author
                comment.Format.Author = "Eiceblue"
                comment.Format.Initial = "CM"
    
                'Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddCommentsToText
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"CommentTemplate.docx");
    
                //Find a specific string
                TextSelection find = document.FindString("Microsoft Office", false, true);
    
                //Create the comment start mark and comment end mark
                CommentMark commentmarkStart = new CommentMark(document);
                commentmarkStart.Type = CommentMarkType.CommentStart;
                CommentMark commentmarkEnd = new CommentMark(document);
                commentmarkEnd.Type = CommentMarkType.CommentEnd;
    
                //Create a comment and set its content and author
                Comment comment = new Comment(document);
                comment.Body.AddParagraph().Text = "Developed by Microsoft.";
                comment.Format.Author = "Shaun";
    
                //Get the found text as a single text range
                TextRange range = find.GetAsOneRange();
    
                //Get the owner paragraph of the text range
                Paragraph para = range.OwnerParagraph;
    
                //Add the comment to the paragraph
                para.ChildObjects.Add(comment);
    
                //Get the index of text range in the paragraph
                int index = para.ChildObjects.IndexOf(range);
    
                //Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart);
                //Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd);
    
                //Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddCommentsToText
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("CommentTemplate.docx")
    
                'Find a specific string
                Dim find As TextSelection = document.FindString("Microsoft Office", False, True)
    
                'Create the comment start mark and comment end mark
                Dim commentmarkStart As CommentMark = New CommentMark(document)
                commentmarkStart.Type = CommentMarkType.CommentStart
                Dim commentmarkEnd As CommentMark = New CommentMark(document)
                commentmarkEnd.Type = CommentMarkType.CommentEnd
    
                'Create a comment and set its content and author
                Dim comment As Comment = New Comment(document)
                comment.Body.AddParagraph().Text = "Developed by Microsoft."
                comment.Format.Author = "Shaun"
    
                'Get the found text as a single text range
                Dim range As TextRange = find.GetAsOneRange()
    
                'Get the owner paragraph of the text range
                Dim para As Paragraph = range.OwnerParagraph
    
                'Add the comment to the paragraph
                para.ChildObjects.Add(comment)
    
                'Get the index of text range in the paragraph
                Dim index As Integer = para.ChildObjects.IndexOf(range)
    
                'Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart)
                'Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd)
    
                'Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Fields;
    
    namespace ReplyToComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Get the first comment in the document
                Comment comment1 = document.Comments[0];
    
                //Create a new comment and specify its author and content
                Comment replyComment1 = new Comment(document);
                replyComment1.Format.Author = "Michael";
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.");
    
                //Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1);
    
                //Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Fields
    
    Namespace ReplyToComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Get the first comment in the document
                Dim comment1 As Comment = document.Comments(0)
    
                'Create a new comment and specify its author and content
                Dim replyComment1 As Comment = New Comment(document)
                replyComment1.Format.Author = "Michael"
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.")
    
                'Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1)
    
                'Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    
    namespace DeleteComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Delete the first comment in the document
                document.Comments.RemoveAt(0);
    
                //Delete all comments in the document
                //document.Comments.Clear();
    
                //Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    
    Namespace DeleteComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Delete the first comment in the document
                document.Comments.RemoveAt(0)
    
                'Delete all comments in the document
                'document.Comments.Clear();
    
                'Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

PM> Install-Package Spire.Doc

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"Sample.docx");
    
                //Get the first section in the document
                Section section = document.Sections[0];
    
                //Get the first paragraph in the section
                Paragraph paragraph = section.Paragraphs[0];
                //Add a comment to the paragraph
                Comment comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.");
                //Set comment author
                comment.Format.Author = "Eiceblue";
                comment.Format.Initial = "CM";
    
                //Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("Sample.docx")
    
                'Get the first section in the document
                Dim section As Section = document.Sections(0)
    
                'Get the first paragraph in the section
                Dim paragraph As Paragraph = section.Paragraphs(0)
                'Add a comment to the paragraph
                Dim comment As Comment = paragraph.AppendComment("This comment is added using Spire.Doc for .NET.")
                'Set comment author
                comment.Format.Author = "Eiceblue"
                comment.Format.Initial = "CM"
    
                'Save the result document
                document.SaveToFile("AddCommentToParagraph.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace AddCommentsToText
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"CommentTemplate.docx");
    
                //Find a specific string
                TextSelection find = document.FindString("Microsoft Office", false, true);
    
                //Create the comment start mark and comment end mark
                CommentMark commentmarkStart = new CommentMark(document);
                commentmarkStart.Type = CommentMarkType.CommentStart;
                CommentMark commentmarkEnd = new CommentMark(document);
                commentmarkEnd.Type = CommentMarkType.CommentEnd;
    
                //Create a comment and set its content and author
                Comment comment = new Comment(document);
                comment.Body.AddParagraph().Text = "Developed by Microsoft.";
                comment.Format.Author = "Shaun";
    
                //Get the found text as a single text range
                TextRange range = find.GetAsOneRange();
    
                //Get the owner paragraph of the text range
                Paragraph para = range.OwnerParagraph;
    
                //Add the comment to the paragraph
                para.ChildObjects.Add(comment);
    
                //Get the index of text range in the paragraph
                int index = para.ChildObjects.IndexOf(range);
    
                //Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart);
                //Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd);
    
                //Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace AddCommentsToText
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("CommentTemplate.docx")
    
                'Find a specific string
                Dim find As TextSelection = document.FindString("Microsoft Office", False, True)
    
                'Create the comment start mark and comment end mark
                Dim commentmarkStart As CommentMark = New CommentMark(document)
                commentmarkStart.Type = CommentMarkType.CommentStart
                Dim commentmarkEnd As CommentMark = New CommentMark(document)
                commentmarkEnd.Type = CommentMarkType.CommentEnd
    
                'Create a comment and set its content and author
                Dim comment As Comment = New Comment(document)
                comment.Body.AddParagraph().Text = "Developed by Microsoft."
                comment.Format.Author = "Shaun"
    
                'Get the found text as a single text range
                Dim range As TextRange = find.GetAsOneRange()
    
                'Get the owner paragraph of the text range
                Dim para As Paragraph = range.OwnerParagraph
    
                'Add the comment to the paragraph
                para.ChildObjects.Add(comment)
    
                'Get the index of text range in the paragraph
                Dim index As Integer = para.ChildObjects.IndexOf(range)
    
                'Insert the comment start mark before the text range
                para.ChildObjects.Insert(index, commentmarkStart)
                'Insert the comment end mark after the text range
                para.ChildObjects.Insert(index + 2, commentmarkEnd)
    
                'Save the result document
                document.SaveToFile("AddCommentForText.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Fields;
    
    namespace ReplyToComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Get the first comment in the document
                Comment comment1 = document.Comments[0];
    
                //Create a new comment and specify its author and content
                Comment replyComment1 = new Comment(document);
                replyComment1.Format.Author = "Michael";
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.");
    
                //Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1);
    
                //Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Fields
    
    Namespace ReplyToComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Get the first comment in the document
                Dim comment1 As Comment = document.Comments(0)
    
                'Create a new comment and specify its author and content
                Dim replyComment1 As Comment = New Comment(document)
                replyComment1.Format.Author = "Michael"
                replyComment1.Body.AddParagraph().AppendText("Spire.Doc is a wonderful Word library.")
    
                'Add the comment as a reply to the first comment
                comment1.ReplyToComment(replyComment1)
    
                'Save the result document
                document.SaveToFile("ReplyToComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    
    namespace DeleteComments
    {
        internal class Program
        {
            static void Main(string[] args)
            {
                //Initialize an instance of the Document class
                Document document = new Document();
                //Load a Word document
                document.LoadFromFile(@"AddCommentToParagraph.docx");
    
                //Delete the first comment in the document
                document.Comments.RemoveAt(0);
    
                //Delete all comments in the document
                //document.Comments.Clear();
    
                //Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013);
                document.Close();
            }
        }
    }

Imports Spire.Doc
    
    Namespace DeleteComments
        Friend Class Program
            Private Shared Sub Main(ByVal args As String())
                'Initialize an instance of the Document class
                Dim document As Document = New Document()
                'Load a Word document
                document.LoadFromFile("AddCommentToParagraph.docx")
    
                'Delete the first comment in the document
                document.Comments.RemoveAt(0)
    
                'Delete all comments in the document
                'document.Comments.Clear();
    
                'Save the result document
                document.SaveToFile("DeleteComment.docx", FileFormat.Docx2013)
                document.Close()
            End Sub
        End Class
    End Namespace

PM> Install-Package Spire.Doc

using Spire.Doc;
    using Spire.Doc.Documents;
    using System.Drawing;
    
    namespace InsertHyperlinks
    {
        class Program
        {
            static void Main(string[] args)
            {
                //Create a Word document
                Document doc = new Document();
    
                //Add a section
                Section section = doc.AddSection();
    
                //Add a paragraph
                Paragraph paragraph = section.AddParagraph();
                paragraph.AppendHyperlink("https://www-iceblue.com/", "Home Page", HyperlinkType.WebLink);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add an email link
                paragraph.AppendHyperlink("mailto:support@e-iceblue.com", "Mail Us", HyperlinkType.EMailLink);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add a file link
                string filePath = @"C:\Users\Administrator\Desktop\report.xlsx";
                paragraph.AppendHyperlink(filePath, "Click to open the report", HyperlinkType.FileLink);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add another section and create a bookmark
                Section section2 = doc.AddSection();
                Paragraph bookmarkParagrapg = section2.AddParagraph();
                bookmarkParagrapg.AppendText("Here is a bookmark");
                BookmarkStart start = bookmarkParagrapg.AppendBookmarkStart("myBookmark");
                bookmarkParagrapg.Items.Insert(0, start);
                bookmarkParagrapg.AppendBookmarkEnd("myBookmark");
    
                //Link to the bookmark
                paragraph.AppendHyperlink("myBookmark", "Jump to a location inside this document", HyperlinkType.Bookmark);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add an image link
                Image image = Image.FromFile(@"C:\Users\Administrator\Desktop\logo.png");
                Spire.Doc.Fields.DocPicture picture = paragraph.AppendPicture(image);
                paragraph.AppendHyperlink("https://docs.microsoft.com/en-us/dotnet/", picture, HyperlinkType.WebLink);
    
                //Save to file
                doc.SaveToFile("InsertHyperlinks.docx", FileFormat.Docx2013);
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports System.Drawing
    
    Namespace InsertHyperlinks
        Class Program
            Shared  Sub Main(ByVal args() As String)
                'Create a Word document
                Document doc  =  New Document()
    
                'Add a section
                Dim section As Section =  doc.AddSection()
    
                'Add a paragraph
                Dim paragraph As Paragraph =  section.AddParagraph()
                paragraph.AppendHyperlink("https://www.e-iceblue.com/", "Home Page", HyperlinkType.WebLink)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add an email link
                paragraph.AppendHyperlink("mailto:support@e-iceblue.com", "Mail Us", HyperlinkType.EMailLink)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add a file link
                Dim filePath As String =  "C:\Users\Administrator\Desktop\report.xlsx"
                paragraph.AppendHyperlink(filePath, "Click to open the report", HyperlinkType.FileLink)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add another section and create a bookmark
                Dim section2 As Section =  doc.AddSection()
                Dim bookmarkParagrapg As Paragraph =  section2.AddParagraph()
                bookmarkParagrapg.AppendText("Here is a bookmark")
                Dim start As BookmarkStart =  bookmarkParagrapg.AppendBookmarkStart("myBookmark")
                bookmarkParagrapg.Items.Insert(0, start)
                bookmarkParagrapg.AppendBookmarkEnd("myBookmark")
    
                'Link to the bookmark
                paragraph.AppendHyperlink("myBookmark", "Jump to a location inside this document", HyperlinkType.Bookmark)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add an image link
                Dim image As Image =  Image.FromFile("C:\Users\Administrator\Desktop\logo.png")
                Dim picture As Spire.Doc.Fields.DocPicture =  paragraph.AppendPicture(image)
                paragraph.AppendHyperlink("https://docs.microsoft.com/en-us/dotnet/", picture, HyperlinkType.WebLink)
    
                'Save to file
                doc.SaveToFile("InsertHyperlinks.docx", FileFormat.Docx2013)
                System.Diagnostics.Process.Start("InsertHyperlinks.docx")
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    using Spire.Doc.Interface;
    
    namespace AddHyperlinksToExistingText
    {
        class Program
        {
            static void Main(string[] args)
            {
                //Create a Document object
                Document document = new Document();
    
                //Load a Word file
                document.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.docx");
    
                //Find all the occurrences of the string ".NET Framework" in the document
                TextSelection[] selections = document.FindAllString(".NET Framework", true, true);
    
                //Get the second occurrence
                TextRange range = selections[1].GetAsOneRange();
    
                //Get its owner paragraph
                Paragraph parapgraph = range.OwnerParagraph;
    
                //Get its position in the paragraph
                int index = parapgraph.Items.IndexOf(range);
    
                //Remove it from the paragraph
                parapgraph.Items.Remove(range);
    
                //Create a hyperlink field
                Spire.Doc.Fields.Field field = new Spire.Doc.Fields.Field(document);
                field.Type = Spire.Doc.FieldType.FieldHyperlink;
                Hyperlink hyperlink = new Hyperlink(field);
                hyperlink.Type = HyperlinkType.WebLink;
                hyperlink.Uri = "https://en.wikipedia.org/wiki/.NET_Framework";
                parapgraph.Items.Insert(index, field);
    
                //Insert a field mark "start" to the paragraph
                IParagraphBase start = document.CreateParagraphItem(ParagraphItemType.FieldMark);
                (start as FieldMark).Type = FieldMarkType.FieldSeparator;
                parapgraph.Items.Insert(index + 1, start);
    
                //Insert a text range between two field marks
                ITextRange textRange = new Spire.Doc.Fields.TextRange(document);
                textRange.Text = ".NET Framework";
                textRange.CharacterFormat.Font = range.CharacterFormat.Font;
                textRange.CharacterFormat.TextColor = System.Drawing.Color.Blue;
                textRange.CharacterFormat.UnderlineStyle = UnderlineStyle.Single;
                parapgraph.Items.Insert(index + 2, textRange);
    
                //Insert a field mark "end" to the paragraph
                IParagraphBase end = document.CreateParagraphItem(ParagraphItemType.FieldMark);
                (end as FieldMark).Type = FieldMarkType.FieldEnd;
                parapgraph.Items.Insert(index + 3, end);
    
                //Save to file
                document.SaveToFile("AddHyperlink.docx", Spire.Doc.FileFormat.Docx);
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    Imports Spire.Doc.Interface
    
    Namespace AddHyperlinksToExistingText
        Class Program
            Shared  Sub Main(ByVal args() As String)
                'Create a Document object
                Dim document As Document =  New Document()
    
                'Load a Word file
                document.LoadFromFile("C:\Users\Administrator\Desktop\sample.docx")
    
                'Find all the occurrences of the string ".NET Framework" in the document
                Dim selections() As TextSelection =  document.FindAllString(".NET Framework",True,True)
    
                'Get the second occurrence
                Dim range As TextRange =  selections(1).GetAsOneRange()
    
                'Get its owner paragraph
                Dim parapgraph As Paragraph =  range.OwnerParagraph
    
                'Get its position in the paragraph
                Dim index As Integer =  parapgraph.Items.IndexOf(range)
    
                'Remove it from the paragraph
                parapgraph.Items.Remove(range)
    
                'Create a hyperlink field
                Dim field As Spire.Doc.Fields.Field =  New Spire.Doc.Fields.Field(document)
                field.Type = Spire.Doc.FieldType.FieldHyperlink
                Dim hyperlink As Hyperlink =  New Hyperlink(field)
                hyperlink.Type = HyperlinkType.WebLink
                hyperlink.Uri = "https://en.wikipedia.org/wiki/.NET_Framework"
                parapgraph.Items.Insert(index, field)
    
                'Insert a field mark "start" to the paragraph
                Dim start As IParagraphBase =  document.CreateParagraphItem(ParagraphItemType.FieldMark)
                (start as FieldMark).Type = FieldMarkType.FieldSeparator
                parapgraph.Items.Insert(index + 1, start)
    
                'Insert a text range between two field marks
                Dim textRange As ITextRange =  New Spire.Doc.Fields.TextRange(document)
                textRange.Text = ".NET Framework"
                textRange.CharacterFormat.Font = range.CharacterFormat.Font
                textRange.CharacterFormat.TextColor = System.Drawing.Color.Blue
                textRange.CharacterFormat.UnderlineStyle = UnderlineStyle.Single
                parapgraph.Items.Insert(index + 2, textRange)
    
                'Insert a field mark "end" to the paragraph
                Dim end As IParagraphBase =  document.CreateParagraphItem(ParagraphItemType.FieldMark)
                (end as FieldMark).Type = FieldMarkType.FieldEnd
                parapgraph.Items.Insert(index + 3, end)
    
                'Save to file
                document.SaveToFile("AddHyperlink.docx", Spire.Doc.FileFormat.Docx)
            End Sub
        End Class
    End Namespace

PM> Install-Package Spire.Doc

using Spire.Doc;
    using Spire.Doc.Documents;
    using System.Drawing;
    
    namespace InsertHyperlinks
    {
        class Program
        {
            static void Main(string[] args)
            {
                //Create a Word document
                Document doc = new Document();
    
                //Add a section
                Section section = doc.AddSection();
    
                //Add a paragraph
                Paragraph paragraph = section.AddParagraph();
                paragraph.AppendHyperlink("https://www-iceblue.com/", "Home Page", HyperlinkType.WebLink);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add an email link
                paragraph.AppendHyperlink("mailto:support@e-iceblue.com", "Mail Us", HyperlinkType.EMailLink);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add a file link
                string filePath = @"C:\Users\Administrator\Desktop\report.xlsx";
                paragraph.AppendHyperlink(filePath, "Click to open the report", HyperlinkType.FileLink);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add another section and create a bookmark
                Section section2 = doc.AddSection();
                Paragraph bookmarkParagrapg = section2.AddParagraph();
                bookmarkParagrapg.AppendText("Here is a bookmark");
                BookmarkStart start = bookmarkParagrapg.AppendBookmarkStart("myBookmark");
                bookmarkParagrapg.Items.Insert(0, start);
                bookmarkParagrapg.AppendBookmarkEnd("myBookmark");
    
                //Link to the bookmark
                paragraph.AppendHyperlink("myBookmark", "Jump to a location inside this document", HyperlinkType.Bookmark);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add an image link
                Image image = Image.FromFile(@"C:\Users\Administrator\Desktop\logo.png");
                Spire.Doc.Fields.DocPicture picture = paragraph.AppendPicture(image);
                paragraph.AppendHyperlink("https://docs.microsoft.com/en-us/dotnet/", picture, HyperlinkType.WebLink);
    
                //Save to file
                doc.SaveToFile("InsertHyperlinks.docx", FileFormat.Docx2013);
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports System.Drawing
    
    Namespace InsertHyperlinks
        Class Program
            Shared  Sub Main(ByVal args() As String)
                'Create a Word document
                Document doc  =  New Document()
    
                'Add a section
                Dim section As Section =  doc.AddSection()
    
                'Add a paragraph
                Dim paragraph As Paragraph =  section.AddParagraph()
                paragraph.AppendHyperlink("https://www.e-iceblue.com/", "Home Page", HyperlinkType.WebLink)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add an email link
                paragraph.AppendHyperlink("mailto:support@e-iceblue.com", "Mail Us", HyperlinkType.EMailLink)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add a file link
                Dim filePath As String =  "C:\Users\Administrator\Desktop\report.xlsx"
                paragraph.AppendHyperlink(filePath, "Click to open the report", HyperlinkType.FileLink)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add another section and create a bookmark
                Dim section2 As Section =  doc.AddSection()
                Dim bookmarkParagrapg As Paragraph =  section2.AddParagraph()
                bookmarkParagrapg.AppendText("Here is a bookmark")
                Dim start As BookmarkStart =  bookmarkParagrapg.AppendBookmarkStart("myBookmark")
                bookmarkParagrapg.Items.Insert(0, start)
                bookmarkParagrapg.AppendBookmarkEnd("myBookmark")
    
                'Link to the bookmark
                paragraph.AppendHyperlink("myBookmark", "Jump to a location inside this document", HyperlinkType.Bookmark)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add an image link
                Dim image As Image =  Image.FromFile("C:\Users\Administrator\Desktop\logo.png")
                Dim picture As Spire.Doc.Fields.DocPicture =  paragraph.AppendPicture(image)
                paragraph.AppendHyperlink("https://docs.microsoft.com/en-us/dotnet/", picture, HyperlinkType.WebLink)
    
                'Save to file
                doc.SaveToFile("InsertHyperlinks.docx", FileFormat.Docx2013)
                System.Diagnostics.Process.Start("InsertHyperlinks.docx")
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    using Spire.Doc.Interface;
    
    namespace AddHyperlinksToExistingText
    {
        class Program
        {
            static void Main(string[] args)
            {
                //Create a Document object
                Document document = new Document();
    
                //Load a Word file
                document.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.docx");
    
                //Find all the occurrences of the string ".NET Framework" in the document
                TextSelection[] selections = document.FindAllString(".NET Framework", true, true);
    
                //Get the second occurrence
                TextRange range = selections[1].GetAsOneRange();
    
                //Get its owner paragraph
                Paragraph parapgraph = range.OwnerParagraph;
    
                //Get its position in the paragraph
                int index = parapgraph.Items.IndexOf(range);
    
                //Remove it from the paragraph
                parapgraph.Items.Remove(range);
    
                //Create a hyperlink field
                Spire.Doc.Fields.Field field = new Spire.Doc.Fields.Field(document);
                field.Type = Spire.Doc.FieldType.FieldHyperlink;
                Hyperlink hyperlink = new Hyperlink(field);
                hyperlink.Type = HyperlinkType.WebLink;
                hyperlink.Uri = "https://en.wikipedia.org/wiki/.NET_Framework";
                parapgraph.Items.Insert(index, field);
    
                //Insert a field mark "start" to the paragraph
                IParagraphBase start = document.CreateParagraphItem(ParagraphItemType.FieldMark);
                (start as FieldMark).Type = FieldMarkType.FieldSeparator;
                parapgraph.Items.Insert(index + 1, start);
    
                //Insert a text range between two field marks
                ITextRange textRange = new Spire.Doc.Fields.TextRange(document);
                textRange.Text = ".NET Framework";
                textRange.CharacterFormat.Font = range.CharacterFormat.Font;
                textRange.CharacterFormat.TextColor = System.Drawing.Color.Blue;
                textRange.CharacterFormat.UnderlineStyle = UnderlineStyle.Single;
                parapgraph.Items.Insert(index + 2, textRange);
    
                //Insert a field mark "end" to the paragraph
                IParagraphBase end = document.CreateParagraphItem(ParagraphItemType.FieldMark);
                (end as FieldMark).Type = FieldMarkType.FieldEnd;
                parapgraph.Items.Insert(index + 3, end);
    
                //Save to file
                document.SaveToFile("AddHyperlink.docx", Spire.Doc.FileFormat.Docx);
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    Imports Spire.Doc.Interface
    
    Namespace AddHyperlinksToExistingText
        Class Program
            Shared  Sub Main(ByVal args() As String)
                'Create a Document object
                Dim document As Document =  New Document()
    
                'Load a Word file
                document.LoadFromFile("C:\Users\Administrator\Desktop\sample.docx")
    
                'Find all the occurrences of the string ".NET Framework" in the document
                Dim selections() As TextSelection =  document.FindAllString(".NET Framework",True,True)
    
                'Get the second occurrence
                Dim range As TextRange =  selections(1).GetAsOneRange()
    
                'Get its owner paragraph
                Dim parapgraph As Paragraph =  range.OwnerParagraph
    
                'Get its position in the paragraph
                Dim index As Integer =  parapgraph.Items.IndexOf(range)
    
                'Remove it from the paragraph
                parapgraph.Items.Remove(range)
    
                'Create a hyperlink field
                Dim field As Spire.Doc.Fields.Field =  New Spire.Doc.Fields.Field(document)
                field.Type = Spire.Doc.FieldType.FieldHyperlink
                Dim hyperlink As Hyperlink =  New Hyperlink(field)
                hyperlink.Type = HyperlinkType.WebLink
                hyperlink.Uri = "https://en.wikipedia.org/wiki/.NET_Framework"
                parapgraph.Items.Insert(index, field)
    
                'Insert a field mark "start" to the paragraph
                Dim start As IParagraphBase =  document.CreateParagraphItem(ParagraphItemType.FieldMark)
                (start as FieldMark).Type = FieldMarkType.FieldSeparator
                parapgraph.Items.Insert(index + 1, start)
    
                'Insert a text range between two field marks
                Dim textRange As ITextRange =  New Spire.Doc.Fields.TextRange(document)
                textRange.Text = ".NET Framework"
                textRange.CharacterFormat.Font = range.CharacterFormat.Font
                textRange.CharacterFormat.TextColor = System.Drawing.Color.Blue
                textRange.CharacterFormat.UnderlineStyle = UnderlineStyle.Single
                parapgraph.Items.Insert(index + 2, textRange)
    
                'Insert a field mark "end" to the paragraph
                Dim end As IParagraphBase =  document.CreateParagraphItem(ParagraphItemType.FieldMark)
                (end as FieldMark).Type = FieldMarkType.FieldEnd
                parapgraph.Items.Insert(index + 3, end)
    
                'Save to file
                document.SaveToFile("AddHyperlink.docx", Spire.Doc.FileFormat.Docx)
            End Sub
        End Class
    End Namespace

PM> Install-Package Spire.Doc

using Spire.Doc;
    using Spire.Doc.Documents;
    using System.Drawing;
    
    namespace InsertHyperlinks
    {
        class Program
        {
            static void Main(string[] args)
            {
                //Create a Word document
                Document doc = new Document();
    
                //Add a section
                Section section = doc.AddSection();
    
                //Add a paragraph
                Paragraph paragraph = section.AddParagraph();
                paragraph.AppendHyperlink("https://www-iceblue.com/", "Home Page", HyperlinkType.WebLink);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add an email link
                paragraph.AppendHyperlink("mailto:support@e-iceblue.com", "Mail Us", HyperlinkType.EMailLink);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add a file link
                string filePath = @"C:\Users\Administrator\Desktop\report.xlsx";
                paragraph.AppendHyperlink(filePath, "Click to open the report", HyperlinkType.FileLink);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add another section and create a bookmark
                Section section2 = doc.AddSection();
                Paragraph bookmarkParagrapg = section2.AddParagraph();
                bookmarkParagrapg.AppendText("Here is a bookmark");
                BookmarkStart start = bookmarkParagrapg.AppendBookmarkStart("myBookmark");
                bookmarkParagrapg.Items.Insert(0, start);
                bookmarkParagrapg.AppendBookmarkEnd("myBookmark");
    
                //Link to the bookmark
                paragraph.AppendHyperlink("myBookmark", "Jump to a location inside this document", HyperlinkType.Bookmark);
    
                //Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak);
                paragraph.AppendBreak(BreakType.LineBreak);
    
                //Add an image link
                Image image = Image.FromFile(@"C:\Users\Administrator\Desktop\logo.png");
                Spire.Doc.Fields.DocPicture picture = paragraph.AppendPicture(image);
                paragraph.AppendHyperlink("https://docs.microsoft.com/en-us/dotnet/", picture, HyperlinkType.WebLink);
    
                //Save to file
                doc.SaveToFile("InsertHyperlinks.docx", FileFormat.Docx2013);
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports System.Drawing
    
    Namespace InsertHyperlinks
        Class Program
            Shared  Sub Main(ByVal args() As String)
                'Create a Word document
                Document doc  =  New Document()
    
                'Add a section
                Dim section As Section =  doc.AddSection()
    
                'Add a paragraph
                Dim paragraph As Paragraph =  section.AddParagraph()
                paragraph.AppendHyperlink("https://www.e-iceblue.com/", "Home Page", HyperlinkType.WebLink)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add an email link
                paragraph.AppendHyperlink("mailto:support@e-iceblue.com", "Mail Us", HyperlinkType.EMailLink)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add a file link
                Dim filePath As String =  "C:\Users\Administrator\Desktop\report.xlsx"
                paragraph.AppendHyperlink(filePath, "Click to open the report", HyperlinkType.FileLink)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add another section and create a bookmark
                Dim section2 As Section =  doc.AddSection()
                Dim bookmarkParagrapg As Paragraph =  section2.AddParagraph()
                bookmarkParagrapg.AppendText("Here is a bookmark")
                Dim start As BookmarkStart =  bookmarkParagrapg.AppendBookmarkStart("myBookmark")
                bookmarkParagrapg.Items.Insert(0, start)
                bookmarkParagrapg.AppendBookmarkEnd("myBookmark")
    
                'Link to the bookmark
                paragraph.AppendHyperlink("myBookmark", "Jump to a location inside this document", HyperlinkType.Bookmark)
    
                'Append line breaks
                paragraph.AppendBreak(BreakType.LineBreak)
                paragraph.AppendBreak(BreakType.LineBreak)
    
                'Add an image link
                Dim image As Image =  Image.FromFile("C:\Users\Administrator\Desktop\logo.png")
                Dim picture As Spire.Doc.Fields.DocPicture =  paragraph.AppendPicture(image)
                paragraph.AppendHyperlink("https://docs.microsoft.com/en-us/dotnet/", picture, HyperlinkType.WebLink)
    
                'Save to file
                doc.SaveToFile("InsertHyperlinks.docx", FileFormat.Docx2013)
                System.Diagnostics.Process.Start("InsertHyperlinks.docx")
            End Sub
        End Class
    End Namespace

using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    using Spire.Doc.Interface;
    
    namespace AddHyperlinksToExistingText
    {
        class Program
        {
            static void Main(string[] args)
            {
                //Create a Document object
                Document document = new Document();
    
                //Load a Word file
                document.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.docx");
    
                //Find all the occurrences of the string ".NET Framework" in the document
                TextSelection[] selections = document.FindAllString(".NET Framework", true, true);
    
                //Get the second occurrence
                TextRange range = selections[1].GetAsOneRange();
    
                //Get its owner paragraph
                Paragraph parapgraph = range.OwnerParagraph;
    
                //Get its position in the paragraph
                int index = parapgraph.Items.IndexOf(range);
    
                //Remove it from the paragraph
                parapgraph.Items.Remove(range);
    
                //Create a hyperlink field
                Spire.Doc.Fields.Field field = new Spire.Doc.Fields.Field(document);
                field.Type = Spire.Doc.FieldType.FieldHyperlink;
                Hyperlink hyperlink = new Hyperlink(field);
                hyperlink.Type = HyperlinkType.WebLink;
                hyperlink.Uri = "https://en.wikipedia.org/wiki/.NET_Framework";
                parapgraph.Items.Insert(index, field);
    
                //Insert a field mark "start" to the paragraph
                IParagraphBase start = document.CreateParagraphItem(ParagraphItemType.FieldMark);
                (start as FieldMark).Type = FieldMarkType.FieldSeparator;
                parapgraph.Items.Insert(index + 1, start);
    
                //Insert a text range between two field marks
                ITextRange textRange = new Spire.Doc.Fields.TextRange(document);
                textRange.Text = ".NET Framework";
                textRange.CharacterFormat.Font = range.CharacterFormat.Font;
                textRange.CharacterFormat.TextColor = System.Drawing.Color.Blue;
                textRange.CharacterFormat.UnderlineStyle = UnderlineStyle.Single;
                parapgraph.Items.Insert(index + 2, textRange);
    
                //Insert a field mark "end" to the paragraph
                IParagraphBase end = document.CreateParagraphItem(ParagraphItemType.FieldMark);
                (end as FieldMark).Type = FieldMarkType.FieldEnd;
                parapgraph.Items.Insert(index + 3, end);
    
                //Save to file
                document.SaveToFile("AddHyperlink.docx", Spire.Doc.FileFormat.Docx);
            }
        }
    }

Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    Imports Spire.Doc.Interface
    
    Namespace AddHyperlinksToExistingText
        Class Program
            Shared  Sub Main(ByVal args() As String)
                'Create a Document object
                Dim document As Document =  New Document()
    
                'Load a Word file
                document.LoadFromFile("C:\Users\Administrator\Desktop\sample.docx")
    
                'Find all the occurrences of the string ".NET Framework" in the document
                Dim selections() As TextSelection =  document.FindAllString(".NET Framework",True,True)
    
                'Get the second occurrence
                Dim range As TextRange =  selections(1).GetAsOneRange()
    
                'Get its owner paragraph
                Dim parapgraph As Paragraph =  range.OwnerParagraph
    
                'Get its position in the paragraph
                Dim index As Integer =  parapgraph.Items.IndexOf(range)
    
                'Remove it from the paragraph
                parapgraph.Items.Remove(range)
    
                'Create a hyperlink field
                Dim field As Spire.Doc.Fields.Field =  New Spire.Doc.Fields.Field(document)
                field.Type = Spire.Doc.FieldType.FieldHyperlink
                Dim hyperlink As Hyperlink =  New Hyperlink(field)
                hyperlink.Type = HyperlinkType.WebLink
                hyperlink.Uri = "https://en.wikipedia.org/wiki/.NET_Framework"
                parapgraph.Items.Insert(index, field)
    
                'Insert a field mark "start" to the paragraph
                Dim start As IParagraphBase =  document.CreateParagraphItem(ParagraphItemType.FieldMark)
                (start as FieldMark).Type = FieldMarkType.FieldSeparator
                parapgraph.Items.Insert(index + 1, start)
    
                'Insert a text range between two field marks
                Dim textRange As ITextRange =  New Spire.Doc.Fields.TextRange(document)
                textRange.Text = ".NET Framework"
                textRange.CharacterFormat.Font = range.CharacterFormat.Font
                textRange.CharacterFormat.TextColor = System.Drawing.Color.Blue
                textRange.CharacterFormat.UnderlineStyle = UnderlineStyle.Single
                parapgraph.Items.Insert(index + 2, textRange)
    
                'Insert a field mark "end" to the paragraph
                Dim end As IParagraphBase =  document.CreateParagraphItem(ParagraphItemType.FieldMark)
                (end as FieldMark).Type = FieldMarkType.FieldEnd
                parapgraph.Items.Insert(index + 3, end)
    
                'Save to file
                document.SaveToFile("AddHyperlink.docx", Spire.Doc.FileFormat.Docx)
            End Sub
        End Class
    End Namespace