| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- WebBrowser 粘贴文本换行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=153859) |
|
| -- 作者：飞云 -- 发布时间：2020/8/25 19:50:00 -- WebBrowser 粘贴文本换行 保存在数据表中文本是换行的，如： 1、qwerttyui； 2、lkhhasdkioa； 通过替换方式向WebBrowser中添加后，没有换行显示，如： 1、qwerttyui；2、lkhhasdkioa； 请问怎么解决。
|
|
| -- 作者：有点蓝 -- 发布时间：2020/8/25 20:08:00 -- 贴出具体代码说明 |
|
| -- 作者：飞云 -- 发布时间：2020/8/25 20:15:00 -- 模板“：（以网页代码存储） <p>
请问您是哪天来的？ </p> <p>
【001】 </p> 文本内容，以下内容替换【001】 1、第一天； 2、第二天； Dim txt As String=r("模板") For Each dr1 As Row In tb.Rows Dim s1 As String="【" & dr1("编号") & "】" If txt.Contains(s1) Then txt=txt.Replace(s1,dr1("文本内容")) \' End If Next |
|
| -- 作者：有点蓝 -- 发布时间：2020/8/25 20:42:00 -- txt=txt.Replace(s1,dr1("文本内容").replace(vbcr,"").replace(vblf,"<br/>")) |
|
| -- 作者：飞云 -- 发布时间：2020/8/25 20:49:00 -- 谢谢！还有一个问题，请问替换的内容如何保持一定的行距？WebBrowser不在编辑状态下，凡是超过一行的数据行距都比较紧，没有超过一行的数据是正常现显示的。如果导出到word时，如何保持表格的列宽？谢谢！ |
|
| -- 作者：有点蓝 -- 发布时间：2020/8/25 21:10:00 -- 行距试试
|
|
| -- 作者：飞云 -- 发布时间：2020/8/26 16:25:00 -- 您好，我是用html编辑器编辑的，然后导出到word，有办法统一HTML编辑器中文本的行距吗？ |
|
| -- 作者：有点蓝 -- 发布时间：2020/8/26 16:54:00 -- html编辑器如果有设置行距的功能就可以，不然没有办法 |