Dim numbersA(lst.Items.Count) As Integer Dim numbersB(lstData.Items.Count) As Integer
Dim numbersA(lst.Items.Count) As Integer Dim numbersB(lstData.Items.Count) As Integer
For I = 0 To lst.Items.Count - 1 numbersA(I) = lst.Items.Item(I).ToString Next
Dim entiers As Integer() = Enumerable.Range(0, 21).ToArray() Dim pairs As Integer() = Enumerable.Range(0, 21).Where(Function(n) n Mod 2 = 0).ToArray() Dim impairs As Integer() = entiers.Except(pairs).ToArray()
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionDim items1() As String = ListBox1.Items.Cast(Of String).ToArray Dim items2() As String = ListBox2.Items.Cast(Of String).ToArray ListBox3.Items.AddRange(items2.Except(items1).ToArray)
Ma question est simple, j'ai deux listes,donc nous bêtement, on t'as expliqué avec des listes, puis tu as montré un code avec un tableau, alors on t'a expliqué avec des tableau.
16 mai 2019 à 10:40
Public Sub Linq52()
Dim numbersA(lst.Items.Count) As Integer
Dim numbersB(lstData.Items.Count) As Integer
Dim I, J As Integer
For I = 0 To lst.Items.Count - 1
numbersA(I) = lst.Items.Item(I).ToString
Next
For J = 0 To lstData.Items.Count - 1
numbersB(J) = lstData.Items.Item(J).ToString
Next
Dim aOnlyNumbers As IEnumerable(Of Integer) = numbersA.Except(numbersB)
For I = 0 To aOnlyNumbers.Count - 1
lstManque.Items.Add(aOnlyNumbers(I).ToString)
Next
End Sub