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
