Hirdetés
- OLED TV topic
- TCL LCD és LED TV-k
- Ilyen se volt még: mégsem kell sok memória az új James Bond játékhoz
- Melyik tápegységet vegyem?
- 3D nyomtatás
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- AMD Navi Radeon™ RX 6xxx sorozat
- Az elmúlt 30 év legjobb processzorai
- 5.1, 7.1 és gamer fejhallgatók
- Nem indul és mi a baja a gépemnek topik
Új hozzászólás Aktív témák
-
válasz
#59892992
#2468
üzenetére
Egyrészt ha kiavítanád, sem lenne jó (for a = 2 to 10), mivel 1. a kiiratás nem a ciklusban van, 2. ráadásul az értékadás után (for) változtatod a ciklusváltozó értékét.
Próbáld ki az alábbiakat és rájössz a különbségre:
1.
Sub Main()
Dim a As Integer
a = 0
For a = 2 to 10
a = a + 2
Next
Console.WriteLine("A páros számok 1-től 10-ig=" & a)
End Sub2.
Sub Main()
Dim a As Integer
a = 0
For a = 2 to 10
a = a + 2
Console.WriteLine("A páros számok 1-től 10-ig=" & a)
Next
End Sub3.
Sub Main()
Dim a As Integer
a = 0
For a = 2 to 10
Console.WriteLine("A páros számok 1-től 10-ig=" & a)
a = a + 2
Next
End Sub4.
Sub Main()
Dim a As Integer
Console.WriteLine("A páros számok 1-től 10-ig:")
For a = 2 to 10 step 2
Console.WriteLine(a)
Next
End Sub
Új hozzászólás Aktív témák
- OLED TV topic
- TCL LCD és LED TV-k
- Ilyen se volt még: mégsem kell sok memória az új James Bond játékhoz
- Viccrovat
- Lexus, Toyota topik
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
- One mobilszolgáltatások
- Samsung Galaxy A56 - megbízható középszerűség
- Melyik tápegységet vegyem?
- NOTEBOOK / NETBOOK / Mac beárazás
- További aktív témák...
- LG 65B3 -65" OLED - 4K 120Hz 1ms - NVIDIA G-Sync - FreeSync Premium - HDMI 2.1 - PS5 és Xbox Ready
- HIBÁTLAN iPhone 13 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3732
- HIBÁTLAN iPhone 15 Pro 256GB Black Titanium-1 ÉV GARANCIA - Kártyafüggetlen, MS4433
- Samsung Galaxy A52s 5G / 6/128GB / Kártyafüggetlen / 12Hó Garancia
- Apple Watch Series 9 41mm Pink 96% (1év Garancia)
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Console.ReadKey


