VB6 利用InStrRev,反向查找字符串A到字符串B直接的内容,子程序 f_GetContentBetweenRevAB(ByVal strAll$, ByVal lngPosC&, ByVal strA$, ByVal strB$)新建From1(窗体),新建Command1(按钮CommandButton),代码:
找vbCrLf到):的内容,运行结果:
Num1
Num2):
Num3
Num4):
Num5
Num6
Num7
Num8
Num9
----------
Num4