Cargar un nuevo formulario haciendo clic en el menú " Archivo" en Visual Basic y seleccionar "Nuevo proyecto ". Seleccione " EXE estándar " como el tipo en Visual Basic 6.0 . En las versiones de Visual Basic.NET , el nombre de la plantilla es " Aplicación de Windows Forms ". Una vez que el formulario está abierto , se ven dos controles de la izquierda que se parecen a las listas . Haga doble clic en la derecha una, un ListBox , para agregarlo al formulario en blanco . Repita este paso para añadir un segundo ListBox , y luego arrastrarlo a la derecha de la primera. Ampliar el formulario utilizando los controladores de tamaño en la parte inferior y derecha del formulario.
Experimento con el contenido de ListBox y sus propiedades . Cambie la propiedad " Ordenado " de cada ListBox en "True ". Cambie el ForeColor del control ListBox derecho a " Red ". Para prepararse para el siguiente paso en el tutorial , agregue cuatro botones de comando desde el cuadro de herramientas organización como en la imagen. Nota : el texto en los cuadros se ajusta más grande para la visibilidad . Mediante el panel Propiedades de la derecha , hacen que cada botón de título comando como sigue: Arriba izquierda: "Add New Item" Arriba a la derecha : " Seleccionar un elemento" inferior izquierda : " De impresión, seleccione List" Abajo a la derecha : " No seleccionar un elemento" El usos de estos botones se pondrán de manifiesto a medida que avances en la lección .
Configuración del tutorial
Cambio de la vista Diseño a la vista Código , haga clic en "View ", " Código "en el menú . Para activar los botones de comando agregó anteriormente, escriba el siguiente código exactamente como aparece : Private Sub Command1_Click () NewItem As StringNewItem = InputBox ( "Enter elemento nuevo para la lista ") List1.AddItem NewItemEnd SubPrivate Sub Command2_Click () Si List1 . ListIndex > = 0 ThenList2.AddItem List1.TextList1.RemoveItem List1.ListIndexEnd IfEnd SubPrivate Sub Command3_Click () Si List2.ListIndex > = 0 ThenList1.AddItem List2.TextList2.RemoveItem List2.ListIndexEnd IfEnd SubPrivate Sub Command4_Click () Dim n Como IntegerFor n = 0 Para List2.ListCount - 1Print n & "" & List2.List (n ) SiguienteFin Sub
Uso del control ListBox
las formas utilizar estos botones será obvio una vez que pulse la tecla "F5 " para ejecutar el programa ( la figura se ha rellenado previamente con algunos artículos) . Comience con el comando " Agregar nuevo elemento " . Cada vez que utilice este , una caja le pedirá que añada un nuevo artículo. Trate de añadir algunos nombres de países en orden aleatorio . " Seleccionar un elemento " elimina del cuadro de la izquierda y lo añade a la derecha. " Deseleccionar un elemento" hace lo contrario . El botón " Imprimir " lo envía a la pantalla, pero por una modificación podría utilizar una impresora en su lugar. Código adicional puede cambiar la selección por lo que si mantiene presionada la tecla de mayúsculas , el usuario puede seleccionar varios elementos.
Propiedades ListBox
incluir enlaces a una base de datos para su uso posterior de los datos seleccionados. Las cajas se pueden rellenar o bien un elemento cada vez que se muestra aquí, mediante el uso de una serie de elementos a añadir a la vez, o mediante la importación de un archivo de texto pre - seleccionado. Esta es la manera en que esas largas listas de países que aparecen en las versiones Web del ListBox.