code102a.txt

VB大全（精华版）源代码

Public Sub Main () 

  If UCase("Abc") = UCase("aBc") Then Debug.Print "They're equal!"
  If LCase("ABC") = LCase("abc") Then Debug.Print "They're equal!"
  If UCase("abcd") = UCase("abc") Then Debug.Print "They're not equal!"
End Sub