以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  生成文档  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=194713)

--  作者:qaz17909
--  发布时间:2025/1/7 17:01:00
--  生成文档
生成文档的时候,如果生成的表格边框颜色用black,貌似上面会粗一点

另外,这个页码,有没有可能从第二页或者第三页开始编


--  作者:有点蓝
--  发布时间:2025/1/7 17:09:00
--  
我感觉边框一样

至于页码,如果是放在页眉页脚,现在只能统一设置

--  作者:狐狸爸爸
--  发布时间:2025/1/8 15:02:00
--  
可以这样:

Dim wdc As New WordCreator()
For i As Integer = 1 To 10
    wdc.AddParagraph("Foxtable 2025春季更新").Alignment = Word.RtfHorizontalAlignment.Left
    wdc.NewPage() \'必须用NewPage
    wdc.CurrentSection.Footer.Add(New Word.Objects.RtfString("第" & i & "页")) \'通过CurrentSection设置
Next 
Dim fl As String = "c:\\temp\\test.docx"
wdc.Save(fl) \'保存文件
Process.Start(fl) \'打开文件