UCase
La función UCase devuelve la cadena después de convertir la cadena ingresada en letras mayúsculas.Sintaxis
UCase(String)
Ejemplo
    Dim var
    var = "Microsoft VBScript"
    Print "Line 1 : " & UCase(var)
    var = "MS VBSCRIPT"
    Print "Line 2 : " & UCase(var)
    var = "microsoft"
    Print "Line 3 : " & UCase(var)
Resultado
    Line 1 : MICROSOFT VBSCRIPT
    Line 2 : MS VBSCRIPT
    Line 3 : MICROSOFT
