再再挑战vb高手(字符串unicode)-质疑这里有没有vb高手--问题共300分答谢
codetest.txt
把这个文件用程序读出来
文件放在这个ftp
FTP下载账号:test
FTP下载密码:test
地址:test.qyeee.com
请大家动手试一下再发言,的确不一般,所以来挑战高手
前面开过2个贴子
http://expert.csdn.net/Expert/topic/2160/2160806.xml?temp=.5161096
http://expert.csdn.net/Expert/topic/2162/2162640.xml?temp=.2066614
分数不够,可以再加
有一个unicode文件,里面有一些西欧字符
现在要把读出来,用对话框显示
我用了下面一段程序,但是出问题,很多字符不能正常显示
请大家帮忙
Dim TempFile As Long
Dim LoadBytes() As Byte
TempFile = FreeFile
Open "d:\codeTEST.txt" For Binary As #TempFile
ReDim LoadBytes(1 To LOF(TempFile)) As Byte
Get #TempFile, , LoadBytes
Close TempFile
's 01 = StrConv(LoadBytes, vbFromUnicode)
MsgBox (LoadBytes)
其中关闭掉的那一行也不起什么作用,显示的字符还没有关闭后显示得多
请问应该怎么设置,是否loadbytes不对,应当设置为双子节的数据类型
vc中能够解决,可是vb中怎么解决呢?