Remove Handler at Runtime

Expand Post »

I want to after clicking on button2,after that if i click on button1 then msg is not displayed

VB.NET Syntax (Toggle Plain Text)
 
 
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("sonia")
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        RemoveHandler Button2.Click, AddressOf MYEVENTHandler
    End Sub
 
    Private Sub MYEVENTHandler(ByVal sender As System.Object, ByVal e As System.EventArgs)
 
    End Sub
End Class

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("sonia")
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        RemoveHandler Button2.Click, AddressOf MYEVENTHandler
    End Sub

    Private Sub MYEVENTHandler(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub
End Class

Similar Threads

C# Remove Textboxes During Runtime in C#
Changing and removing controls in VB.NET
Virus Changed Background (same problem as mrvin) in Viruses, Spyware and other Nasties
remove controls in VB.NET
Internet explorer keeps crashing in Viruses, Spyware and other Nasties

sonia sardana

Reputation Points: 0

Solved Threads: 8

Posting Whiz

Offline

326 posts
since Mar 2008

Permalink

Sep 22nd, 2009

Re: Remove Handler at Runtime

Click to Expand / Collapse Quote originally posted by sonia sardana ...

I want to after clicking on button2,after that if i click on button1 then msg is not displayed
VB.NET Syntax (Toggle Plain Text)
 
 
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("sonia")
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        RemoveHandler Button2.Click, AddressOf MYEVENTHandler
    End Sub
 
    Private Sub MYEVENTHandler(ByVal sender As System.Object, ByVal e As System.EventArgs)
 
    End Sub
End Class
Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click MsgBox("sonia") End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click RemoveHandler Button2.Click, AddressOf MYEVENTHandler End Sub Private Sub MYEVENTHandler(ByVal sender As System.Object, ByVal e As System.EventArgs) End Sub End Class

In your Form Load, setup the event handler for Button1. So, remove the statement Handles Button1.Click at the end of the Button1.Click procedure.

In your Form_Load place the following:
Addhandler Button1.Click, AddressOf MYEVENTHandler

In your MYEVENTHandler place the following code:
msgbox ("sonia")

In the Button2_Click, use the existing code you have, it will work.

Hope this helps.

Last edited by CodeDoctor; Sep 22nd, 2009 at 9:27 pm. Reason: typo