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