急求好手帮忙

急求高手帮忙

我使用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替换这个“空格”到空串。

查看更多 下一篇