vb的textbox在直接粘贴excel单元格，为什么会在字串后面显示回车符和换行符两个空白的字节，求大神解疑！！

[haroldx]

如题，我的操作系统是win7，vb6.0是繁体中文版，打过繁体sp6的补丁，textbox粘贴的时候会显示后面的两个空白格，在进行字符串的比较的时候导致结果出错了，而我同事的电脑的操作系统是xp，vb6.0是英文版，打的补丁是英文版的补丁，textbox粘贴的时候不会显示，进行字符串的比较的时候也不需要考虑，但是如果用len函数显示长度，也会比复制的字符串多两个字节。
为什么我同事的电脑的程序不会受回车符和换行符的影响呢？而我开发的程序就必须得考虑这个原因，这是为什么？

[haroldx]

有人知道吗？求解答

[赵4老师]

a1=replace(a,vbCr,""):a=replace(a1,vbLf,"")
b1=replace(b,vbCr,""):b=replace(b1,vbLf,"")
if a=b then '忽略a和b中的换行回车后比较a和b

[haroldx]

引用 2 楼 zhao4zhong1 的回复:

a1=replace(a,vbCr,""):a=replace(a1,vbLf,"")
b1=replace(b,vbCr,""):b=replace(b1,vbLf,"")
if a=b then '忽略a和b中的换行回车后比较a和b

解决的方法我知道，我想知道的是出现这种情况的原因到底是什么。。

[赵4老师]

教授喜欢研究理论尤其是基础理论； 工程师擅长绕道解决问题，不擅长探究发生问题的根源。

[haroldx]

引用 4 楼 zhao4zhong1 的回复:

教授喜欢研究理论尤其是基础理论； 工程师擅长绕道解决问题，不擅长探究发生问题的根源。

这个问题找了好几天都没人能答得上个为什么来

[赵4老师]

引用 3 楼 haroldx 的回复:

[quote=引用 2 楼 zhao4zhong1 的回复:]

a1=replace(a,vbCr,""):a=replace(a1,vbLf,"")
b1=replace(b,vbCr,""):b=replace(b1,vbLf,"")
if a=b then '忽略a和b中的换行回车后比较a和b

解决的方法我知道，我想知道的是出现这种情况的原因到底是什么。。[/quote] 我猜是繁体和简体对应的dll功能或版本略有差异。

[haroldx]

引用 6 楼 zhao4zhong1 的回复:

[quote=引用 3 楼 haroldx 的回复:] [quote=引用 2 楼 zhao4zhong1 的回复:]

a1=replace(a,vbCr,""):a=replace(a1,vbLf,"")
b1=replace(b,vbCr,""):b=replace(b1,vbLf,"")
if a=b then '忽略a和b中的换行回车后比较a和b

解决的方法我知道，我想知道的是出现这种情况的原因到底是什么。。[/quote] 我猜是繁体和简体对应的dll功能或版本略有差异。[/quote] 简体的我还没有试，因为我公司那的电脑系统是繁体的，不过我试了将我原来的繁体vb6.0卸载掉，换成英文版的，结果还是一样。。然后试了visual studio的，还是一样。。