<script >
function evil()
{
var toint=parseInt("123");
var intvalue=123;
var tostr=intvalue.toString();
var my_friends ="trixie,moxie,sven,guido,hermes";
var friend_array =my_friends.split(",");
for (loop=0; loop < friend_array.length;loop++)
{
document.writeln(friend_array[loop] + " is myfriend.<br>");
}
}
</script>
Microsoft(R) Visual Basic(R) Scripting Edition
InStrRev 函数
描述
返回某字符串在另一个字符串中出现的从结尾计起的位置。
语法
InStrRev(string1, string2[, start[, compare]])
InStrRev 函数的语法有以下参数：
参数
描述
string1
必选。接受搜索的字符串表达式。
string2
必选。被搜索的字符串表达式。
start
可选。数值表达式，用于设置每次搜索的开始位置。如果省略，则默认值为 -1，表示从最后一个字符的位置开始搜索。如果 start 包含 Null，则出现错误。
compare
可选。在计算子字符串时，指示要使用的比较类型的数值。如果省略，将执行二进制比较。有关数值，请参阅“设置”部分。
设置
compare 参数可以有以下值：
常数
Value
描述
vbBinaryCompare
0
执行二进制比较。
vbDatabaseCompare
2
执行基于包含在数据库（在此数据库中执行比较）中的信息的比较。
返回值
InStrRev 返回以下值：
如果
InStrRev 返回
string1 为零长度
0
string1 为 Null
Null
string2 为零长度
start
string2 为 Null
Null
string2 没有找到
0
在 string1 中找到 string2
找到匹配字符串的位置
start > Len(string2)
0
说明
下面的示例利用 InStrRev 函数搜索字符串:
Dim SearchString, SearchChar, MyPos
SearchString ="XXpXXpXXPXXP" '要在其中搜索的字符串。
SearchChar = "P" ' 搜索 "P"。
'二进制比较从第10个字符开始。返回 9。
MyPos = InstrRev(SearchString, SearchChar, 10, 0)
'文本比较从最后一个字符开始。返回 12。
MyPos = InstrRev(SearchString, SearchChar, -1, 1)
' 缺省为二进制比较(最后一个参数省略)。返回 0。
MyPos = InstrRev(SearchString, SearchChar, 8)
注意 InStrRev 函数的语法不同于InStr 函数的语法。
