vb.net - Sorted List in Array Visual Basic -


this question has answer here:

i have program creates list of 25 random numbers 0 1,000. have buttons first button load list box random numbers , second button sort list of numbers smallest largest implemented bubble sort code. other list box supposed hold sorted numbers doesn't work shows 1 number instead of of them.

here code:

option strict on public class form1  dim rn random = new random dim clicked long = 0 dim numbers, sort long   private sub generatebtn_click(byval sender system.object, byval e system.eventargs) handles generatebtn.click     clicked += 1      x = 0 25         numbers = rn.next(0, 1000)         randombox.items.add(numbers)         if clicked >= 2             randombox.items.clear()             clicked = 1         end if     next end sub   private sub sortbtn_click(byval sender system.object, byval e system.eventargs) handles sortbtn.click     dim sorted() long = {numbers}     dim swapped boolean     dim endofarray integer = sorted.length - 1     dim tmp byte      while (swapped)         swapped = false         = 0 endofarray - 1             if sorted(i) > sorted(i + 1)                 tmp = cbyte(sorted(i))                 sorted(i) = sorted(i + 1)                 sorted(i + 1) = tmp                 swapped = true             end if             endofarray = endofarray - 1         next     end while      sortbox.items.clear()      = 0 sorted.count - 1         sortbox.items.add(sorted(i))     next  end sub end class 

change your:

dim sorted() long = {numbers} 

to

sorted(x) = numbers 

edit: since changed code. need put in line loads sorted array.

for x = 0 25     numbers = rn.next(0, 1000)     randombox.items.add(numbers)     sorted(x) = numbers     if clicked >= 2         randombox.items.clear()         clicked = 1     end if next 

and remove the:

dim sorted() long = {numbers} 

from second part , put declaration in beginning had:

dim sorted(26) long 

the way have show latest random number. not array single entity. therefore latest add array. need load each number array create each one. (x) loads position x.


Comments