Números Organizar en Visual Basic de menor a mayor es una característica proporcionada por la operación "Orden" en la clase List . Por desgracia , no es una característica proporcionada por el ListBox Interface Gráfica de Usuario (GUI ) elemento, por lo que para realizar esta operación en los datos de un ListBox , primero debe mover los datos a través de una lista. Instrucciones
1
Agregar un cuadro de lista al formulario arrastrándolo desde la lista de " componentes" en la izquierda.
2
Agregue un botón al formulario. En el Editor de propiedades en la parte inferior derecha de la pantalla , cambie la propiedad Text en " Sort. " Cambie la propiedad nombre a " SortButton . " Esto hará que sea más fácil identificar este botón cuando se escribe código.
Página 3
Agregar un cuadro de texto al formulario. Cambie la propiedad Name a " UserInputTextBox ", pero deje su propiedad de texto en blanco . Aquí es donde el usuario introduzca un número para agregarlo a la ListBox.
4
Agregar una etiqueta al formulario y colóquelo al lado del cuadro de texto que agregó en el paso 3. Cambie la propiedad de texto a " Introduzca un número".
5
Agregar un botón. Cambie el texto a " Agregar a la lista . " Cambie su propiedad Name a " AddButton . "
6
doble clic en el botón " Add" . Esto creará una función de evento de acción y le llevaría a ella. Pega este código dentro de la función :
número Dim As Double = Nuevo Doble
número
= Double.Parse ( UserInputTextBox.Text )
ListBox1.Items.Add ( Nú mero ToString )
Esto crea un número como una doble, así que no hay mucho espacio para decimales. A continuación, intenta interpretar (o parse ) la información de la UserInputTextBox como un número. Y, por último , si se puede interpretar correctamente la entrada del usuario como un número, se añade a la lista.
Clic en la pestaña " Diseño" para volver a la ventana del formulario .
7
doble clic en el botón " Ordenar" . Dado que la lista integrada en el ListBox no admite la operación de ordenación , debe mover todos los números en el ListBox en un objeto de lista antes de ordenar , a continuación, ordenar , y finalmente pasar de nuevo al ListBox. Pega este código para hacerlo:
números Dim As List ( Of Double ) = New List ( Of Double )
For Each n As Double En ListBox1.Itemsnumbers.Add ( n) Siguiente
ListBox1.Items.Clear ()
numbers.Sort ()
For Each n As Double En numbersListBox1.Items.Add (n ) siguiente