vb.net小写转大写 vb将大写转换成小写

vb.net大小写字母转换

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click

创新互联公司坚持“要么做到，要么别承诺”的工作理念，服务领域包括：成都网站建设、成都做网站、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的灵山网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！

Dim s As String = "0Ff0ajkh04624F"

Dim i As Integer = 0

Dim sTemp As String = ""

Dim ss As String = ""

For i = 1 To Strings.Len(s)

sTemp = Mid(s, i, 1)

If Asc(sTemp) = 65 And Asc(sTemp) = 90 Then

sTemp = LCase(sTemp)

ElseIf Asc(sTemp) = 95 And Asc(sTemp) = 122 Then

sTemp = UCase(sTemp)

Else

sTemp = sTemp

End If

ss = ss sTemp

MsgBox(ss)

End Sub

String的成员函数中就有 ToUpper() 和 ToLower()啊

Dim a As String = "abcEd"

Dim b As String = a.ToUpper() //大写

Dim c As String = a.ToLower() //小写

可以试着用典型的VB字符串函数UCase解决。

比如先把输入的内容放到字符串A$中，若A$="a",则经

A$=UCase(A$)转换后，结果即是A$="A"。

我在程序中是这麽处理的。行不行，试试就知道了。

名称栏目：vb.net小写转大写 vb将大写转换成小写
文章地址：http://pwwzsj.com/article/dooojce.html