Public Sub New(ByVal oldC As Control)
Dim FQTN As String = oldC.GetType.FullName
Dim t As Type = Type.GetType(FQTN)
Dim newC As Object = Activator.CreateInstance(t)
End Sub
FQTN
は正しいタイプ名を返していますがt
、Nothing
. たとえば、FQTN = System.Windows.Forms.Panel
.