以文本方式查看主题

-  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=132340)

--  作者:lihe60
--  发布时间:2019/3/20 10:22:00
--  如何判断一个字符串第二个字符是不是大写字母
如题
--  作者:有点甜
--  发布时间:2019/3/20 10:26:00
--  
Dim str As String = "ab1"
Dim s = str(1)
If Asc(s) >= asc("A") AndAlso Asc(s) <= asc("Z") Then
    msgbox("是")
Else
    msgbox("不是")
End If