1
lanzamiento Microsoft Visual Basic Express, haga clic en " Nuevo proyecto ... " en el panel izquierdo de la pantalla del ordenador y seleccione " Aplicación de Windows Forms ". Haga clic en " Aceptar".
2
doble clic en " ComboBox " en el panel "Toolbox" para añadir un nuevo control de cuadro combinado al formulario . Haga doble clic en " botón " para añadir un nuevo botón . Agregue dos botones más usando la misma técnica.
3
doble clic en " Button1 " para abrir el módulo " Form1.vb " . Escriba el siguiente abajo " Button1_Click " para añadir elementos a su cuadro combinado :
Me.ComboBox1.Items.Add ( " Elemento de datos " )
Me.ComboBox1.Items.Add ( "Data Item " )
Me.ComboBox1.Items.Add ( " Elemento de datos " )
Me.ComboBox1.Items.Add ( " Elemento de datos " )
Me.ComboBox1 . Items.Add ( " Elemento de datos " )
Me.ComboBox1.Items.Add ( " Elemento de datos ")
4 Haga clic en " Form1.vb [ Diseño ] " y haga doble clic en " Button2 " para agregar código a su evento click . Escriba el siguiente código para eliminar los duplicados en el cuadro combinado :
xCnt Dim As Integer
yCnt Dim As Integer
Para xCnt = 0 Para Me.ComboBox1.Items . conde - 2
Para yCnt = Me.ComboBox1.Items.Count - 1 Para xCnt + 1 Step -1
Si Me.ComboBox1.Items ( xCnt ) ToString = Me.ComboBox1 . . Artículos ( yCnt ) . ToString Entonces
Me.ComboBox1.Items.RemoveAt ( yCnt )
End If
Siguiente
Siguiente
5
click " Form1.vb [ Diseño ] " y haga doble clic en " Button3 " para agregar código al evento de clic . Escriba el siguiente código para borrar todos los elementos en el cuadro combinado :
Me.ComboBox1.Items.Clear ()
6
Click " Form1.vb [ Diseño ] " y haga doble clic en el cuadro combinado ejecutar código cuando cambia el elemento seleccionado . Escriba el siguiente código para mostrar el elemento seleccionado a través de un cuadro de mensaje :
MsgBox ( " Ha seleccionado :" & Me.ComboBox1.Text.Trim )
7
Press "F5 " para ejecutar el programa y haga clic en " Button1 " para añadir elementos a su cuadro combinado. Haga clic en " Button2 " para eliminar el elemento duplicado . Haga clic en " Button3 " para eliminar todos los elementos en el cuadro combinado.