Howto create new object, of type of other object?

[Qwert]

Hello,

question regarding the following code:

Public Class MyCol
Inherits System.Collections.SortedList
....
Public Sub MyFunction( objMyClass As MyClass )

End Sub
....
End Class

How is it possible to create a NEW instance of the object MyClass inside
MyFunction (without adding functionality to MyClass)?
Something like:

Dim objNew As Object = CreateNewInstance( objMyClass )

Thanks.

 

[Cor Ligthert]

Qwert,

How is it possible to create a NEW instance of the object MyClass inside
MyFunction (without adding functionality to MyClass)?
Something like:

Dim objNew As Object = CreateNewInstance( objMyClass )

You mean
Dim objNew as New TheMyClass

You cannot instance an object, that goes only for classes.
(Not to mixup that object is a class, however an object is an instanced
class)

I just am guessing that this was the question.

Cor

 

[Qwert]

Yeah, no, what I mean is this:

MyClass
Public Function GetNew() As MyClass
Return New MyClass()
End Function
End MyClass

now, somewhere else I can do:

Public Sub MyFunction( objObject As Object)
Dim objObject1 As Object = objObject.GetNew()
Dim objObject2 As Object = objObject.GetNew()
End Sub

I want to do this, but without writing the GetNew() function for MyClass.
And MyFunction() does not know what type objObject will be.

 

[Herfried K. Wagner [MVP]]

How is it possible to create a NEW instance of the object MyClass inside
MyFunction (without adding functionality to MyClass)?
Something like:

Dim objNew As Object = CreateNewInstance( objMyClass )

Take a look at 'Activator.CreateInstance'.

 

[Cor Ligthert]

Quert,

You mean simple this?

Dim objObject1 As Object = New Mycl
Dim objObject2 As Object = New Mycl

(I would not use myclass in samples that is a reserved word)

I hope this helps,

Cor

 

[Robin Tucker]

Dim z As Object = Activator.CreateInstance(y.GetType())

 

[Qwert]

Yes, great, that's it. Thanks all.

Dim z As Object = Activator.CreateInstance(y.GetType())