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