［在ASP和Javascript中，如何获取字符串中最后一个字母的位置］

2008-04-14 11:03:31 1.1k 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

使用再生龙还原镜像文件到硬盘 1. 把制作好的再生龙光盘插入需要的电脑，开机按F4使用再生龙启动2. 选择默认的：Clonezailla live(Default settings,VGA 800*600),然后等待几分钟 3. 选择语言：简体中文 4. 选择不修改键盘映射 5. 选择使用再生龙 6. 选择硬盘/分区（存到/来自）镜像文件，此选项既可以制作镜像，也可以恢复镜像。 7. 使用本机的分区 ... 阅读详情

RT

比如“1B2A3”，我要获取字母A的位置，ASP和Javascript中分别实现！

希望能提供尽可能简单的方法，谢谢！

...全文

量化平台深度测评：聚宽 / 米筐 / 迅投 QMT 对比分析本文对比测评国内主流量化交易平台聚宽、米筐和迅投QMT，从回测性能、实盘稳定性和高级功能三方面展开分析。测试显示：聚宽在低频策略回测中效率最高（128秒），米筐次之；迅投QMT凭借C++直连架构实现最低延迟（150ms）和最高订单撤销成功率（98.5%）。平台特色方面，QMT的智能拆单算法可减少25%滑点损失，聚宽的因子库支持版本控制和缓存复用。建议低频策略选聚宽，高频交易选QMT，团队协作优先考虑聚宽。测试数据均来自合规实盘环境，建议根据策略特性进行试用验证。阅读详情

iooo-iio-oi

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

zl_c 2008-04-14

打赏
举报

用正则的JS版:

function GetLastLetterIndex(Str)

{

	var Pat = /[A-Z]/igm;			//不区分大小写

	var TempArr = Str.split("");	//倒入数组

	TempArr = TempArr.reverse();	//倒序

	Str = TempArr.join("");			//字符串倒序了

	var re = Str.search(Pat);		//按正则式搜索字母第1次出现的位置

	if(re == -1) return 0			//如果没有，返回0

	else return Str.length - re;	//转换成倒序前的位置

}

alert(GetLastLetterIndex("1d253512dD3"));

Atai-Lu 2008-04-14

打赏
举报

[Quote=引用 11 楼 chinmo 的回复:]
使用正则的话也是需要遍历
[/Quote]
用正则似乎比一般的循环遍历更耗资源...

一把编程的菜刀 2008-04-14

打赏
举报

str3="[aa22233]sdfsd67f54[bbb] "
Function ReplaceQuestion3(QStr)
Dim re
Set re = new RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "[A-Za-z]"
Set Matches =re.Execute(QStr)
Set re = Nothing
ReplaceQuestion3= Matches(0)

End Function
response.Write ReplaceQuestion3(str3)

这个是取第一个字母的

一把编程的菜刀 2008-04-14

打赏
举报

str3="[aa22233]sdfsd67f54[bbb] "
Function ReplaceQuestion3(QStr)
Dim re
Set re = new RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "[^A-Za-z]"
Set Matches =re.Execute(QStr)
Set re = Nothing
For Each Match in Matches
QStr=Replace(QStr,Match.Value,"")

Next
ReplaceQuestion3= QStr
End Function
response.Write ReplaceQuestion3(str3)

这个是取所有的字母，其实把红色部分变成取最大的那个就可以了

一把编程的菜刀 2008-04-14

打赏
举报

使用正则的话也是需要遍历

一把编程的菜刀 2008-04-14

打赏
举报

基本上都是循环遍历

zl_c 2008-04-14

打赏
举报

我的JS版,其他方法?我再想想:

function GetLastLetterIndex(Str)

{

	var StrLen = Str.length;

	var AscCode;

	Str = Str.toUpperCase();

	for(var i = (StrLen - 1);i >= 0;i--)

	{

		AscCode = Str.substr(i,1).charCodeAt();

		if(AscCode >=65 && AscCode <= 90) return i + 1;

	}

	return 0;

}

alert(GetLastLetterIndex("125234fgadfg3A245234d"));

iooo-iio-oi 2008-04-14

打赏
举报

楼上的正则倒是给了我一点提示，得到最后一个字母，再从原字符串取出最后一个匹配的位置，多谢！

其他好像都是循环遍历，有其他更快捷的方法吗？

Atai-Lu 2008-04-14

打赏
举报

晕，看成是获取最后一个字母了...

Atai-Lu 2008-04-14

打赏
举报



Function getLastWord(str)

		Set regEx = New RegExp

		regEx.Pattern = "(.*)([a-zA-Z])[^a-zA-Z]*"

		regEx.IgnoreCase = false

		regEx.Global = True

		str = regEx.Replace(str,"$2")

		getLastWord = str

		Set reg=nothing

End Function

str="1B2A3"

Response.Write(getLastWord(str)):Response.End()

zl_c 2008-04-14

打赏
举报

Dim TestStr

TestStr = "125234fgadfg3A245234d"

Response.Write(GetLastLetterIndex(TestStr))



Function GetLastLetterIndex(Str)

'获取字符串最后一个字母在字符串的位置

	Dim AscCode

	Dim ReIndex

	ReIndex = 0

	Str = Ucase(Str)

	StrLen = Len(Str)

	For i = StrLen to 1 Step -1

		AscCode = Asc(Mid(Str,i,1))

		If AscCode >= 65 and AscCode <= 90 Then

			ReIndex = i

			Exit For

		End If

	Next

	GetLastLetterIndex = ReIndex

End Function

一把编程的菜刀 2008-04-14

打赏
举报

楼上的不错
ASP其实写法与他上面，就是换下格式和对应函数

No_Data_Found 2008-04-14

打赏
举报

<%

function getLastLocation (str)

getLastLocation=0

l = len(str)



for i = 0 to l

	c = asc(mid(str,l-i,1))

	if	(c>"64" and c<"91") or (c>"96" and c<"123")  then 	

		getLastLocation = l-1-i

		exit for

	end if

next



end function 





str = "1B2A3"

response.Write getLastLocation(str)



%>

No_Data_Found 2008-04-14

打赏
举报

<script language="javascript">

function getLastLocation(str)

{

	var len = str.length;	



	for(var i=0;i<len;i++)

	{

		var s = str.substr(len-1-i,1);

		var c = s.charCodeAt();

		if( (c > 64 && c<91) || (c > 96 && c<123))

		{

			return len-1-i;

		}

	}

}



var str;

str = "1B2A3";



alert(getLastLocation(str));

</script>

返回 3

lxtrayn 2008-04-14

打赏
举报

javascript:
'1B2A3'.search('A');
ASP:
InStr（'A','1B2A3')

一把编程的菜刀 2008-04-14

打赏
举报

上面这个的运行时间几乎接近与0

一把编程的菜刀 2008-04-14

打赏
举报

str3="[aa22233]sdfsd67f54[bbb] "
Function ReplaceQuestion3(QStr)
Dim re
Set re = new RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "[A-Za-z]"
Set Matches =re.Execute(QStr)
Set re = Nothing
a=Matches.Count
ReplaceQuestion3=Matches(a-1)

End Function
response.Write ReplaceQuestion3(str3)

这个就是获取最后一个字母的，你可以与一般的循环遍历比较一下运行时间

一把编程的菜刀 2008-04-14

打赏
举报

这个比比一般的循环遍历更耗资源吗？？

一把编程的菜刀 2008-04-14

打赏
举报

str3="[aa22233]sdfsd67f54[bbb] "
Function ReplaceQuestion3(QStr)
Dim re
Set re = new RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "[A-Za-z]"
Set Matches =re.Execute(QStr)
Set re = Nothing
a=Matches.Count
ReplaceQuestion3=Matches(a-1)

End Function
response.Write ReplaceQuestion3(str3)

［在ASP和Javascript中，如何获取字符串中最后一个字母的位置］

相关推荐