VB.net 查找第一个和最后一个大写字母

Question

例如： 字符串 = Visual Basic 输出 = V C

我到处搜索都没有找到，vb.net可以做这个吗？

Answer 1

以下代码向前遍历字符串，直到找到一个大写字母，将其添加到结果中并退出第一个循环。然后它向后遍历字符串，直到找到一个大写字母，将其添加到结果中并退出循环。最后将结果返回给调用代码。

我怀疑这是一个学校/大学的作业，所以我建议你阅读Open letter to Students with homework problems

Private Function FirstAndLastCapitalLetter(s As String) As String
    Dim result As String = ""
    For i As Integer = 0 To s.Length - 1
        If s.Substring(i, 1) = s.Substring(i, 1).ToUpper Then
            result = result & s.Substring(i, 1)
            Exit For
        End If
    Next
    For i As Integer = s.Length - 1 To 0 Step -1
        If s.Substring(i, 1) = s.Substring(i, 1).ToUpper Then
            result = result & s.Substring(i, 1)
            Exit For
        End If
    Next
    Return result
End Function