Ms access 如何将此字符串拆分为两部分？

我想在Access 2000（Visual Basic函数）中拆分如下字符串：

分为两部分：

• 结果部分
• 评论部分

正如您所注意到的，这两个部分由一个空行分隔（始终，这是我们的分隔符）

[结果]和[评论]是文本块。我们不在乎里面有什么，除了：

结果部分没有任何空行，因此我们看到的第一个空行是分隔符

我希望我的函数只提取注释部分

以下是我尝试过的：

Public Function ExtractComm(txt As String) As String

Dim emptyLine As Integer

txt = Trim(txt)

'emptyLine = first empty line index ??
emptyLine = InStrRev(txt, (Chr(13) + Chr(10)) & (Chr(13) + Chr(10)))

'Comments part = all that is after the empty line ??
ExtractComm = Mid(txt, emptyLine + 4)

End Function

但效果不好。 如果我这样做：

我想获得：

"Comment1

Comment2"   

但我只得到了评论2。有没有办法提取评论部分

---

非常感谢

也许您需要使用

InStr

而不是

InStrRev

InStrRev

返回一个字符串在另一个字符串中第一次出现的位置，从字符串的右侧开始

仪表 返回一个整数，指定一个字符串在另一个字符串中第一次出现的起始位置

ExtractComm(
   "Res1
    Res2

    Comment1

    Comment2"
)

"Comment1

Comment2"