Curso de Visual Basic.NET

Sigamos ajustando nuestro formulario, esta vez que los controles se adapten también a otros tamaños de fuentes, no a los que nosotros tenemos en nuestro equipo... ya que hay gente que por necesidades tienen que poner tamaños de fuentes más grandes e incluso más pequeñas... que también hay quién tiene un monitor de 19 o 21 pulgadas y lo mismo tienen que usar letras de tamaños más pequeños...

La propiedad que hace eso posible es AutoScale, esta propiedad sólo está disponible en los formularios y por defecto tiene el valor True (verdadero), por tanto los formularios, sin necesidad de que hagamos nada, se auto ajustarán al tamaño de las fuentes.

Otro tema interesante que tienen los formularios es la propiedad AutoScroll. Si asignamos el valor True (verdadero) a esta propiedad, hacemos que cuando el formulario se haga muy pequeño o muy estrecho, se muestren unas barras de desplazamiento (scrolls) para que pulsando en ellas podamos ver el contenido del mismo.

Por ejemplo si no hubiésemos "anclado" nuestros controles, al hacer el formulario más estrecho se mostrarían unas barras de desplazamiento para que podamos ver los controles que están contenidos en el formulario como en esta figura:

Sigamos escribiendo algunos ejemplos de código para seguir familiarizándonos con el IDE de .NET. Queremos hacer lo siguiente en nuestro programa:

1. Al pulsar en el botón Añadir, se añadirá a la lista lo que hayas escrito en la caja de textos.
2. Al pulsar Intro será como si hubieses pulsado en el botón Añadir.
3. Al pulsar Esc es como si hubieses pulsado en el botón Cerrar.
4. Al pulsar en uno de los elementos de la lista, éste se mostrará en la caja de textos.
5. Al seleccionar un elemento de la lista y pulsar la tecla Supr (o Del si tu teclado está en inglés), dicho elemento se borrará de la lista, pero se quedará en la caja de textos, ya que al seleccionarlo para poder pulsar la tecla suprimir se habrá mostrado...

Veamos cómo hacer esto...

1. Lo de pulsar en Añadir y hacer algo, está claro: simplemente codificamos lo que haya que codificar en el evento Clic del botón cmdAdd. Para que nos muestre ese evento, simplemente haz doble-click en el botón y el VB te mostrará el evento en cuestión y añadimos este código:

Private Sub cmdAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _ 

			Handles cmdAdd.Click

    ListBox1.Items.Add(TextBox1.Text)

End Sub

Veamos que hace este código en ejecución:

Veamos que hay en esta instrucción del procedimiento que se va a ejecutar cuando se haga clic (evento clic) del botón. Si recuerdas el código que vimos en el evento Form_Load, teníamos:

Me.ListBox1.Items.Clear()

• Me hace referencia a la clase actual, es decir al formulario.
• Items son los elementos que tiene el objeto ListBox
• Clear es un método de Items que se encarga de limpiar los elementos de la lista, es decir: los borra.

Por tanto esa línea lo que hace es borrar los elementos del listbox.

Ahora lo que necesitamos no es borrarlos, sino añadir nuevos elementos a la lista, por tanto, como ya sabemos que Items es el sitio en el que se guardan los elementos de la lista, lo único que tenemos que saber es ¿cómo se añaden nuevos elementos a dicha lista? La respuesta es el método  Add que añade elementos a la lista de un ListBox: Para añadir elementos a un listbox, se usa el método Add de Items.
 

En la colección Items se puede añadir lo que queramos, cualquier objeto, en este caso lo que añadimos es el contenido (el texto) del TextBox, por eso es por lo que hacemos:

Items.Add(TextBox1.Text)

Añadimos a Items el contenido de la caja de textos.