解决狐表生成word报表时偶尔出现奇怪的?号

发表日期: 2021-10-21

1异常处理

问题:备注行的换行,输出word后有时候会多了符号

解决:需要用代码处理一下换行符.replace(chr(10),"")

Dim tm As String  = ProjectPath & "Attachments\test.doc" '指定模板文件
Dim fl As String = ProjectPath & "Reports\test.doc" '指定目标文件
Dim wrt As New WordReport(Tables("表A"),tm,fl) '定义一个WordReport
wrt.Replace("[第一列]",Tables("表A").Current("第一列").replace(chr(10),""))
wrt.BuildOne(Tables("表A").Current)
wrt.Show() '显示报表

2word报表推荐

在word推荐使用Chr(13)代替vbcrlf做换行符

更改前:

更改后:

而且在上述代码,发现vbCrlf也不一定会出问题,word的脾气比较奇怪



随便看看
商务联系QQ : 2385350359

Copyright 2016-2023 江门蓬江区华越科技公司 版权所有 | 承接软件定制开发,欢迎联系
粤ICP备19148806号-5