例: UCase function

' Convert a string to uppercase.
Dim upperCase As String
upperCase$ = UCase$("abc") ' Assign the value "ABC"