- Fejhallgató erősítő és DAC topik
- Azonnali informatikai kérdések órája
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Milyen házat vegyek?
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Azonnali alaplapos kérdések órája
- Játékra optimalizált chipkínálatot tervez a Microsoftnak az AMD
- Amlogic S905, S912 processzoros készülékek
- Melyik hordozható audiolejátszót (DAP, MP3, stb.) vegyem?
- Home server / házi szerver építése
Új hozzászólás Aktív témák
-
wikings2
őstag
Szevasztok. Egy szerintem nektek pofon egyszerű feladatra kérnék segítséget.
Van egy forrás txt formátumban amihez szimplán csinálok egy FileStreamet meg egy StreamReadert szal megnyitom.Dim v(20, 2) As Integer
For i = 1 To 20
WriteLine(i & ". sorszám")
v(i, 1) = ReadLine()
Next
For n = 1 To 20
WriteLine(n & " név:")
v(n, 2) = ReadLine()
Next
ReadKey()Na most valami hasonló ciklussal szeretném belőle az adatokat beolvasni különböző rekordokba.
A gond az hogy nem tudom hogy hogy kéne megoldani azt hogy:A txt belseje:
342342342301 (dátum)
pista béla (hozzá tartozó név)
21312312312
janjó ferenc
.
.
.Akkor ha egy sorban lenne szimplán valamilyen stringtöréssel szétkapnám és mehetnének külön, de így ilyen formában erre sajnos nem tudok ciklust, hogy egymás mellé kerüljenek az összetartozó rekordok :\
Ha valaki tudna rá valami egyszerű módszert akkor megköszönnémemiatt b.szom el sorra az emeltszintű programozási feladatokat mert nem sikerül értelmesen beolvasni.
Köszi!
Új hozzászólás Aktív témák
- ASUS routerek
- Fejhallgató erősítő és DAC topik
- Azonnali informatikai kérdések órája
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- AliExpress tapasztalatok
- Milyen házat vegyek?
- BestBuy topik
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- EA Sports WRC '23
- Spórolós topik
- További aktív témák...
- TP-Link ER-7212PC Omada 3-in-1 Gigabit VPN Router
- TP-Link EAP Omada Wifi AP-k (225, 245, 615)
- Mars Gaming ML-LCD240 2x ARGB 120mm FDB Fan LCD Display (Alkatrésznek) INGYEN FOXPOST
- CORSAIR K55 RGB PRO XT (Kartámasz nélküli) INGYEN FOXPOST
- Szép! Dell Latitude 7430 ÜTÉSÁLLÓ! Üzleti Profi Ultrabook 14" -60% i5-1245U 16/512 FHD IRIS Xe
- Samsung Galaxy S25 Plus Navy 12/256 GB Újszerű, karcmentes állapotban!
- AKCIÓ - 122 - Lenovo Legion Pro 5 (16ARX8) - AMD Ryzen 7 7745HX, RTX 4070 (48 hónap garancia!)
- Üzleti Fujitsu Lifebook u7510 15,6" FHD IPS 2021/08. havi gyártás
- Dymo LabelWriter 400 - Hőpapíros címkenyomtató
- BESZÁMÍTÁS! HP ZBook 15 G6 munkaállomás - i7 9850H 16GB DDR4 RAM 512GB SSD Quadro T2000 4GB WIN10
Állásajánlatok
Cég: PC Trade Systems Kft.
Város: Szeged
Cég: Promenade Publishing House Kft.
Város: Budapest