以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  提取字符串的中文字代码该怎么写呢？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133334)

--  作者：royyang --  发布时间：2019/4/12 11:11:00 --  提取字符串的中文字代码该怎么写呢？ 一个字符窜含有数字英文符号和中文，想提取第一个中文字的位置该怎么写呢？ [此贴子已经被作者于2019/4/12 11:18:43编辑过]

--  作者：有点甜 --  发布时间：2019/4/12 13:10:00 --   Dim str As String = "abc,123你我他dd" For i As Integer = 0 To str.length-1     Dim s As String = str(i)     If Asc(s) < 0 Then         msgbox(i & " " & s)         Exit For     End If Next