Visual Basic InStr 函数

定义和用法

InStr 函数可返回一个字符串在另一个字符串中首次出现的位置。

InStr 函数可返回下面的值:

  • 如果 string1 为 ""(零长度) - InStr 返回 0
  • 如果 string1Null - InStr 返回 Null
  • 如果 string2 为 "" - InStr 返回 start
  • 如果 string2Null - InStr 返回 Null
  • 如果 string2 没有找到 - InStr 返回 0
  • 如果在 string1 中找到 string2InStr 返回找到匹配字符串的位置。
  • 如果 start > Len(string1) - InStr 返回 0

提示:请参阅 InStrRev 函数

语法
  1. InStr([start,]string1,string2[,compare])
参数描述
start可选的。规定每次搜索的起始位置。默认是搜索起始位置是第一个字符。如果已规定 compare 参数,则必须有此参数。
string1必需的。需要被搜索的字符串。
string2必需的。需搜索的字符串。
compare

必需的。规定要使用的字符串比较类型。默认是 0 。可采用下列值:

  • 0 = vbBinaryCompare - 执行二进制比较。
  • 1 = vbTextCompare - 执行文本比较。

实例

例子 1
  1. Module Module1
  2. Sub Main()
  3. dim txt,pos
  4. txt="This is a beautiful day!"
  5. pos=InStr(txt,"his")
  6. Console.WriteLine(pos)
  7. End Sub
  8. End Module

输出:

  1. 2
例子 2
  1. Module Module1
  2. Sub Main()
  3. dim txt,pos
  4. txt="This is a beautiful day!"
  5. 'A textual comparison starting at position 4
  6. pos=InStr(4,txt,"is",1)
  7. Console.WriteLine(pos)
  8. End Sub
  9. End Module

输出:

  1. 6
例子 3
  1. Module Module1
  2. Sub Main()
  3. dim txt,pos
  4. txt="This is a beautiful day!"
  5. 'A binary comparison starting at position 1
  6. pos=InStr(1,txt,"B",0)
  7. Console.WriteLine(pos)
  8. End Sub
  9. End Module

输出:

  1. 0

分类导航