Hirdetés
- Pajac: Hámozott narancs
 - sziku69: Szólánc.
 - Brogyi: CTEK akkumulátor töltő és másolatai
 - GoodSpeed: 24 éves a Windows XP! Nézzen ki úgy a Windows 11 mint az XP?
 - Pötyi: 4. RETRO KONZOL ÉS SZÁMÍTÓGÉP BÖRZE - '25. november 16.
 - gban: Ingyen kellene, de tegnapra
 - sziku69: Fűzzük össze a szavakat :)
 - Luck Dragon: Asszociációs játék. :)
 - sh4d0w: Kalózkodás. Kalózkodás?
 - D1Rect: Nagy "hülyétkapokazapróktól" topik
 
Új hozzászólás Aktív témák
- 
			
			
						joci9
tag
Szasza!
Hát a HMI saját file olvasójával (ha PC akkor működ a filesys obj)
be kell olvasni az egész fájlt egy stringbe, és azt kell feldarabolni megfelelően, majd beletolni a tömbbe.Do While InStr(FileIndex, File, Chr(13)) 'addig megyünk, míg kocsi vissza karaktert találunk
FileIndex = InStr(FileIndex, File, Chr(13))
FileRowData = Mid ( File, FileIndexZero, (FileIndex-FileIndexZero))
fields = Split(FileRowData,";") 'store line in temp array
For column = 0 To 9 '6iterate through the fields of the temp array
myArray(FileRow, column) = fields(column) 'store each field in the 2D array with the given coordinates
Next
FileRow=FileRow+1
FileIndex = FileIndex + 2
FileIndexZero = FileIndex
Loopebben elvileg csak a VB saját stingkezelő függvényei vannak, muszáj neki működni minden platformon.
üdv
J 
Új hozzászólás Aktív témák
- Azonnali készpénzes nVidia RTX 4000 sorozat videokártya felvásárlás személyesen / csomagküldéssel
 - HP 150W töltők (19.5V 7.7A) kis kék, kerek, 4.5x3.0mm
 - ÁRGARANCIA!Épített KomPhone Ryzen 5 4500 16/32/64GB RAM RTX 3060 12GB GAMER PC termékbeszámítással
 - Magyar Logitech G915 Billentyűzet lehet +33.000.- Ft ból
 - HIBÁTLAN iPhone 13 mini 128GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3139, 95% Akkumulátor
 
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
								
							
								
