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