急求高手帮忙解决思路

急求高手帮忙

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

VB code

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        

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

探讨

虽然看上去一样，但是还可能有非显示字符的。

[解决办法]
用right或mid函数提取多了“空格”，用asc函数获取它的ascii码，然后用给你的数组成员加上这个字符，再进行比较。

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

查看更多 下一篇