Class GenericType(Of T) ' Creating an general Type of Class
    Private _anyvalue As T ' Creating variables that will be used
    Public Property Value() As T ' creating properties for variables
        Get
            Return _anyvalue
        End Get
        Set(ByVal value As T)
            _anyvalue = value
        End Set
    End Property
End Class

Class DummyUse
    Shared Sub Main()
        Dim name As New GenericType(Of String)
        name.Value = "Hefin"
        Console.WriteLine(name.Value)
    End Sub
End Class