https://github.com/ozzies-code/listtree
Proyecto que describe el manejo de listas, arboles y sus nodos
https://github.com/ozzies-code/listtree
Last synced: 4 months ago
JSON representation
Proyecto que describe el manejo de listas, arboles y sus nodos
- Host: GitHub
- URL: https://github.com/ozzies-code/listtree
- Owner: ozzies-code
- Created: 2024-12-30T17:11:23.000Z (over 1 year ago)
- Default Branch: master
- Last Pushed: 2024-12-30T17:42:07.000Z (over 1 year ago)
- Last Synced: 2025-08-11T19:44:12.735Z (11 months ago)
- Language: Visual Basic .NET
- Size: 56.6 KB
- Stars: 0
- Watchers: 1
- Forks: 0
- Open Issues: 0
-
Metadata Files:
- Readme: README.md
Awesome Lists containing this project
README
# ListTree
Este proyecto se basa en el uso de listas y arboles para mostrar diferentes elementos y nodos
de manera jerarquica y de forma indexada, lo que permite manejarlos a traves de diferentes
metodos como agregar, mostrar, elminar o limpiar toda la lista y el arbol de nodos.
# Actualizacion: 30/12/2024
# Hora: 13:33
Se agrego una actualizacion en la rama master para contar con la
version actualizada del proyecto.
Detalles Tecnicos del Proyecto:
Lenguaje: Visual Basic.NET
Version del Framawork: 4.7.2
This project is based on the use of lists and trees to display different elements and nodes
in a hierarchical and indexed manner, which allows them to be handled through different
methods such as adding, showing, deleting or clearing the entire list and node tree.
# Update: 12/30/2024
# Time: 1:33 PM
An update was added to the master branch to have the updated
version of the project.
Technical Details of the Project:
Language: Visual Basic.NET
Framework Version: 4.7.2

Code of the Project:
Public Class frmListTree
Private Sub frmListTree_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'lstMiListView.Items.Add("Miguel Cano")
'lstMiListView.Items.Add("Manuel Soto", 0)
'Se agregan elementos de la lista al cargarse el programa
Dim objElementoLista As ListViewItem
objElementoLista = lstMiListView.Items.Add("Miguel Huertas", 2)
objElementoLista.SubItems.Add("Valencia")
End Sub
Private Sub btnMostrar_Click(sender As Object, e As EventArgs) Handles btnMostrar.Click
If lstMiListView.SelectedItems.Count > 0 Then
MessageBox.Show(lstMiListView.SelectedItems(0).Text)
'Muestra los elementos seleccionados de la lista
End If
End Sub
Private Sub btnQuitar_Click(sender As Object, e As EventArgs) Handles btnQuitar.Click
lstMiListView.Items.Remove(lstMiListView.SelectedItems(0))
'Elimina elementos de la lista
End Sub
Private Sub btnLimpiar_Click(sender As Object, e As EventArgs) Handles btnLimpiar.Click
lstMiListView.Items.Clear()
'limpia la lista
End Sub
Private Sub btnAgregarNodo_Click(sender As Object, e As EventArgs) Handles btnAgregarNodo.Click
tvwLenguajes.Nodes.Add("Jaime")
tvwLenguajes.Nodes.Add("Visual Basic")
'Agrega un nodo Padre
End Sub
Private Sub btnNodoHijo_Click(sender As Object, e As EventArgs) Handles btnNodoHijo.Click
Dim objNodo As TreeNode
objNodo = tvwLenguajes.Nodes.Add("Jaime")
objNodo.Nodes.Add("Visual Basic")
'Agrega un nodo hijo
End Sub
Private Sub btnEliminarNodo_Click(sender As Object, e As EventArgs) Handles btnEliminarNodo.Click
tvwLenguajes.Nodes.Remove(tvwLenguajes.SelectedNode)
'Elimina el nodo seleccionado
'If Not (tvwLenguajes.SelectedNode Is Nothing) Then
'tvwLenguajes.Nodes.Remove(tvwLenguajes.SelectedNode)
'End If
End Sub
Private Sub BtnEliminarNodos_Click(sender As Object, e As EventArgs) Handles BtnEliminarNodos.Click
tvwLenguajes.Nodes.Clear()
'limpia todos los nodos
End Sub
End Class