Imports System
Public Class MainClass
Shared Sub Main()
Dim string1 As String = "hello"
Dim string2 As String = "Hello"
Dim quotes As Char = ChrW(34)
Console.WriteLine( "The hash code for " & quotes & string1 & _
quotes & " is " & string1.GetHashCode() )
Console.WriteLine( "The hash code for " & quotes & string2 & _
quotes & " is " & string2.GetHashCode() )
End Sub ' Main
End Class
|