[VB] Nothing と比較すると、どうなるか?

VB の Nothing は、 C# とかの null とは違うのだ。 null 判定するには、 Is Nothing を使うのだ …と思い込んでるから、 比較演算子を使われたコードを読んでても、 しばらく気付かなかったわ。 f(^^;

てことで、 問題。
次のコードの出力を答えてください。 正解できたあなたには、VB マイスターの称号をお贈りしませうw

Dim s1 As String = Nothing
If (s1 = Nothing) Then
   Call Console.WriteLine("String の Nothing は Nothing と等しいです。")
Else
   Call Console.WriteLine("String の Nothing は Nothing と等しくありません。")
End If

Dim s2 As String = String.Empty
If (s2 = Nothing) Then
   Call Console.WriteLine("String.Empty は Nothing と等しいです。")
Else
   Call Console.WriteLine("String.Empty は Nothing と等しくありません。")
End If

Dim n1 As Integer = 0
If (n1 = Nothing) Then
   Call Console.WriteLine("Integer の 0 は Nothing と等しいです。")
Else
   Call Console.WriteLine("Integer の 0 は Nothing と等しくありません。")
End If

Dim n2 As Integer = 1
If (n2 = Nothing) Then
   Call Console.WriteLine("Integer の 1 は Nothing と等しいです。")
Else
   Call Console.WriteLine("Integer の 1 は Nothing と等しくありません。")
End If

Dim d1 As DateTime = DateTime.Today
If (d1 = Nothing) Then
   Call Console.WriteLine("DateTime.Today は Nothing と等しいです。")
Else
   Call Console.WriteLine("DateTime.Today は Nothing と等しくありません。")
End If

Dim d2 As DateTime = New DateTime()
If (d2 = Nothing) Then
   Call Console.WriteLine("New DateTime() は Nothing と等しいです。")
Else
   Call Console.WriteLine("New DateTime() は Nothing と等しくありません。")
End If

Visual Studio 2008 で実行した結果は、次のようになりました。 (白文字)

String の Nothing は Nothing と等しいです。
String.Empty は Nothing と等しいです。
Integer の 0 は Nothing と等しいです。
Integer の 1 は Nothing と等しくありません。
DateTime.Today は Nothing と等しくありません。
New DateTime() は Nothing と等しいです。

# やっぱさぁ、 VB のほうが難しいんだってば!!