Nwlapcug.com


Come rimuovere i duplicati di casella combinata

Come rimuovere i duplicati di casella combinata


Un controllo di casella combinata è un controllo che è la combinazione di una casella di testo e una casella di riepilogo. Permette all'utente di selezionare valori dall'elenco a discesa o immettere un nuovo valore. Spesso i programmatori incontrato la necessità di rimuovere i valori duplicati da un controllo di casella combinata e sapendo come rimuoverli rapidamente consente di risparmiare tempo. Microsoft Visual Basic.NET (VB.NET) è un linguaggio utilizzato per creare applicazioni Windows che possono utilizzare le caselle combinate di programmazione.

Istruzioni

1

Avviare Microsoft Visual Basic Express, fare clic su "Nuovo progetto..." nel riquadro sinistro dello schermo e quindi selezionare "Applicazione Windows Form." Fare clic su "OK".

2

Doppio click "Button1" per aprire il "Form1.vb"module. Digitare quanto segue di sopra "End Class" per caricare gli elementi alla casella combinata durante il caricamento del modulo:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase. Load

Me.ComboBox1.Items.Add("Line1")

Me.ComboBox1.Items.Add("Line1")

Me.ComboBox1.Items.Add("Line1")

Me.ComboBox1.Items.Add("Line2")

Me.ComboBox1.Items.Add("Line3")

Me.ComboBox1.Items.Add("Line3")

Me.ComboBox1.Items.Add("Line4")

Me.ComboBox1.Items.Add("Line4")

Me.ComboBox1.Items.Add("Line5")

End Sub

3

Digitare quanto segue sotto "Button1_Click" per rimuovere i duplicati quando l'utente fa clic su "Button1":

Dim iCnt As Integer

Dim jCnt As Integer

Per iCnt = 0 To Me.ComboBox1.Items.Count - 2

For jCnt = Me.ComboBox1.Items.Count - 1 To iCnt + 1 Step -1

Se Me.ComboBox1.Items(iCnt). ToString = Me.ComboBox1.Items(jCnt). Allora ToString

Me.ComboBox1.Items.RemoveAt(jCnt)

End If

Next

Successivo

4

Premere "F5" per eseguire il programma. Fare clic sul controllo casella combinata per visualizzare gli elementi duplicati. Fare clic su "Button1" per rimuovere gli elementi duplicati.