Access2000,如何通过VBA 统计一个字段中文本的行数。

Question

Access2000开发的系统，
假设表TABLE1中中FIELD1里面的值如下：
111
222
333
444
如何把行数统计出来？或者，有没有专门的函数，统计一个字符在另一个字符串中出现的次数？
如果有的话，只要统计出这段文本中VBCRLF出现的次数就可以了。
请指教！

Answer 1

可以用Split函数把字符串分给一个数组，数组的最大下标值就是所求的次数Dim arrTemp As Variant
arrTemp = Split("1111" & vbCrLf & "2222" & vbCrLf & "3333" & vbCrLf & "4444", vbCrLf)
MsgBox "vbCrlf出现的次数为：" & UBound(arrTemp)
Erase arrTemp