读书人

急求好手帮忙

发布时间: 2012-12-23 11:28:15 作者: rapoo

急求高手帮忙

我使用VBA 把一个表格里某一单元格的值取出来和保存在一个字符串数组里的数进行比较
我通过调试,两个值看着是一样的,但是比较总是不相等,为什么,我都赋值给string再比较也一样


dailyBook.Sheets(i).Select
If Cells(s, 10) Is Nothing Then

Else
Dim tag As Integer

For r = 1 To UBound(arr_baseinfo)
Dim st, sb As String
st = Cells(s, 1).Value ‘这里是取一个单元格的值
sb = arr_baseinfo(r, 1) ‘这里是数组中对应位置的值
If StrComp(st, sb) = 0 Then '通过"="或是其它的比较都不通过,请高手指点
tag = r
r = UBound(arr_baseinfo)
End If

Next r

strString = strString & arr_baseinfo(tag, 3) & "(" & Cells(s, 10) & ")"
End If


[解决办法]
虽然看上去一样,但是还可能有非显示字符的。
[解决办法]
引用:
虽然看上去一样,但是还可能有非显示字符的。

认同这个观点,你可以Debug.Print一下这两个字符串的ASCII编码,看看是否一样?
[解决办法]
用right或mid函数提取多了“空格”,用asc函数获取它的ascii码,然后用给你的数组成员加上这个字符,再进行比较。

也可以根据你的串情况用replace替换这个“空格”到空串。

读书人网 >VB

热点推荐