Hej! Omständligt? Hej och tack Niklas!Byta värde på variablar
Jag undrar hur man enkelt (tryck på en knapp) byter en variabels värde mot en annans.
Ex. varA skall få varB och varB skall få vad varA var innan.
Nästa "knapptryckning" (samma knapp) sker det omvända osv
Jag har löst det med att använda tillfälliga variablar under bytet av värden men det känns lite omständigt.
PontusSv: Byta värde på variablar
dim temp as integer
temp=a:a=b:b=temp
Annars kan du använda (?) swap. Jag är inte säker på om den finns, men annars är den lätt att skriva själv:
Private Sub Swap (First as Variant, Second as Variant)
Dim Temp as Variant
Temp=First:First=Second:Second=Temp
End Sub
anropas som
Swap a, bSv: Byta värde på variablar
Jag gjorde en funktion av ditt tips som
fungerar bra då det är fler än två variablar jag ska "vända" på.
Pontus