１００分急救..中文转成asc码

uz58com 发布于 2008-10-15 09:22， 2050 次点击

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

2 回复

软编小虫2008-10-15 11:31

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

fairy42008-10-15 20:29

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