Microsoft Visual Studio
Ver Más instrucciones
1
lanzamiento Microsoft Visual Studio , haga clic en "Nuevo proyecto " en el panel izquierdo de la pantalla del ordenador , y ampliar " Plantillas instaladas . " abajo " Visual Basic" Haga clic en " Windows" y haga doble clic en " Aplicación de Windows Forms " en el centro de la ventana de diálogo para crear un nuevo proyecto.
2
doble clic en " ListBox " para añadir un nuevo control de cuadro de lista para su formulario. Haga doble clic en " botón " para añadir un nuevo botón al formulario.
3 Haga doble clic en el formulario para crear un evento de carga del formulario y agregue el código siguiente para agregar algunos artículos incluidos los duplicados a tu ListBox Página 4
volver al "Formulario " vista Diseño y haga doble clic en " Button1 " para crear un evento de clic en este botón. Agregue el código siguiente para mostrar los elementos duplicados encontrados a través de la " ventana Inmediato " y mostrar un mensaje al usuario :
Me.ListBox1.Sorted = True
Me.ListBox1.Refresh ()
índice Dim As Integer
dupFound Dim As Boolean
itemcount Dim As Integer = Me.ListBox1.Items.Count
Si itemcount > 1 entonces
LastItem As String = Me.ListBox1.Items ( itemcount - 1) spanish
Para index = itemcount - 2 a 0 Step -1
Si Me.ListBox1.Items ( índice) = LastItem Entonces
dupFound = = Me.ListBox1.Items ( índice)
End If
Siguiente
End If
Si dupFound Entonces
MessageBox.Show ( " Los duplicados se encontraron en ListBox. " )
demás
MessageBox.Show ( " No se encontró duplicados . " )
End If
5 < p> Presione " F5 " para ejecutar el programa. Haga clic en " Button1 " para borrar los duplicados y mostrará un mensaje indicando si son duplicados o no fueron hallados.