devxlogo

IsStringUpper – Determine whether a string contains only uppercase characters

IsStringUpper – Determine whether a string contains only uppercase characters

' Returns True if a string contains only uppercase charactersFunction IsStringUpper(ByVal sText As String) As Boolean    Dim c As Char    For Each c In sText        If Not Char.IsUpper(c) Then Return False    Next    Return TrueEnd Function

devx-admin

Share the Post: