@NB_ answer is correct. Please refer to the roRegex documentation for validating any type of string.
You should create a Function as per @NB_ told and pass a string in function using if condition.
function isUppercase(s as String)
return CreateObject("roRegex", "[A-Z]", "").isMatch(s)
end function
if isUppercase(s) then
?"UpperCase String"
else
?"Not UpperCase String"
end if
You can do the same for else.