- Okosóra és okoskiegészítő topik
- 45 wattos vezeték nélküli töltés jön az új iPhone-ba
- Apple iPhone 16 Pro - rutinvizsga
- iPhone topik
- Xiaomi 13 - felnőni nehéz
- Keretmentesít a Galaxy S25 FE
- Magisk
- Milyen okostelefont vegyek?
- Samsung Galaxy A36 5G - a középső testvér
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
Új hozzászólás Aktív témák
-
#59892992
törölt tag
válasz
sztanozs #2469 üzenetére
Köszönöm a segítséget és a kódokat. Most már lefut a program,de csak egy időre feltűnik a konzol majd utána el is tűnik.Tehát nem látom az eredményt.Valami olyan kellene mint a getchar a c-ben. VB-ben van ilyen?
A másik egy egyszerű animáció lenne de nem jó az eredmény.
A kód:
Imports System.Console
Module Module1Sub Main()
Dim str As String = "Animáció!"
For i As Integer = 1 To 60
CursorLeft = i
Write("" + str)
Threading.Thread.Sleep(100)
Next
Console.ReadKey()
End Sub
End ModuleLefut csak ilyen eredménnyel.
A sok A betűt kellene valahogy eltüntetni. -
#59892992
törölt tag
Üdv!
Valaki tud nekem segíteni.Kezdő vagyok VB.net programozásban.
Íme amit csináltam:
Module Module1Sub 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 SubEnd Module
A program nem fut le. Szintaktikai hibát ír ki a For ciklusban. For a 2 to 10-itt a 2-őt húzza alá.
Új hozzászólás Aktív témák
- IPhone 11 Pro max 64GB megkímélt új emelt kapacitású akku!
- Apple Pencil Pro bontatlan 1 év Apple jótállás
- Nitro ANV15-51 15.6" FHD IPS i5-13420H RTX 4060 32GB 512GB NVMe magyar vbill gar
- Apple watch Series 9 41mm cellular hibátlan 2026.02. 24. Apple jótállás
- ThinkPad P16 Gen1 16" FHD+ IPS i9-12950HX RTX A3000 32GB 1TB NVMe ujjlolv gar
- ÁRGARANCIA! Épített KomPhone i5 13400F 32/64GB RAM RX 7700 XT 12GB GAMER PC termékbeszámítással
- Telefon felvásárlás!! Samsung Galaxy S23/Samsung Galaxy S23+/Samsung Galaxy S23 Ultra
- Hp USB-C/Thunderbolt 3 dokkolók: USB-C Universal, G2, G4, G5, Hp Elite/Zbook- Thunderbolt 4 G4
- Samsung Galaxy S23 Ultra , 8/256 GB , Kártyafüggetlen
- Csere-Beszámítás! AMD Ryzen 7 7800X3D Processzor!
Állásajánlatok
Cég: PC Trade Systems Kft.
Város: Szeged
Cég: PC Trade Systems Kft.
Város: Szeged