文章详情

短信预约-IT技能 免费直播动态提醒

请输入下面的图形验证码

提交验证

短信预约提醒成功

VB.NET中有哪些字符转换函数

2023-06-17 18:01

关注

这篇文章给大家介绍VB.NET中有哪些字符转换函数,内容非常详细,感兴趣的小伙伴们可以参考借鉴,希望对大家能有所帮助。

VB.NET字符转换代码操作实例:

  1. Public Function ToSBC()Function 
    ToSBC(ByVal input As String) 
    As String '转全角  

  2. Dim c As Char() = input.
    ToCharArray  

  3. Dim i As Integer = 0 

  4. While i < c.Length 

  5. If c(i) = ChrW(32) Then  

  6. c(i) = ChrW(12288)  

  7. ElseIf AscW(c(i)) < 127 Then  

  8. c(i) = ChrW((AscW(c(i)) + 65248))  

  9. End If 

  1. System.Math.Min(System.Threading.
    Interlocked.Increment(i), i - 1)  

  2. End While  

  3. Return New String(c)  

  4. End Function  

  5. Public Function ToDBC()Function 
    ToDBC(ByVal input As String) 
    As String '转半角  

  6. Dim c As Char() = input.ToCharArray  

  7. Dim i As Integer = 0 

  8. While i < c.Length 

  9. If AscW(c(i)) = 12288 Then  

  10. c(i) = ChrW(32)  

  11. ElseIf AscW(c(i)) > 65280 AndAlso 
    AscW(c(i)) < 65375 Then  

  12. c(i) = ChrW(AscW(c(i)) - 65248)  

  13. End If  

  14. System.Math.Min(System.Threading.
    Interlocked.Increment(i), i - 1)  

  15. End While  

  16. Return New String(c)  

  17. End Function 

关于VB.NET中有哪些字符转换函数就分享到这里了,希望以上内容可以对大家有一定的帮助,可以学到更多知识。如果觉得文章不错,可以把它分享出去让更多的人看到。

阅读原文内容投诉

免责声明:

① 本站未注明“稿件来源”的信息均来自网络整理。其文字、图片和音视频稿件的所属权归原作者所有。本站收集整理出于非商业性的教育和科研之目的,并不意味着本站赞同其观点或证实其内容的真实性。仅作为临时的测试数据,供内部测试之用。本站并未授权任何人以任何方式主动获取本站任何信息。

② 本站未注明“稿件来源”的临时测试数据将在测试完成后最终做删除处理。有问题或投稿请发送至: 邮箱/279061341@qq.com QQ/279061341

软考中级精品资料免费领

  • 历年真题答案解析
  • 备考技巧名师总结
  • 高频考点精准押题
  • 2024年上半年信息系统项目管理师第二批次真题及答案解析(完整版)

    难度     813人已做
    查看
  • 【考后总结】2024年5月26日信息系统项目管理师第2批次考情分析

    难度     354人已做
    查看
  • 【考后总结】2024年5月25日信息系统项目管理师第1批次考情分析

    难度     318人已做
    查看
  • 2024年上半年软考高项第一、二批次真题考点汇总(完整版)

    难度     435人已做
    查看
  • 2024年上半年系统架构设计师考试综合知识真题

    难度     224人已做
    查看

相关文章

发现更多好内容

猜你喜欢

AI推送时光机
位置:首页-资讯-后端开发
咦!没有更多了?去看看其它编程学习网 内容吧
首页课程
资料下载
问答资讯