首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

有关字符串有关问题的,请大家来看看

2012-01-10 
有关字符串问题的,请大家来看看我有这样几个字符串比如I1-1-01-1-9.jpg I1-1-1-1-009.jpg I1-1-001-1-1

有关字符串问题的,请大家来看看
我有这样几个字符串   比如   "I1-1-01-1-9.jpg "       I1-1-1-1-009.jpg "   I1-1-001-1-1219.jpg "   我现在要得到最后一个横线前面的数字   就是比如第一个我要 "I1-1-01-1 ",第二个我要 "I1-1-1-1 "     ,第三个我要 "I1-1-001-1 "       该怎么做呀!   等待大家回复呀


[解决办法]
public function aa(byval str as string) as string
Dim lngTemp As Long

lngTemp = InStrRev(str, "- ")
aa= Left(str, lngTemp - 1)
end function
[解决办法]
public function aa(byval str as string) as string
Dim lngTemp As Long

lngTemp = InStrRev(str, "- ")
aa= Left(str, lngTemp - 1)
end function
[解决办法]
正确的
我试过你的代码

热点排行