如何将Unicode字符保存到文本文件

这是在Word for MAC VBA中.我想将Unicode字符从文本框保存到文本文件.例如,这个字符“⅛”.

我用这个代码.

Dim N as Long
N = FreeFile
Dim strText as String
strText = Textbox1.Text 'This is what is in the textbox "⅛"
Open <file path> For Output As N 
     Print #N, strText
Close N

它不保存Unicode字符.我明白我必须改变文本编码格式.我怎么做?

同样,如何使用Unicode格式读取文本文件?

我希望这也适用于Mac上的VBA for Word,但在Windows上我有FileSystemObject的CreateTextFile方法(见MSDN doc).在那里,我可以定义创建一个unicode文本文件.

  Set fsObject = CreateObject("Scripting.FileSystemObject")
  Set xmlFile = fsObject.CreateTextFile("path/filename.txt", True, True) 'the second "true" forces a unicode file.

  xmlFile.write "YourUnicodeTextHere"
  xmlFile.close
https://stackoverflow.com/questions/18905489/how-to-save-a-unicode-character-to-a-text-file

本站文章除注明转载外,均为本站原创或编译
转载请明显位置注明出处:如何将Unicode字符保存到文本文件