VB不能打开文件名中包含Unicode字符的文件,该怎么办?

例如，先在C盘下创建下一个名字中包括Unicode字符的文件：
先创建C:\1.txt，然后在文件名中加入Unicode字符：

Dim FSO As Object, fName As Object
Set FSO = CreateObject("scripting.filesystemobject")
Set fName = FSO.getfile("C:\1.txt")
fName.Name = "123456" & ChrB(&H21) + ChrB(&H22) & ".txt"

然后用下面的代码：
        CommonDialog1.MaxFileSize = 128
        CommonDialog1.FileName = ""
        CommonDialog1.Flags = cdlOFNExplorer + cdlOFNFileMustExist + cdlOFNLongNames
        CommonDialog1.Filter = "文件(*.txt)|*.txt"
        CommonDialog1.ShowOpen
        RichTextBox1.LoadFile CommonDialog1.FileName

用文件打开窗体选中这个文件：

结果报错：
不能访问指定的路径/文件名

如何才能让RichTextBox1可以读入这个名字中包括Unicode字符的文件中的内容？

---

用:shell("explorer 文件名") 试试

---

在Windows下用记事本等，是可以打开这个TXT文件的

---

fName.Name = "123456" & ChrB(&H21) + ChrB(&H22) & ".txt"
只是你这个文件名对话框不认，与文件内容无关

你这样试试：fName.Name = "123456" & "xxx" & ".txt"

---

引用

fNa