Dim s As String
    s = "变巨"
    s = StrConv(s, vbUnicode, &H404)
    s = StrConv(s, vbFromUnicode, &H804)
    MsgBox (s)这样的句子以前写是对的(以前做过),现在却报“无效的过程调用或参数”