疑问1：
Dim s1 = "利马是有名的""无雨之都""。”  

问题：上句省略“as string”不知是什么原因？

上面语句能否改为：Dim s1 as string = "利马是有名的""无雨之都""。”  

疑问2：下列语句中的“.Rowsel + 1”为什么“＋1”？
能不能改为“    r = .Find("abc", .Rowsel , .ColSel, False, False, True) ”？
或改为“    r = .Find("abc", 0, .ColSel, False, False, True)”？
或改为下列语句：
   With CurrentTable

    Dim r As Integer

    r = .Find("abc", .Rowsel + 1, 0, False, False, True)

    If r > - 1 Then \'如果找到符合条件的行

        .Select(r, 0) \'则选择该行

    End If

End With

原来语句：
   With CurrentTable

    Dim r As Integer

    r = .Find("abc", .Rowsel + 1, .ColSel, False, False, True)

    If r > - 1 Then \'如果找到符合条件的行

        .Select(r, .Colsel) \'则选择该行

    End If

End With