１００分急救..中文转成asc码
vb6.0里面是这么写的
 Dim   AscArray()   As   Byte   
                      AscArray   =   StrConv(Text1.Text,  vbFromUnicode)   '转成asc码
vbnet该怎么写呢？？？

dim int1 as integer
int1=asc("要转换的字符")
多插一言:反转
dim chr1 as string
chr1=chr(integer)

Dim a As Byte()
        a = System.Text.Encoding.ASCII.GetBytes(Me.TextBox1.Text)
        MsgBox(a(0).ToString)