以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [讨论]判断一个字符串第几位是1还是2  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=86344)

--  作者:huhu
--  发布时间:2016/6/15 17:25:00
--  [讨论]判断一个字符串第几位是1还是2

比如有一个变量Vars("pgshdh") 它的值为A-ZSH130201605300001。我想根据它的第6位判断它是1还是2.

这个怎么写?


--  作者:大红袍
--  发布时间:2016/6/15 17:29:00
--  

Dim str As string = "A-ZSH130201605300001"

If str.Length >= 6 Then

    msgbox(str.Substring(5,1))

End If