- gban: Ingyen kellene, de tegnapra
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- mefistofeles: Az elhízás nem akaratgyengeség!
- Elektromos rásegítésű kerékpárok
- Geri Bátyó: Régi VGA, HDMI és a felbontás
- eBay-es kütyük kis pénzért
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- Luck Dragon: Asszociációs játék. :)
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
Ú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
- DELL Precision 3420 (SFF),i5-6600,8GB DDR4,128GB SSD,Nvidia Quadro K420 2GB VGA,WIN11
- HIBÁTLAN iPhone 14 Pro 128GB Space Black-1 ÉV GARANCIA - Kártyafüggetlen, MS4420, 100% Akksi
- ÁRGARANCIA!Épített KomPhone Ryzen 5 5600X 16/32/64GB RAM RTX 5060 8GB GAMER PC termékbeszámítással
- ÁRGARANCIA!Épített KomPhone Ryzen 5 7500F 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- Samsung Galaxy A32 5G / 4/128GB / Kártyafüggetlen / 12Hó garancia
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest

