VBA UCase()函数

UCase函数将输入的字符串转换为大写字母后返回字符串。

语法

UCase(String)

示例

添加一个模块，并将下面的代码放在编辑器中。

Private Sub Constant_demo_Click()
   var = "Microsoft VBScript"
   msgbox("Line 1 : " & UCase(var))

   var = "MS VBSCRIPT"
   msgbox("Line 2 : " & UCase(var))

   var = "microsoft"
   msgbox("Line 3 : " & UCase(var))
End Sub

执行上面示例代码，得到以下结果 -

Line 1 : MICROSOFT VBSCRIPT
Line 2 : MS VBSCRIPT
Line 3 : MICROSOFT