<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 EditionInStrRev 函数
描述
返回某字符串在另一个字符串中出现的从结尾计起的位置。
语法
InStrRev(
string1
,
string2[
,
start[
,
compare]]
)
InStrRev 函数的语法有以下参数:
参数描述string1必选。接受搜索的字符串表达式。string2必选。被搜索的字符串表达式。start可选。数值表达式,用于设置每次搜索的开始位置。如果省略,则默认值为 -1,表示从最后一个字符的位置开始搜索。如果 start 包含 Null,则出现错误。compare可选。在计算子字符串时,指示要使用的比较类型的数值。如果省略,将执行二进制比较。有关数值,请参阅“设置”部分。
设置
compare 参数可以有以下值:
常数Value描述vbBinaryCompare0执行二进制比较。vbDatabaseCompare2执行基于包含在数据库(在此数据库中执行比较)中的信息的比较。
返回值
InStrRev 返回以下值:
如果InStrRev 返回string1 为零长度0string1 为 NullNullstring2 为零长度startstring2 为 NullNullstring2 没有找到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 函数的语法。