I Visual Basic 6 , kan ListView kontroller viser mange typer informasjon på forskjellige måter , for eksempel database elementer vises i en liste eller bruker utstyr vist som ikoner. ListView elementer vises i den rekkefølgen du legger dem . Men under gjennomføringen av programmet, kan du endre rekkefølgen der disse elementene vises, for eksempel ved randomizing sine ordre . For å gjøre dette , må du midlertidig lagre ListView elementer andre steder og deretter sette dem i en annen rekkefølge . Instruksjoner
en

Åpne Visual Basic-prosjektet . Trykk " F7 " for å åpne koden vinduet og skriv inn følgende kode :

Private Sub RandListView ( )

ReDim arr ( 1 Til ListView1.ListItems.Count ) As String
< p > Dim Tmp Som Variant

Dim j As Long

Den første linjen oppretter en ny subrouting kalt " RandListView . " Den andre linjen tildeler plass for en matrise med den første indeksen på ett og den siste indeksen på samme antall elementer som finnes i ListView kontroll . Bruk en som utgangspunkt indeksen fordi det er indeksen tall som ListView elementer starter kl. Det skaper også ytterligere to variabler . Den " tmp " variable vil holde midlertidige verdier som du randomisere matrise og " j " variable fungerer som en teller
2

Skriv inn følgende kode : .

Randomize

For i = LBound (arr ) Til UBound (arr )

j = CLng ( ( ( UBound (arr ) - i) * Rnd ) + i)
p Hvis jeg < > j Deretter

tmp = arr ( i)

arr ( i) = arr ( j )

arr ( j ) = tmp

End Hvis

Neste i

den første linjen kaller Visual Basic Randomize funksjon for å sikre at flere samtaler til RandListView ikke gir de samme resultatene. Den neste linjene bla gjennom elementene i listevisningen kontroll , og hvis de ikke allerede finnes i matrisen , blir de lagt til. . Når alle elementene er i rekken av løkke avslutter
3

Skriv inn følgende kode :

ListView1.ListItems.Clear

i = 1 to UBound (arr )

ListView1.ListItems.Add = arr ( i)

Neste i

den første linjen fjerner elementene for tiden i ListView kontroll . De neste tre linjer befolke det med de randomiserte elementene i matrisen .
4

Type " RandListView " noe annet sted i programmet til å kalle funksjonen og randomize elementene i ListView kontroll .