Cómo crear un cuadro de lista con casillas de verificación Clickable

Seleccione idioma Seleccione idioma
Id. de artículo: 145728 - Ver los productos a los que se aplica este artículo
Este artículo se ha archivado. Se ofrece "tal cual" y no se volverá a actualizar.
Expandir todo | Contraer todo

Resumen

Muchos programas de Windows incorporan cuadros de lista con casillas de verificación incrustado como parte de su interfaz de usuario. El cuadro de diálogo en Visual Basic 4.0 referencias es un ejemplo de este tipo de cuadro de lista. En este artículo muestra cómo implementar un cuadro de lista con esta funcionalidad en Visual Basic 4.0 utilizando el control ListView.

Nota: Con Visual Basic 5.0 y versiones posteriores, puede establecer la propiedad Style del control listbox intrínseco para indicar un estilo "CheckBox".

Más información

El control ListView tiene la capacidad para mostrar imágenes y texto para cada elemento en una lista. Los gráficos que se va a mostrar se mantienen en un control ImageList asociado y pueden ser checked y unchecked casillas de verificación o se desean que las imágenes.

Nota: Para utilizar los controles ImageList con el control ListView, debe asociar un determinado control ImageList con las propiedades de iconos y SmallIcons, como sigue:
    ListView1.Icons = ImageList1
    ListView1.SmallIcons = ImageList2
				

Siga estos pasos para crear un cuadro de lista con la capacidad para mostrar gráficos y texto:
  1. Iniciar Visual Basic 4.0, 32 bits, o si ya se está ejecutando, abra un nuevo proyecto.
  2. Coloque un control ListView y un control ImageList en el formulario.
  3. Derecha haga clic en el control ImageList y seleccione Propiedades. En la ficha General, compruebe que '16 x 16' botón de opción está seleccionado. Cambie a la ficha imágenes y utilice el botón Insertar imagen para agregar dos imágenes a ImageList. Para que funcione el código siguiente sin modificación, hacen que la primera imagen la imagen 'unchecked' y el segundo el 'activa'. Visual Basic 4.0 no se suministra con imágenes que representan simple casillas de verificación checked y unchecked. Dos iconos complementarios que se incluyen en el directorio iconos bajo el directorio puede ser de Visual Basic utilizar (por ejemplo, los Trash02a.ico Trash02b.ico iconos y ubicados en el directorio \Icons\Computer.) O bien, si tiene una versión anterior de Visual Basic, estos iconos se pueden crear fácilmente con el IconWorks ejemplo que se incluye con versiones anteriores de Visual Basic.
  4. Insertar estas líneas de código en la sección General Declaration del formulario.
          'store the item selected in the ItemClick event
          'for use in the DblClick event
          Private ItemClicked As ListItem
    
    						
  5. Agregue el código siguiente en la ventana de código para el formulario. La operación del código se explica en los comentarios incluidos.
          Private Sub Form_Load()
              Dim itmX As ListItem
              Dim i As Integer
    
              'loop and add 10 items to the ListView control
              'this code should be replaced by your add item code
              For i = 1 To 10
                  Set itmX = ListView1.ListItems.Add()
                  'set icon to unchecked
                  itmX.SmallIcon = 1
                  itmX.Text = "ListItem " & i
              Next i
    
              'other views will work, but will allow additional
              'behavior over a standard listbox
              ListView1.View = lvwList
    
              'display full label
              ListView1.LabelWrap = False
          End Sub
    
          Private Sub ListView1_DblClick()
    
              'toggle icon between checked and unchecked
              'use the private ItemClicked variable set in the
              'ListView1_ItemClick event
              With ItemClicked
                  If .SmallIcon = 1 Then
                      .SmallIcon = 2
                  Else
                      .SmallIcon = 1
                  End If
              End With
          End Sub
    
          Private Sub ListView1_ItemClick(ByVal Item As ListItem)
              'since there is no ItemDblClick event, save the item
              'clicked on for use in the ListView's DblClick Event
              Set ItemClicked = Item
          End Sub
    
    						

Referencias

Ayuda en pantalla para los controles ListView y ImageList

Propiedades

Id. de artículo: 145728 - Última revisión: sábado, 01 de marzo de 2014 - Versión: 2.1
La información de este artículo se refiere a:
  • Microsoft Visual Basic 4.0 Standard Edition
  • Microsoft Visual Basic 4.0 Professional Edition
  • Microsoft Visual Basic 4.0 32-Bit Enterprise Edition
Palabras clave: 
kbnosurvey kbarchive kbmt kbhowto KB145728 KbMtes
Traducción automática
IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.
Haga clic aquí para ver el artículo original (en inglés): 145728

Enviar comentarios

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com