control Listview

Iniciado por softdonet, 4 Septiembre 2008, 17:49 PM

0 Miembros y 1 Visitante están viendo este tema.

softdonet

trabajndo con el control listview de como agragar y kitar elementos..............

Código (vbnet) [Seleccionar]

'----------este la parte k nos pemite agrgar lo eelemtos al control listivew
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim f As New ListViewItem
        Dim cod As String = Me.TextBox1.Text
        Dim nom As String = Me.TextBox2.Text
        f = Me.ListView1.Items.Add(cod)
        f.SubItems.Add(nom)
    End Sub

'--------para poder crear las columnas apartir del codigo sin hacer usu del asistente
'         las columnas se agregan en el evento load ,ya que se ejecuta ala '
   'momento de cargar el formuario
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' agrgando las cabeseras al control listview
        Me.ListView1.Columns.Add("codigo") '
        Me.ListView1.Columns.Add("Nombres")
        Me.ListView1.View = View.Details '`para ver detalladamente las columnas,   
        'aunque  tambien se podri hacer atraves del assitente
        Me.ListView1.CheckBoxes = True ' permite agregar los checkbox
    End Sub


'----------este sisguite codigo se nos sirvera para quitar los elementos solamente los k hemos selccionada atraves el checkbox
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        For Each row As ListViewItem In Me.ListView1.Items
            If row.Checked = True Then
                Me.ListView1.Items.Remove(row)
            End If
        Next
    End Sub
[code=vbnet]


Código (vb) [Seleccionar]
espero que  les sea de mucha utilidad, empesando con lo aportes .[/code]

seba123neo

pero aprende a postear en el foro correcto... :¬¬
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

ssccaann43 ©

Creo q los moderadores no han visto este post.  :¬¬
- Miguel Núñez
Todos tenemos derechos a ser estupidos, pero algunos abusan de ese privilegio...
"I like ^TiFa^"

softdonet