InStr Function
αααα‘ααβααΈααΆααβααααβααααα’ααααβαα½αβαααα»αβααααα’ααααβαα½αβαααΒ α
ααΎαβα―αααΆαβαααβαααα»αβααααβααΆαβααβα’αΆα
ααΆαααβααααααα α
InStr ([Start As Long,] Text1 As String, Text2 As String[, Compare])
αααααβαααα‘αα α
α ααα½αβααα
αααΆαααΆαααααα α
βααααΆααβααααΌαβαααααβααααΆ
αααβα α»αβα αααααααΆβ
αααβαααααΎαβα―αααΆαβ PDF
ααααααααΒ α ααααααβαααβααααα α α·αααβ αααβαααααβααααααβααβααΆαβααααααααΒ α αααααβααααβαααΆαααΆααααααβα’αΆα βααΆ α α¬ α‘Β α αααααβααααΆαααΎαβααΊ α‘ αααααΆααβααΆαβααααααααβα’αααααβαααβαα·αβαααααΆααβα’ααααβααΌα ααΒ α ααααα α αααααΆααβααΆαβααααααααβαααααΈαβαααβαααααΆααβα’ααααααΌα ααΒ α
ααβααααβααΆαβααααΆααβαααα½αβα ααββ αααβαααααΆβαα»α
α§ααΆα ααα α
Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
sInput = "Office"
iPos = Instr(sInput,"c")
Print iPos
End Sub