怎样用VB.net判断日文的全角和半角~ 救命呀！

1，怎样用VB.net判断日文的全角和半角 ？ 
2，XXX株式会社  例如：“XXX”是半角，株式会社是全角，是不是他们的Byte数不一样？假如我想取前8个byte的内容，如何取呢？

先谢谢各位大侠。

8 个解决方案

#1

半角的字符ascii码肯定是小于255的（英文）

半角/全角的日文只有片假名是有区别的，平假名都是一样的。
还有日文中的中国字，半角全角都一样。

识别半角/全角的片假名 也必须通过ascii判断，具体怎么判断需要知道日文文字的区位码。

#2

Dim str as string=tetName.text
For i As Integer = 0 To str.length - 1
    If str.Chars(i) < ChrW(255) Then
         ........半角
    else
        ........全角
    End If
Next

#3

对，大于255的字符基本就是全角字符了

#4

但是~汉字呢？ 处理不全面的

#5

i=System.Text.Encoding.Default.GetByteCount(我)
i=1 半角
i=2 全角
此方法可以判断任何全角半角

#6

我是来抗日的

#7

还得有个判断 例如 前7个是字母，第八个汉字，
则不能取（按你说的8 byte )

#8

kkbspod(我被可乐淹死了) ( ) 信誉：98  2006-07-12 13:05:00  得分: 0  
 
 
   i=System.Text.Encoding.Default.GetByteCount(我)
i=1 半角
i=2 全角
此方法可以判断任何全角半角

是可以用的 谢谢