VBA - 大写

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