Array's

[Samdeezel]

1 demensie rij waar je getallen in geeft en dat alle negatieve daarna verwijdert uit de array en dan gewoon weer afdrukt? Ik ben nieuw met vb.net ik zit toch op de juiste Forum?
Ik was wat oefeningen aan het maken via internet echter de oplossingen staan er niet altijd bij.
Ik heb nog maar 1 keer array gebruikt maar was best wat verwarrend.


Kunnen jullie mij soms helpen

grt

Sam DEEZEL

 

[JoZ1]

[CPP]Dim Getallen As Integer() = {10,8,-9,5,-3,4,67,-89,25,-10}
For Each Item In Getallen
If Item = < 0 Then
Console.WriteLine(Item.ToString)
End If
Next[/CPP]

Deze code geeft alle positieve getallen uit de array weer. Bedoel je dat?

 

[Samdeezel]

ik bedoel dat je zelf wat getallen kunt in geven en ik had het verkeerd gechreven
het moet alle positive getallen verwijderen en all negatieve behouden.

Al vast bedankt voor de hulp :thumb:

 

[JoZ1]

[CPP] Dim Getallen As New List(Of Integer)
Dim Input As String

Do
Input = InputBox("Geef een getal op. Dit venster verschijnt niet opnieuw als u geen getal opgeeft of op Annuleren klikt.", "JoZ1 van Helpmij.nl")
If Not Input = Nothing Then
Getallen.Add(Input)
End If
Loop Until Input = Nothing

For Each Number In Getallen
If Number < 0 Then
Console.WriteLine(Number)
End If
Next
Console.ReadKey()[/CPP]

Iets als dit?

 

[Samdeezel]

ja zo iets maar dan in een ipv van Dim Getallen As New List(Of Integer)
vervangen door arrTabel() As Integer = New Integer(7) {} of zo iets?
ideeen

 

[JoZ1]

Hoezo wil je dat per se vervangen? Dit werkt toch ook goed?

 

[Samdeezel]

omdat ik het zo array mogelijk wil houden :$

 

[JoZ1]

Een Generic List is bijna hetzelfde als een ArrayList

The List(Of T) class is the generic equivalent of the ArrayList class. It implements the IList(Of T) generic interface using an array whose size is dynamically increased as required.

Bron: http://msdn.microsoft.com/en-us/library/6sh2ey19.aspx

[edit] Oeps! Ben in de war met ArrayList. .
Ik zal alsnog iets voor je maken.
[/edit]

Eigenlijk is het onzinnig om in deze situatie een array te gebruiken, maar goed.
Een kleine aanpassing in de code:

[cpp] Dim Getallen As New List(Of Integer)
Dim Input As String

Do
Input = InputBox("Geef een getal op. Dit venster verschijnt niet opnieuw als u geen getal opgeeft of op Annuleren klikt.", "JoZ1 van Helpmij.nl")
If Not Input = Nothing Then
Getallen.Add(Input)
End If
Loop Until Input = Nothing

Dim GetalArray As Integer() = Getallen.ToArray ''// Hier declareer ik de array

For Each Number In GetalArray
If Number < 0 Then
Console.WriteLine(Number)
End If
Next
Console.ReadKey()[/cpp]