Visual Basic-ben hogy van a keresés rendezetlen tömbben?

legjobban a console.app programkódokra vagyok kiváncsi...

Holnap témazárót írunk viszont elázott a füzetem és nem tudom elolvasni ezt a részt.

Rendezettben így néz ki:

Dim tomb(20) as integer

dim r as new random

dim i as integer

tomb(i)=r.next(0,3)

For i=1 to tomb.getupperbound

tomb(i)=tomb(i-1)+r.next(0,6)

Next

For i=0 to tomb.getupperbound

Next

i=0

dim keresett as integer=30

do while i<=tomb.getupperbound(0) andalso keresett > tomb(i)

i=i+1

loop

if tomb.getupperbound(0)<i or else tomb(i) <> keresett then

console.writeline("nincs találat")

else

console.writeline("A megtalált elem a(z) " & i & ".elemen van")

ez rendezetlenben hogyan lenne nagyjából?