For Next
Menyer 
If Then Else 
I en For Next- slinga låter man en variabel börja på ett värde som den har fått genom en programkod. När koden är slut ökas värdet med till exempel 1 och sedan gås koden igenom igen med det nya värdet på variabeln.
For Next används när man vill utföra programrader med ett känt antal upprepningar.
Definiera en variabelFörst måste vi definiera en variabel. I en variabel kan man lägga olika saker som kommer att ändra sig under programkörningens gång. Det kan vara ett tal som ökar eller minskar. Variabeln kan också användas i beräkningar.
Säg att variabeln heter Tal och värdet på Tal är 5. Då kan man räkna Tal*4 och svaret blir alltså 20. Man kan också använda ett ord eller en hel text, och tilldela variabeln detta som värde.
Vi kan döpa variabeln till något enkelt - i - på följande vis.
Dim i As Integer
Integer betyder att variabeln i kan anta datatypen heltal mellan -2147483648 och 2147483647. Vi skall titta mer på variabeldeklarationer senare. Om man inte behöver så stora värden kan man använda datatypen Short i stället. Det kan anta värden mellan -32768 och 32767.
Lägg nu en knapp och en Label på formen. Sätt en färg på labeln i Properties vid Backcolor.
Dubbelklicka på knappen och skriv:
Dim i As Integer
For i = 1 To 10
Label1.Text = i
Label1.Left = Label1.Left + 5
MsgBox("Avstånd från kanten är: " & Label1.Left)
Next i
Det betyder att variabeln i skall börja med värdet 1, och Label1 skall visa det värde som i för tillfället har. Dessutom skall labeln förflytta sin position åt höger med värdet 5.
Left är det avstånd som labelns vänstra kant ligger på räknat från formulärets vänstra kant. Sist skall det komma en meddelanderuta som talar om på vilket avstånd labeln ligger från kanten.
När man klickar på OK i meddelanderutan kommer programmet till raden Next i, vilket betyder att i räknas upp med 1 och alltså får värdet 2. Sedan gås raderna igenom igen, nu med det nya värdet på i. Detta upprepas tills värdet på i är 10. Om man vill att i skall räknas upp med något annat tal, till exempel 2, kan man skriva
For i = 1 To 10 Step 2
Menyer If Then Else © SupportData.Net