Overloading constructor in an abstract nested class

[Louis Somers]

Is it possible (if so how) to override the constructor in an abstract class?

Here is a simplified example of what I'm rtying to do:
Create a windows App, drop a button on the form and doubleclick it.
In the onClick event I have:

Button1.Text = New HelloJohn("Hi").ToString()
'should print "Hi John"

Paste the following under the event handler:
Private Class HelloJohn
Inherits HelloWorld

Public Overrides Sub SetName()
_name = "John"
End Sub
End Class

Private MustInherit Class HelloWorld
Protected _greeting As String
Protected _name As String = "world"

Public Sub New()
_greeting = "hello"
SetName()
End Sub

Public Sub New(ByVal Greeting As String)
_greeting = Greeting
SetName()
End Sub

Public MustOverride Sub SetName()

Public Overrides Function ToString() As String
Return _greeting & " " & _name
End Function
End Class

End Class

In this case I'm using a nested class but I tried it on a public class
(in the same namespace) with the same results.

Any Ideas?
Thanks in advance,
Louis

[Tom Shelton]

On 2008-01-04, Louis Somers <no*****@dontspamme.nowrote:

Is it possible (if so how) to override the constructor in an abstract class?

Here is a simplified example of what I'm rtying to do:
Create a windows App, drop a button on the form and doubleclick it.
In the onClick event I have:

Button1.Text = New HelloJohn("Hi").ToString()
'should print "Hi John"

Paste the following under the event handler:
Private Class HelloJohn
Inherits HelloWorld

Public Overrides Sub SetName()
_name = "John"
End Sub
End Class

Private MustInherit Class HelloWorld
Protected _greeting As String
Protected _name As String = "world"

Public Sub New()
_greeting = "hello"
SetName()
End Sub

Public Sub New(ByVal Greeting As String)
_greeting = Greeting
SetName()
End Sub

Public MustOverride Sub SetName()

Public Overrides Function ToString() As String
Return _greeting & " " & _name
End Function
End Class

End Class

In this case I'm using a nested class but I tried it on a public class
(in the same namespace) with the same results.

Any Ideas?
Thanks in advance,
Louis

Constructors are not inherited.... You need to add the constructors to
the derived class:

private class HelloJohn
Inherits HelloWorld

' you'll need this if you want the default behavior
public sub New()
MyBase.New()
End Sub

public sub New (byval greeting as string)
MyBase.New(greeting)
end sub
public overrides sub SetName()
_name = "John"
end sub
End Class

HTH

--
Tom Shelton

[Armin Zingler]

"Louis Somers" <no*****@dontspamme.noschrieb

Is it possible (if so how) to override the constructor in an
abstract class?

I don't see a problem with overriding constructors, just that constructors
are not inherited because they determine how an instance of a class can be
created.
Armin

[Louis Somers]

Tom Shelton schreef:

On 2008-01-04, Louis Somers <no*****@dontspamme.nowrote:

>Is it possible (if so how) to override the constructor in an abstract class?

Here is a simplified example of what I'm rtying to do:
Create a windows App, drop a button on the form and doubleclick it.
In the onClick event I have:

Button1.Text = New HelloJohn("Hi").ToString()
'should print "Hi John"

Paste the following under the event handler:
Private Class HelloJohn
Inherits HelloWorld

Public Overrides Sub SetName()
_name = "John"
End Sub
End Class

Private MustInherit Class HelloWorld
Protected _greeting As String
Protected _name As String = "world"

Public Sub New()
_greeting = "hello"
SetName()
End Sub

Public Sub New(ByVal Greeting As String)
_greeting = Greeting
SetName()
End Sub

Public MustOverride Sub SetName()

Public Overrides Function ToString() As String
Return _greeting & " " & _name
End Function
End Class

End Class

In this case I'm using a nested class but I tried it on a public class
(in the same namespace) with the same results.

Any Ideas?
Thanks in advance,
Louis

Constructors are not inherited.... You need to add the constructors to
the derived class:

private class HelloJohn
Inherits HelloWorld

' you'll need this if you want the default behavior
public sub New()
MyBase.New()
End Sub

public sub New (byval greeting as string)
MyBase.New(greeting)
end sub
public overrides sub SetName()
_name = "John"
end sub
End Class

HTH

Thanks!