如题，如何自定义一个函数来实现查找指定字符串在另一字符串中第N个位置？
我是初学者，我知道寻找字符串的位置可以使用Instr函数，但是如果我寻找的字符在一个字符串中出现n次，我想随便找到其中的一次的位置，怎么自己编写一个函数来实现呢？请大家指教！！～～

我试着写了下，请大家看下这样写有没有问题？
Public Function InStrL(n As Integer,
inString As String, srchString As String) As Integer

Dim iCurPos As Integer

If Len(srchString)<>0 Then
If n=1 Then

iCurPos = InStr(inString, srchString)
Else
for iCurPos = 1 to n-1

iCurPos = InStr(iCurPos + 1, inString, srchString)
Next iCurPos

End If
End If
InStrL = iCurPos

End Function

根据楼上的我把原来写的改了下，看这样可以吗？
Public Function InStrL(n As Integer,
inString As String, srchString As String) As Integer

Dim iCurPos ，i As Integer

If Len(srchString)<>0 Then
iCurPos = 1
for i = 1 to n
iCurPos = InStr(iCurPos, inString, srchString)
Next iCurPos
End If

InStrL = iCurPos
End Function

谢谢，但是我不明白“If Len(srchString) = 0 Then InStrL = -1: Exit Function”
为什么要赋值为-1。

不好意思，楼上的方法不是很明白，可否稍微注解一下？？