帮忙解释一下这段代码吧
<script language="vbscript">
<!--
dim instring,c
instring="the 7 dwarves"
dim i,strlen,formula
i=1
strlen=len(instring)
formula=-1
do while (i<=strlen) and (formula+-1)
c=mid(instring,i,1)
if isnumeric(c) then formula=i
i=i+1
loop
msgbox formula
-->
</script>
参考答案:哈哈
拆分字符串,算出最后一个数字在这个字符串中的位置 此函数 返回为5
如果 instring="the top 1" 函数 返回为9
如果 instring="the top 1123" 函数 返回为12
试试