摘要: Function chinese2unicode(Str) Dim Str_one:Str_one = "" Dim Str_unicode:Str_unicode = "" For i = 1 To Len(Str) Str_one = Mid(Str, i, 1... 阅读全文
posted @ 2014-07-24 15:41 ®Geovin Du Dream Park™ 阅读(403) 评论(0) 推荐(0) 编辑