Module Example
Public Sub Main()
Dim word As String = "File"
Dim others() As String = { word.ToLower(), word, word.ToUpper(), "file" }
For Each other As String In others
If word.Equals(other) Then
Console.WriteLine("{0} = {1}", word, other)
Else
Console.WriteLine("{0} {1} {2}", word, ChrW(&H2260), other)
End If
Next
End Sub
End Module