国产Word .NET库组件Spire.Doc系列教程（54）：将ASCII字符设置为Word中的项目符 点

*这么优秀的国产工具怎能错过呢！在线下单专享“一口价”，查看折扣价！想要获取更多福利的朋友可以咨询在线客服哦~

C#

using Spire.Doc;using Spire.Doc.Documents;namespace SetBulletCharacter{    class Program    {        static void Main(string[] args)        {            //Create a Document object and add a section            Document doc = new Document();            Section section = doc.AddSection();            //Create four list styles based on different ASCII characters            ListStyle listStyle1 = new ListStyle(doc, ListType.Bulleted);            listStyle1.Name = "liststyle";            listStyle1.Levels[0].BulletCharacter = "x006e";            listStyle1.Levels[0].CharacterFormat.FontName = "Wingdings";            doc.ListStyles.Add(listStyle1);            ListStyle listStyle2 = new ListStyle(doc, ListType.Bulleted);            listStyle2.Name = "liststyle2";            listStyle2.Levels[0].BulletCharacter = "x0075";            listStyle2.Levels[0].CharacterFormat.FontName = "Wingdings";            doc.ListStyles.Add(listStyle2);            ListStyle listStyle3 = new ListStyle(doc, ListType.Bulleted);            listStyle3.Name = "liststyle3";            listStyle3.Levels[0].BulletCharacter = "x00b2";            listStyle3.Levels[0].CharacterFormat.FontName = "Wingdings";            doc.ListStyles.Add(listStyle3);            ListStyle listStyle4 = new ListStyle(doc, ListType.Bulleted);            listStyle4.Name = "liststyle4";            listStyle4.Levels[0].BulletCharacter = "x00d8";            listStyle4.Levels[0].CharacterFormat.FontName = "Wingdings";            doc.ListStyles.Add(listStyle4);            //Add four paragraphs and apply list style separately            Paragraph p1 = section.Body.AddParagraph();            p1.AppendText("Spire.Doc for .NET");            p1.ListFormat.ApplyStyle(listStyle1.Name);            Paragraph p2 = section.Body.AddParagraph();            p2.AppendText("Spire.PDF for .NET");            p2.ListFormat.ApplyStyle(listStyle2.Name);            Paragraph p3 = section.Body.AddParagraph();            p3.AppendText("Spire.XLS for .NET");            p3.ListFormat.ApplyStyle(listStyle3.Name);            Paragraph p4 = section.Body.AddParagraph();            p4.AppendText("Spire.Presentation for .NET");            p4.ListFormat.ApplyStyle(listStyle4.Name);            //Save to file            doc.SaveToFile("output.docx", FileFormat.Docx2013);        }    }}

VB.NET

Imports Spire.DocImports Spire.Doc.DocumentsNamespace SetBulletCharacter    Class Program        Shared  Sub Main(ByVal args() As String)            'Create a Document object and add a section            Document doc = New Document()            Dim section As Section = doc.AddSection()            'Create four list styles based on different ASCII characters            Dim listStyle1 As ListStyle = New ListStyle(doc, ListType.Bulleted)            listStyle1.Name = "liststyle"            listStyle1.Levels(0).BulletCharacter = "x006e"            listStyle1.Levels(0).CharacterFormat.FontName = "Wingdings"            doc.ListStyles.Add(listStyle1)            Dim listStyle2 As ListStyle =  New ListStyle(doc, ListType.Bulleted)            listStyle2.Name = "liststyle2"            listStyle2.Levels(0).BulletCharacter = "x0075"            listStyle2.Levels(0).CharacterFormat.FontName = "Wingdings"            doc.ListStyles.Add(listStyle2)            Dim listStyle3 As ListStyle =  New ListStyle(doc, ListType.Bulleted)            listStyle3.Name = "liststyle3"            listStyle3.Levels(0).BulletCharacter = "x00b2"            listStyle3.Levels(0).CharacterFormat.FontName = "Wingdings"            doc.ListStyles.Add(listStyle3)            Dim listStyle4 As ListStyle =  New ListStyle(doc, ListType.Bulleted)            listStyle4.Name = "liststyle4"            listStyle4.Levels(0).BulletCharacter = "x00d8"            listStyle4.Levels(0).CharacterFormat.FontName = "Wingdings"            doc.ListStyles.Add(listStyle4)            'Add four paragraphs and apply list style separately            Dim p1 As Paragraph = section.Body.AddParagraph()            p1.AppendText("Spire.Doc for .NET")            p1.ListFormat.ApplyStyle(listStyle1.Name)            Dim p2 As Paragraph =  section.Body.AddParagraph()            p2.AppendText("Spire.PDF for .NET")            p2.ListFormat.ApplyStyle(listStyle2.Name)            Dim p3 As Paragraph =  section.Body.AddParagraph()            p3.AppendText("Spire.XLS for .NET")            p3.ListFormat.ApplyStyle(listStyle3.Name)            Dim p4 As Paragraph =  section.Body.AddParagraph()            p4.AppendText("Spire.Presentation for .NET")            p4.ListFormat.ApplyStyle(listStyle4.Name)            'Save to file            doc.SaveToFile("output.docx", FileFormat.Docx2013)        End Sub    End ClassEnd Namespace

效果图：

是E-iceblue官方友好合作伙伴，如果您对spire.Doc感兴趣，可以联系在线客服了解具体授权价格和使用机制。
标签：