Ver Mensaje Individual
  #2 (permalink)  
Antiguo 22/12/2004, 14:58
Avatar de HenrydeSousa
HenrydeSousa
 
Fecha de Ingreso: septiembre-2004
Ubicación: Venezuela
Mensajes: 300
Antigüedad: 19 años, 8 meses
Puntos: 2
Aqui les dejo la solución.

Imports System
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.ComponentModel
Imports System.Drawing

Public Class Buttons
Inherits WebControl
Implements INamingContainer

Public WithEvents Accept As New Button
Public WithEvents Cancel As New Button

Protected Overrides Sub CreateChildControls()
Accept.ID = "Accept"
Accept.Text = "Accept"
Me.Controls.Add(Accept)

Cancel.ID = "Cancel"
Cancel.Text = "Cancel"
Me.Controls.Add(Cancel)
End Sub

' Declare an Event
Public Event AceptarClick As EventHandler

' Event handler for button click
Protected Sub Accept_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Accept.Click
RaiseEvent AceptarClick(sender, e)
End Sub

' Declare an Event
Public Event CancelarClick As EventHandler

' Event handler for button click
Public Sub Cancel_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Cancel.Click
RaiseEvent CancelarClick(sender, e)
End Sub

End Class