VBA Instr()函数

InStr()函数返回一个字符串第一次出现在一个字符串，从左到右搜索。返回搜索到的字符索引位置。

语法

InStr([start,]string1,string2[,compare])

Vb

参数说明

• Start - 一个可选参数。指定搜索的起始位置。搜索从第一个位置开始，从左到右。
• String1 - 必需的参数。要搜索的字符串。
• String2 - 必需的参数。要在String1中搜索的字符串。
• Compare - 一个可选参数。指定要使用的字符串比较。它可以采取以下提到的值：
  • 0 = vbBinaryCompare - 执行二进制比较(默认)
  • 1 = vbTextCompare - 执行文本比较

示例

参考以下代码 -

Private Sub Constant_demo_Click() 
   Dim Var As Variant 
   Var = "Microsoft VBScript" 
   MsgBox ("Line 1 : " & InStr(1, Var, "s")) 
   MsgBox ("Line 2 : " & InStr(7, Var, "s")) 
   MsgBox ("Line 3 : " & InStr(1, Var, "f", 1)) 
   MsgBox ("Line 4 : " & InStr(1, Var, "t", 0)) 
   MsgBox ("Line 5 : " & InStr(1, Var, "i")) 
   MsgBox ("Line 6 : " & InStr(7, Var, "i")) 
   MsgBox ("Line 7 : " & InStr(Var, "VB")) 
End Sub

Vb

当你执行上面的函数时，它会产生下面的输出。

Line 1 : 6
Line 2 : 0
Line 3 : 8
Line 4 : 9
Line 5 : 2
Line 6 : 16
Line 7 : 11

Shell

//原文出自【易百教程】，商业转载请联系作者获得授权，非商业转载请保留原文链接：https://www.yiibai.com/vba/vba_instr_function.html