Tenho um trabalho de aula cuja necessidade é usar um algoritmo de ordenação para ordenar uma lista de números aleatórios.
Meu problema é que estou jogando os itens da lista dos números aleatórios para um array, implementando o método ordenador e colocando os números ordenados em uma segunda lista.
Porém quando estou fazendo isso sempre retorna o numero 0, ou o erro int32[] array. Como devo proceder?
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim min As Integer
Dim max As Integer
Dim i As Integer
Dim j As Integer
Dim best_value As Long
Dim best_j As Integer
For i = min To max - 1
best_value = ve(i)
best_j = i
For j = i + 1 To max
If ve(j) < best_value Then
best_value = ve(j)
best_j = j
End If
Next j
vl(best_j) = vl(i)
vl(i) = best_value
Next i
Dim h As Integer
For h = 0 To 1
Lst.Items.Add(vl(h))
Next h
End Sub
Neste código VE
é o array dos números aleatórios, VL
é o array dos números já ordenados e lst
é a listbox para qual os números ordenados vão.
X
,Y
,VE
, etc. não são nada bons.