first = InStr( [ start, ] str, [ Any ] substring )
Parameters
str
The string to be searched.
substring
The substring to find.
start
The position in str at which the search will begin.
Return Value
The position of the first occurrence of substring in str.
Description
Locates the position of the first occurrence of a substring or character within a string. In the first form of InStr, the search begins at the first character.
Zero (0) is returned if substring is not found, either str or substring are empty strings, or start < 1.
If the Any keyword is specified, InStr returns the first occurrence of any character in substring.
Example
' It will return 4 PrintInStr("abcdefg","de")
' It will return 0 PrintInStr("abcdefg","h")
' It will search for any of the characters "f", "b", "c", and return 2 as "b" is encountered first PrintInStr("abcdefg",Any"fbc")
DimtestAsString DimidxAsInteger
test="abababab" idx=InStr(test,"b")
DoWhileidx>0'if not found loop will be skipped Print"""b"" at "&idx idx=InStr(idx+1,Test,"b") Loop
'A Unicode example:
dim text as wstring*20
text = "Привет, мир!"
print instr(text,"ет") ' displays 5
Platform Differences
The wide-character string version of InStr is not supported for DOS target.
Differences from QB
QB returns start if search is a zero length string.
Знаете ли Вы, как разрешается парадокс Ольберса? (Фотометрический парадокс, парадокс Ольберса - это один из парадоксов космологии, заключающийся в том, что во Вселенной, равномерно заполненной звёздами, яркость неба (в том числе ночного) должна быть примерно равна яркости солнечного диска. Это должно иметь место потому, что по любому направлению неба луч зрения рано или поздно упрется в поверхность звезды. Иными словами парадос Ольберса заключается в том, что если Вселенная бесконечна, то черного неба мы не увидим, так как излучение дальних звезд будет суммироваться с излучением ближних, и небо должно иметь среднюю температуру фотосфер звезд. При поглощении света межзвездным веществом, оно будет разогреваться до температуры звездных фотосфер и излучать также ярко, как звезды. Однако в дело вступает явление "усталости света", открытое Эдвином Хабблом, который показал, что чем дальше от нас расположена галактика, тем больше становится красным свет ее излучения, то есть фотоны как бы "устают", отдают свою энергию межзвездной среде. На очень больших расстояниях галактики видны только в радиодиапазоне, так как их свет вовсе потерял энергию идя через бескрайние просторы Вселенной. Подробнее читайте в FAQ по эфирной физике.