Sub "NotInheritable"

[PROKA]

I have a 'form1' form (a class) with a Button1_click Sub on it
How do I make this sub NotInheritable ? ( I have another form (form2) , Inheriting form1 and I want to put in another code for Button1_click )

 

[PlausiblyDamp]

You can only mark classes as NotInheritable, not individual functions. If you want to prevent a sub being overriden you can mark it NotOverridable.

 

[PROKA]

in The 2nd form, I want to write another code for Button1_sub

for example, if in form 1, Button1_sub does Msgbox("Form1,Button1") and I inherit form 1 ( in form 2 ) it will do the same

well , I want the button in form 2 to do msgbox("Form2,button1")

 

[JABE]

Apply Overridable on the parent sub while applying Overrides on the child sub.

 

[PROKA]

ok, it works now, except that the sub that overrides runs twice .

 

[PlausiblyDamp]

Are you calling it twice? Seems an unusual side effect. Any chance you could post the relevant code (base class , sub class and calling code for example)?

 

[PROKA]

Sure, Check the attachment

 

[PlausiblyDamp]

In form2 you don't need the Handles Button1.Click on the following line

Protected Overrides Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

The event is already being handled by the base class' Handles statement. Remove the handles clause and things sould now work.

 

[PROKA]

Good point
Thanks !