字符串到字节数组

说明1string表示这里要填入一个字符串变量；

        '        Dim sendbuf As Byte() = Encoding.ASCII.GetBytes(1 string) '中文，用Unicode编码方式，英文用ASCII方式，名称空间system.text
        '        Dim sendbuf As Byte() = Encoding.Unicode.GetBytes(1 string)

字节数组转字符串

                'str = Encoding.Unicode.GetString(msg) 'CStr(msg(i)) '中文，用Unicode编码方式，英文用ASCII方式，名称空间system.text
                str = Encoding.ASCII.GetString(msg) 'CStr(msg(i))
                'str &= " " CStr(msg(i))'cstr（）函数可以把数值，直接转换成10进制数字以字符形式显示；Hex()则是十六进制数字形式；