专家坐堂-如何获得一个字符串的ASSI码Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何获得一个字符串的ASSI码  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=63319)

--  作者：lyfxybc
--  发布时间：2015/1/18 18:25:00
--  如何获得一个字符串的ASSI码

如何获得一个字符串的ASSII码

如下列字符串：

                TDDLLNUHF8RD

    代码如何写

      Dim charactertofind As String
    \'Find ASCII value of g
    charactertofind = "g"
    charactertofind = Asc(charactertofind)
    \'MsgBox(charactertofind) window code
    Response.Write(charactertofind) \'Web Code

--  作者：游
--  发布时间：2015/1/18 19:01:00
--

Dim str As String = "TDDLLNUHF8RD"
Dim Asc As New ASCIIEncoding
Dim AscArr() As Byte = Asc.GetBytes(str)
For i As Integer = 0 To AscArr.Length - 1
Output.show(AscArr(i))
Next

--  作者：lyfxybc
--  发布时间：2015/1/18 19:05:00
--
非常感谢

--  作者：lyfxybc
--  发布时间：2015/1/18 19:11:00
--
谢谢