
22/12/2004, 14:58
|
 | | | Fecha de Ingreso: septiembre-2004 Ubicación: Venezuela
Mensajes: 300
Antigüedad: 20 años, 6 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 |