Pilas

Las pilas son un grupo ordenado de elementos homogéneos, que solo permite agregar o  eliminar elementos atra vez de la cabeza de la pila; por eso es conocida como una estructura lifo.

Para utilizar una pila es necesario importar  una clase, que haga referencia a esta, en Visual Basic 2010. Net

Para la realización de este ejemplo es necesario realizar una interfaz como esta:

El cual consta de:

·         5 botones.

·         1 Textbox

Se importa la clase:

Imports Systems.Collections.Stack

Y necesario declarar una variable tipo pila.

Dim pila As New Stack

Las operaciones básicas de las pilas son:

La inserción de datos, para la realización de este proceso se utiliza la palabra PUSH y se declara de la siguiente forma.

Se le da doble clic al botón “ingresar un dato” y se ingresa el siguiente código.

   Dim dato As String = TextBox1.Text ' se declara una variable

        pila.Push(dato) 'Indica la inserción de un dato

        TextBox1.Clear() 'Se utiliza para limpiar el textbox despues de insertar un dato

        TextBox1.Focus() ' Se utiliza para colocar el puntero en en textbox

Y para sacar un elemento de la pila se utiliza la palabra POP y se declara de la siguiente forma.

Se le da doble clic al botón “sacar un dato” y se ingresa el siguiente código.

Dim valor As String = "" ' se declara una variable

        valor = pila.Pop 'Comando que indica sacar un elemento de la pila

        MsgBox(valor) ' Muestra el dato en un mensaje

Para conocer la cantidad de elementos en una pila se utiliza COUNT y se declara de la siguiente forma.

Se le da doble clic al botón “cantidad de datos” y se ingresa el siguiente código.

MsgBox(pila.Count) 'Muestra el dato en mensaje

Descargar proyecto:pilas