主题:  xrayy___显示数据中的记录的时候,如何自动去掉多余的

xrayffa

职务:普通成员
等级:1
金币:0.0
发贴:11
#12004/10/14 13:42:58
要复制文章插入到数据库中,在复制的时候,它本身就带有很多个换行符,如:
11

22


333


44


55


然后直接拷贝插入数据库,在最后显示的时候,就按照原样显示了:
11

22


333


44


55


现在,我想让它这样显示:
11
22
33
44
55
而拷贝方法不变~~~
我就知道这一点,拷贝出来的文章的代码是这样的:
11
<br>
<br>
22
<br>
<br>
<br>
33
<br>
<br>
<br>
44
<br>
<br>
55
............
于是,假如在显示的时候能自动把多余的<br>删掉,只留一行~~那就达到我的目的了!
其实在插如记录的时候完全可以手工把多余的<br>去掉,但是效率问题~~



5D荣誉斑竹

职务:普通成员
等级:2
金币:10.0
发贴:710
#22004/10/18 17:15:43
普通文章拷贝到Text区域的时候,拷贝的回车是硬回车,即:vbCrLf,而不是<br>

如果你希望vbCrLf能转换成<br>的话,可以使用Replace函数替换

如果希望只留下一个<br>的话,可以使用一个过渡的特殊字符替换vbCrLf先,然后用<br>替换这个特殊字符

比如:
a = Replace(文章内容, vbCrLf, "@MyString")
b = Replace(a, "@MyString", "<br>")