[VBScript]搜尋某文字字串中首次出現的位置(判斷字串中是否包含某文字)

dim txt,pos
txt="This is a beautiful day!"
'A textual comparison starting at position 4
pos=InStr(4,txt,"is",1)
document.write(pos)

輸出：

6

定義和用法

InStr 函數可返回一個字符串在另一個字符串中首次出現的位置。
InStr 函數可返回下面的值：

• 如果 string1 為 ""（零長度） - InStr 返回 0
• 如果 string1 為 Null - InStr 返回 Null
• 如果 string2 為 "" - InStr 返回 start
• 如果 string2 為 Null - InStr 返回 Null
• 如果 string2 沒有找到 - InStr 返回 0
• 如果在 string1 中找到 string2，InStr 返回找到匹配字符串的位置。
• 如果 start > Len(string1) - InStr 返回 0

提示：請參閱 InStrRev 函數。

語法

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

參數	描述
start	可選的。規定每次搜索的起始位置。默認是搜索起始位置是第一個字符。如果已規定 compare 參數，則必須有此參數。
string1	必需的。需要被搜索的字符串。
string2	必需的。需搜索的字符串。
compare	必需的。規定要使用的字符串比較類型。默認是 0 。可採用下列值： 0 = vbBinaryCompare - 執行二進制比較。 1 = vbTextCompare - 執行文本比較。

參考：

http://www.w3school.com.cn/vbscript/func_instr.asp