Sencillo control que implementa una galeria de imagenes. Teniendo una tabla que contenga el Titulo, Descripcion y la Foto, se agrega como un control de agrupacion. Contiene dos botones: "Anterior" y "Siguiente" que deben ser implementados para controlar las respectivas acciones.Los nombre de los botones son "btnAnterior" y "btnSiguiente".Gracias de antemano por las donaciones. Agrego un ejemplo de como implementarlos:
Visual Basic Editar script|Remove vbPrivate Sub [Screen]_Created() ' Write your code here. AddHandler Me.FindControl("[Nombre del control]").ControlAvailable, AddressOf [Sub para implementar los botones]End SubPrivate Sub [Sub para implementar los botones](sender As Object, e As ControlAvailableEventArgs) Dim grd As Grid = CType(e.Control, Grid) Dim btnPrev As Button = grd.FindName("btnAnterior") Dim btnNext As Button = grd.FindName("btnSiguiente") AddHandler btnPrev.Click, Sub() 'Implementacion del boton "Anterior" End Sub AddHandler btnNext.Click, Sub() 'Implementacion del boton "Siguiente" End SubEnd Sub Private Sub [Screen]_Created() ' Write your code here. AddHandler Me.FindControl("[Nombre del control]").ControlAvailable, AddressOf [Sub para implementar los botones] End Sub Private Sub [Sub para implementar los botones](sender As Object, e As ControlAvailableEventArgs) Dim grd As Grid = CType(e.Control, Grid) Dim btnPrev As Button = grd.FindName("btnAnterior") Dim btnNext As Button = grd.FindName("btnSiguiente") AddHandler btnPrev.Click, Sub() 'Implementacion del boton "Anterior" End Sub AddHandler btnNext.Click, Sub() 'Implementacion del boton "Siguiente" End Sub End Sub
|