bouton personnalisé événement click de tir deux fois

Question

Public Class MyNewButton 
     Inherits Button 

    Private _NewTag as string 
    Public Property NewTag() As String 

    Get 
       Return _NewTag 
      End Get 
      Set(ByVal value As Integer) 
       _NewTag = value 
      End Set 


    End Property 

End Class 

Maintenant, compiler après ce code et obtenir le nouveau bouton et l'utiliser comme suit:

Dim NewBtn as MyNewButton 

    NewBtn.Text="New Button" 
    NewBtn.NewTag="Here New tag string" ' This is the custom property 
    Addhandler NewBtn.Click Addressof Btn_Click() 








Private Sub Btn_Click() 

     msgbox("New Button") 
    End Sub 

Le problème est-il lorsque je clique sur ce bouton la méthode Btn_Click() exécuté deux fois Et la solution pour cela ?????? Nb. J'utilise l'application Windows vb.net pas l'application web

Answer 1

D'abord, votre code ne fonctionne pas. value as integer est faux, il doit être as String comme la propriété. Cela corrigé, je ne peux pas reproduire votre problème. Je ne pense pas que cela puisse provenir de ces parties du code que vous avez données.

En outre, les propriétés peuvent désormais en une ligne, http://msdn.microsoft.com/en-us/library/dd293589%28v=vs.100%29.aspx