逐梦论坛 » 编程开发 » 中文如何成转换16进制

398829134 发表于 2007-12-1 15:57

中文如何成转换16进制

private sub form_load()
    dim b() as byte, i as long, s as string
    me.autoredraw = true
    s = "我爱vb"
    b = strconv(s, vbfromunicode)
    for i = 0 to ubound(b)
        print hex(b(i)); " ";
    next
end sub

查看完整版本: 中文如何成转换16进制