以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何返回某字符在一系列字符里的位置?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=97529)

--  作者:李睿涵
--  发布时间:2017/3/14 11:13:00
--  如何返回某字符在一系列字符里的位置?
比如我事先定义一系列字符:一,二,三,四,五,上,山,打,老,虎
然后我输入一个字符,比如五
就能返回五在这系列里的位置:5
请问怎么写代码?

--  作者:狐狸爸爸
--  发布时间:2017/3/14 12:25:00
--  
Dim items() As String  = "一,二,三,四,五,上,山,打,老,虎".Split(",")
Return array.Indexof(items,"五")


--  作者:李睿涵
--  发布时间:2017/3/14 17:48:00
--  

谢谢狐爸回复

我发现我提问有误

应该是:我指定一个数,比如6,就返回这系列字符的第6个字:上


--  作者:有点蓝
--  发布时间:2017/3/14 17:56:00
--  
Dim items() As String  = "一,二,三,四,五,上,山,打,老,虎".Split(",")
Dim i As Integer = 6
Output.Show(items(i-1))