用于将一个类克隆到另一个对象类型的值注入器

Question

我正在使用它，但是我没有看到任何属性的值被克隆/从源注入到目标对象。

我知道我做得不对，有人可以帮帮我吗？

Protected Overrides Function SetValue(c As ConventionInfo) As Object
        If c.SourceProp.Type.IsValueType OrElse c.SourceProp.Type = GetType(String) OrElse c.TargetProp.Type.IsValueType OrElse c.TargetProp.Type = GetType(String) Then
            Return c.SourceProp.Value
        End If

        If c.SourceProp.Type.IsClass Then
            Dim obj = TryCast(c.SourceProp.Value, Object)
            If obj IsNot Nothing Then
                Dim clone = TryCast(Activator.CreateInstance(c.TargetProp.Type), Object)


                Return clone
            End If
        End If

        Return Activator.CreateInstance(c.TargetProp.Type).InjectFrom(Of CloneInjection)(c.SourceProp.Value)