Imports System

Public Module Module1

    public Class Vehicle

    End Class

    public Class Car 

    Inherits Vehicle

    End Class

    public Class Motorocycle  

    Inherits Vehicle

    End Class

    Public Sub Main()

        Dim obj as Object

        Dim hashtable As New System.Collections.HashTable 

​

        hashtable.Add("test", Nothing)

        obj = hashtable("test")

        Console.WriteLine("This is what's in there " + obj )

        'Uncomment this guy to see it fail

        'Console.WriteLine("This is what's in there as a toString " + obj.ToString())

    End Sub

End Module

​

​