Welkom, Gast. Alsjeblieft inloggen of registreren.
0 leden en 1 gast bekijken dit topic.
Ik heb kennelijk last van een blackout, want het volgende wel erg basale stukje VB code werkt niet:
Line Input #1, Result
Dim p As Integerresult = String(255, 0) 'reserveer ruimte in stringGet #1, 1, resultp = InStr(result, Chr(0)) 'zoek startpunt ballastIf p > 0 Then result = Left(result, p - 1) 'strip ballastElse result = "Error: de tekst kan onvolledig zijn!"End If