老师，我通过目录树查找对应的行，当数据表中分类前面有空格六查找不到对应的行，怎么解决？

比如我点综合管理，定位不到第一行，如果表中数据前面没有空格就没问题，但空格又必须有。

此主题相关图片如下：qq截图20191101094650.png

AfterSelectNode事件代码如下：

Select Case e.Node.Level
    Case 0
        Dim r As Integer
        r = Tables(vars("editTable")).FindRow("[分类] Like \'" & e.Node.text & "\'") \'从第一行开始查找
        If r >= 0 Then \'如果找到的话
            Tables(vars("editTable")).Position = r \'定位到找到的行.
        End If
    Case 1
        Dim r1 As Integer
        r1 = Tables(vars("editTable")).FindRow("[分组] Like \'" & e.Node.text & "\' and [分类] Like \'" & e.Node.ParentNode.text & "\'") \'从第一行开始查找
        If r1 >= 0 Then \'如果找到的话
            Tables(vars("editTable")).Position = r1 \'定位到找到的行.
        End If
    Case 2
        Dim r2 As Integer
        r2 = Tables(vars("editTable")).FindRow("[名称] Like \'" & e.Node.text & "\' and [分组] Like \'" & e.Node.ParentNode.text & "\'") \'从第一行开始查找
        If r2 >= 0 Then \'如果找到的话
            Tables(vars("editTable")).Position = r2 \'定位到找到的行.
        End If
End Select