如果判断一个string里面含有unicode...?

Question

有这样的函数吗

Answer 1

if len(str)=lenb(strConv(str,vbFromUnicode)) then
         debug.print "有"
else
         debug.print "沒有"
end if

Answer 2

vb所有的字串都是按照unicode编码的

Answer 3

那如何判断某个文件是否unicode编码?

Answer 4

只能用概率统计实现的API是：IsTextUnicode
注意！结果只是统计结果（系统猜测到底是不是Unicode，所以结果未必可靠！）

Answer 5

istextunicode的结果不一定正确啊。
唉,这问题怎么解决.
我做了个类似word的东西，用richtextbox打开含有unicode的文本就会出问题
必须用另外的方法转换,但是如果文本是ansi的，这个转换就有问题了，所以必须得判断该文本是不是unicode.
判断如果文本文件的开头两个字节是0xFF和0xFE，那么就是Unicode，否则是ANSI。
可是怎样在vb里判断文本文件开头的两个字节啊?

Answer 6

好像98以上的系统字体默认都是unicode的(98打个补丁也可以)
如果不用unciode的可以用strConv来进行转换

Answer 7

想判断前两个字符可以用Open For Binary ，然后读前2个字符就可以了。
(但不一定所有Unicode文件都以0xFF 0xFE开头的。保险的方法还是再判断一次）