Ú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
- Logitech MX Keys for Mac
- ÚJ Bontatlan Apple iPad Air (2025) 11" M3 Wi-Fi 128GB & 256GB ! 1Év nemzetközi APPLE GARANCiA
- Samsung Galaxy Watch 8 BT
- 15.gen! Intel Core ULTRA 9 285K (24mag!) +32GB DDR5 kit +ASROCK Z890 PRO-A! GAR/SZÁMLA (Te nevedre)!
- X13 Gen4 13.3" FHD+ IPS érintő i5-1335U 16GB 256GB NVMe magyarított (lézerezett) bill IR kam gar
- Xiaomi 11 Lite 5G NE 256GB, Kártyafüggetlen, 1 Év Garanciával
- LG 45GX950A-B - 45" Ívelt OLED evo / 5K WUHD / 165Hz-330Hz / NVIDIA G-Sync / FreeSync / DP 2.1
- ÁRGARANCIA!Épített KomPhone i5 14400F 32/64GB RAM RX 9060 XT 16GB GAMER PC termékbeszámítással
- Inno3D RTX 5070 // Felbontott, új // SZÁMLA // GARANCIA //
- Lenovo ThinkPad X1 Active Noise Cancellation fejhallgató
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
emiatt b.szom el sorra az emeltszintű programozási feladatokat mert nem sikerül értelmesen beolvasni.