InStr Function

返回某个字符串在另一字符串中的位置。

Instr 函数返回两个字符串相匹配的位置。如果在另一个字符串中未找到给定的字符串,则返回 0。

语法:

InStr ([Start As Integer,] Text1 As String, Text2 As String[, Compare])

返回值:

整数

参数:

Start:数字表达式,标记字符串中搜索指定子字符串的起始位置。如果省略此参数,搜索将从字符串的第一个字符开始。允许的最大值是 65535。

Text1:要在其中进行搜索的字符串表达式。

Text2:要搜索的字符串表达式。

Compare:用来定义比较类型的可选数字表达式。此参数的值可为 0 或 1。默认值 1 指定文字比较(不区分大小写)。值 0 指定二进制比较(区分大小写)。

为了避免运行时错误,如果省略了第一个返回参数,请不要设置 Compare 参数。

错误代码:

5 无效的过程调用

示例:

Sub ExamplePosition

Dim sInput As String

Dim iPos As Integer

    sInput = "Office"

    iPos = Instr(sInput,"v")

    Print iPos

End Sub