Avatar billede mega-hawk Nybegynder
22. august 2009 - 17:28 Der er 2 kommentarer og
1 løsning

Forklar lige hvad der sker i denne kode?

Jeg har fundet denne kode på nettet som er til at flytte teksten i en listbox op og den virker men hvad sker der helt præcis?

Private Sub Command1_Click()
Dim tempStr As String
tempStr = List1.List(List1.ListIndex - 1)   
List1.List(List1.ListIndex - 1) = List1.List(List1.ListIndex)    List1.List(List1.ListIndex) = tempStr   
List1.ListIndex = List1.ListIndex - 1   
End Sub

ville det i teorien ik også virke uden at skrive list1.list men bare køre på og hvornår bruges list1.list ???
Avatar billede Slettet bruger
22. august 2009 - 17:35 #1
tempStr = List1.List(List1.ListIndex - 1) // Gemmer den første streng til senere brug. Grunden til at der står -1 er at ListIndex starter med 1 men List1.List starter med 0

List1.List(List1.ListIndex - 1) = List1.List(List1.ListIndex)    List1.List(List1.ListIndex) = tempStr  // Flytter streng #1 til streng #0 og erstatter #1 med den tidligere #0

List1.ListIndex = List1.ListIndex - 1 // Flytter fokus til #0

He he Ved ikke om det giver mening :-)
Avatar billede mega-hawk Nybegynder
22. august 2009 - 17:49 #2
umiddelbart tror jeg lige jeg skal have lidt bedre tid til at læse den igennem et par gange så skal det da nok give mening, men lige nu bliver jeg godt forstyret af min datter, men hvis du smider et svar så accepterer jeg det lige senere når jeg kommer på for jeg skal da nok forstå det når jeg har tykket den igennem et par gange
Avatar billede Slettet bruger
22. august 2009 - 17:53 #3
ok, prøv at starte programmet med debug og "step" dig igennem hver linje, så du kan aflæse parameterne trin for trin eller linje for linje, så burde det give mening
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester