Imports System
Imports System.Text
Class Sample
Public Shared Sub Main()
Dim sb As New StringBuilder("abcd")
Dim str1 As [String] = "abcd"
Dim str2 As [String] = Nothing
Dim o2 As [Object] = Nothing
Console.WriteLine(str1.Equals(sb))
str2 = sb.ToString()
o2 = str2
Console.WriteLine(o2)
Console.WriteLine(str1.Equals(o2))
Console.WriteLine(str2)
Console.WriteLine(str1.Equals(str2))
Console.WriteLine([String].Equals(str1, str2))
End Sub
End Class
|