[VB] 中文如何成转换16进制 如何, private, print, 中文

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