Hirdetés
- Mindenkinél több és erősebb AI gyorsítót ígér Elon Musk
- M.2 csatlakozók terén (is) jónak ígérkezik az MSI közelgő AMD-s alaplapja
- Kivégezheti a kisebb VGA-gyártókat az NVIDIA döntése
- Szinte a semmiből robbanna be az 1,4 nm-es eljárásával a Rapidus
- Félszáz terabájtos HDD-k előtt nyitotta ki az ajtót a Seagate
Ú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
- Xiaomi Smart Band 8, Újszerű, 1 Év Garanciával
- ÁRGARANCIA!Épített KomPhone Ryzen 5 5600X 16/32/64GB RAM RX 7600 8GB GAMER PC termékbeszámítással
- Gamer PC-Számítógép! Csere-Beszámítás! R5 8600G / 6700XT 12GB / 16GB DDR5 / 512 SSD + 2TB HDD!
- LG 49WQ95X-W - 49" NANO IPS - 5120x1440 Dual QHD - 144Hz - USB Type-C - HDR 400 - G-Sync - FreeSync
- ÚJ HP Omen 16 - 16,1" FHD 144Hz - i5 13420H - 16GB - 512GB - RTX 4050 - Win11 - 3 év garancia
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: BroadBit Hungary Kft.
Város: Budakeszi


