none
No se como hacer lo siguiente: RRS feed

  • Pregunta

  • Estoy desarrollando una especie de sistema de votaciones y mi problema es:

    Genero los picturebox con las imágenes de los candidatos, pero como hago para que sume los botos si todos los picturebox son generados con código

    como la hago para poner un evento y qe funcione diferente para cada imagen. Ya tengo esto

    Public Class Form1

        Dim Votos As New Votos
        Dim PosiX As Integer = 20
        Dim NombreCan(10) As String

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

            For I = 0 To 3

                Dim Nombre As New Label With {.Location = New Point(PosiX + 30, 130), .AutoSize = True}
                NombreCan(I) = InputBox("Entre El Nombre Del Candidato")
                Nombre.Text = NombreCan(I)
                Dim Imagen As New PictureBox With {.SizeMode = PictureBoxSizeMode.AutoSize, .Location = New Point(PosiX, 20), .Image = PictureBox1.Image, .Name = "Can" & NombreCan(I)}
                Me.Controls.Add(Imagen)
                Me.Controls.Add(Nombre)
                AddHandler Imagen.Click, AddressOf Votos.ImagenClick_1
                PosiX = PosiX + 100

            Next

        End Sub 
    domingo, 24 de febrero de 2013 0:07

Respuestas

  • podria en la propiedad Tag del control PictureBox asignar el nombre o algun identificador del candidato, entonces en el click usarias

    Private Sub ImagenClick_1(..)
    
        Dim pic As PictureBox = DirectCast(sender, PictureBox)
    
         Dim NombreCanAs String = CStr(pic.Tag)
    
         'resto codigo
    
    End Sub

    asi sabrias que candidato se selecciono

    Leandro Tuttini

    Blog
    Buenos Aires
    Argentina

    • Propuesto como respuesta Leandro TuttiniMVP domingo, 24 de febrero de 2013 18:37
    • Marcado como respuesta DavidPaisa05 lunes, 1 de abril de 2013 23:03
    domingo, 24 de febrero de 2013 4:29

Todas las respuestas

  • podria en la propiedad Tag del control PictureBox asignar el nombre o algun identificador del candidato, entonces en el click usarias

    Private Sub ImagenClick_1(..)
    
        Dim pic As PictureBox = DirectCast(sender, PictureBox)
    
         Dim NombreCanAs String = CStr(pic.Tag)
    
         'resto codigo
    
    End Sub

    asi sabrias que candidato se selecciono

    Leandro Tuttini

    Blog
    Buenos Aires
    Argentina

    • Propuesto como respuesta Leandro TuttiniMVP domingo, 24 de febrero de 2013 18:37
    • Marcado como respuesta DavidPaisa05 lunes, 1 de abril de 2013 23:03
    domingo, 24 de febrero de 2013 4:29
  • Muchas Gracias amigo era lo que buscaba fue 100% efectivo gracias 
    domingo, 24 de febrero de 2013 17:44