Function(Of T) as T generic type polymorphic return object implementation

    Shared Function ResultT(Of T As result)(msg As String, Optional success As Boolean = False) As T
        Dim rsp As Models.result.result = GetType(T).Assembly.CreateInstance(GetType(T).FullName)
        rsp.msg = msg
        rsp.success = success
        Return rsp
    End Function

　

result is the base class