unicode转换的问题,大家帮下忙,很急啊
Dim aa
aa = "萍萍 "
Dim bb
bb = StrConv(Trim(aa), vbUnicode)
MsgBox bb
Dim cc
cc = StrConv(Trim(bb), vbFromUnicode)
MsgBox cc
为什么萍萍能转换到unicode但是就是转换不回来呢,怎么解决呢??还是我机器问题,我机器2003啊，应该没有问题
[解决办法]
Dim aa() As Byte
aa = "萍萍 "
Dim bb() As Byte
bb = StrConv(Trim(aa), vbFromUnicode)
MsgBox bb
Dim cc() As Byte
cc = StrConv(bb, vbUnicode)
MsgBox cc
[解决办法]
Dim aa As String
aa = "萍萍 "
Dim bb As String
bb = StrConv(Trim(aa), vbFromUnicode)
MsgBox bb
Dim cc As String
cc = StrConv(bb, vbUnicode)
MsgBox cc
[解决办法]
Dim aa As String
aa = "萍 " '也怪了，只有萍字不行！
aa = "再 "
Dim bb
bb = StrConv(aa, vbUnicode)
Debug.Print bb
Dim cc
cc = StrConv(bb, vbFromUnicode)
Debug.Print cc
