关于vb.net半角文字的信息

vb.net 如何把全角转换成半角

可以,用VB自带函数就可以了半角转全角:Text2.Text = StrConv(Text1.Text, )全角转半角:Text2.Text = StrConv(Text1.Text,vbNarrow)当然你可以做得智能一点,譬如只允许输入数字、符号和字母什么的。

公司主营业务:网站设计、成都网站建设、移动网站开发等业务。帮助企业客户真正实现互联网宣传,提高企业的竞争能力。创新互联公司是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化,感谢他们对我们的高要求,感谢他们从不同领域给我们带来的挑战,让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。创新互联公司推出景宁畲族自治免费做网站回馈大家。

转全角半角(C#,VB.NET)

/// 转全角的函数(SBC case) ///       ///

任意字符串

/// 全角字符串 ///        ///全角空格为 半角空格为        ///其他字符半角( )与全角( )的对应关系是 均相差 ///

public string ToSBC(string input) { //半角转全角     char[] c=input ToCharArray();       for (int i = ; i c Length; i++)     {        if (c[i]== )     {    c[i]=(char) ; continue;   }    if (c[i] ) c[i]=(char)(c[i]+ );    } return new string(c); } ///

/// 转半角的函数(DBC case) /// ///

任意字符串

/// 半角字符串 /// ///全角空格为 半角空格为 ///其他字符半角( )与全角( )的对应关系是 均相差 /// public string ToDBC(string input) { char[] c=input ToCharArray(); for (int i = ; i c Length; i++) { if (c[i]== ) { c[i]= (char) ; continue; } if (c[i] c[i] ) c[i]=(char)(c[i] ); } return new string(c); }

VB版本

lishixinzhi/Article/program/net/201311/11902

VB.Net如何测量含有中文的字符串长度

遍历每一个字符,看是全角还是半角的。半角的字符总数 +1,全角的字符总数 +2。

参考:

Public Function GetByteLength(ByVal value As String) As Long

Dim i As Long = 0

For Each c As Char In value

If (c.ToString().Length = System.Text.Encoding.Default.GetByteCount(value.ToString())) Then

i = i + 1

End If

i = i + 1

Next

Return i

End Function

VB.net的mid函数如何按照“字节数”来截取,而不用“字符数”,也就是汉字、全角符号要算2个字节

VB内部采用Unicode编码,在这种编码格式下,任何字符(包括半角的字母、数字、符号以及全角的汉字、符号)都是占用两个字节的。因此,Len("1111徐")的返回值是5,表示5个字符,而LenB("1111徐")的返回值是10,表示占用10个字节。

要想按ANSI编码格式来获取字符串的字节数,必须这样:

LenB(StrConv("1111徐", vbFromUnicode))

要注意哦,虽然返回值是6,但这个数与这个字符串在内存中的实际占用字节数是不相符的哦!


当前文章:关于vb.net半角文字的信息
分享URL:http://pwwzsj.com/article/doddehc.html