将字符从低位转换为大写,反之亦然VB.Net

时间:2014-01-24 13:43:38

标签: vb.net string uppercase lowercase

进行了搜索,无法找到答案。

我的任务是将字符串大小写转换为小写或大写字母,并将它们交换成圆形。

例如: - 输入: - “HeLlO”和输出: - “hElLo”

我知道我需要使用for循环,但是无法弄清楚如何逐步浏览每个字符,检查案例并在需要时切换它。

我可以创建一个循环计数并显示单个字符或一个简单的If语句将整个字符串转换为Upper或更低但如果我尝试组合2我的逻辑不正常。

任何人都可以提供帮助吗?

2 个答案:

答案 0 :(得分:4)

这是一种简单的方法:

Public Function InvertCase(input As String) As String
    Dim output As New StringBuilder()
    For Each i As Char In input
        If Char.IsLower(i) Then
            output.Append(Char.ToUpper(i))
        ElseIf Char.IsUpper(i) Then
            output.Append(Char.ToLower(i))
        Else
            output.Append(i)
        End If
    Next
    Return output.ToString()
End Function

它只是循环遍历原始字符串中的每个字符,检查它是什么情况,修复它,然后将该固定字符附加到新字符串(通过StringBuilder对象)。

正如Neolisk在下面的评论中所建议的那样,你可以通过创建另一个转换单个字符的方法来使它变得更干净,如下所示:

Public Function InvertCase(input As Char) As Char
    If Char.IsLower(input) Then Return Char.ToUpper(input)
    If Char.IsUpper(input) Then Return Char.ToLower(input)
    Return input
End Function

Public Function InvertCase(input As String) As String
    Dim output As New StringBuilder()
    For Each i As Char In input
        output.Append(InvertCase(i))
    Next
    Return output.ToString()
End Function

InvertCase(Char)使用相同的函数,您也可以使用LINQ,如下所示:

Public Function InvertCase(input As String) As String
    Return New String(input.Select(Function(i) InvertCase(i)).ToArray())
End Function

答案 1 :(得分:3)

作为Linq查询:

Dim input = "HeLlO"
Dim output = new String(input.Select(Function(c)
                            Return If(Char.IsLower(c),Char.ToUpper(c),Char.ToLower(c))
                        End Function).ToArray())
Console.WriteLine(output)

老实说,这几天谁写了循环? : - )