Hirdetés
- One mobilszolgáltatások
- Poco F8 Ultra – forrónaci
- Google Pixel topik
- Samsung Galaxy A56 - megbízható középszerűség
- Apple Watch Sport - ez is csak egy okosóra
- Xiaomi 15 - kicsi telefon nagy energiával
- Nem engedi el a 128 GB-ot a Google
- Apple iPhone 13 mini - miért nem veszik elegen?
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- EarFun Air Pro 4+ – érdemi plusz
Ú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ém
emiatt 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
- Kínai és egyéb olcsó órák topikja
- Mini-ITX
- Most tényleg 8 GB VRAM-mal szúrja ki szemünk az NVIDIA??
- PlayStation 5
- Milyen TV-t vegyek?
- Luck Dragon: Asszociációs játék. :)
- DUNE médialejátszók topicja
- AMD Navi Radeon™ RX 9xxx sorozat
- Fujifilm X
- Lenovo Legion Go: a legsokoldalúbb kézikonzol
- További aktív témák...
- Inno3D RTX 2070 Twin x2 8GB / Beszámítás OK!
- Eladó Konfig I5 7400 16GB DDR4 240GB SSD 512GB HDD GTX1660TI 6GB!
- ÚJ Glorious PC Gaming Race Model WIred O illetve I Bolti ár:14k INGYEN FOXPOST
- ÚJ Glorious PC Gaming Race Model I 2 Wireless Bolti ár:40k INGYEN FOXPOST
- ÚJ Glorious PC Gaming Race Model D/D- USB Bolti ár:10k INGYEN FOXPOST
- iKing - Apple iPhone 15 Pro Natural Titanium ProMotion 120 Hz, A17 Pro, USB-C 128 GB
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 32/64GB RAM RX 9070 XT 16GB GAMER PC termékbeszámítással
- ÁRGARANCIA!Épített KomPhone Ryzen 7 5700X 16/32/64GB RAM RX 9060 XT 8GB GAMER PC termékbeszámítással
- Update 01.14. - Bomba árak 2026-ban is! Üzleti - Consumer laptopok DELL FUJITSU HP LENOVO
- Samsung Galaxy A14 64GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: Laptopszaki Kft.
Város: Budapest
emiatt b.szom el sorra az emeltszintű programozási feladatokat mert nem sikerül értelmesen beolvasni.

