Binärdaten lesen mit VB ?

[Import-Script]

Hallo, <BR> <BR>ich möchte mit VB Binärdaten einlesen und habe mir das so vorgestellt : <BR> <BR>&#39;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42; <BR>Dim a as byte <BR> <BR>Open &#34;c: est.bin&#34; For input As 1 <BR> <BR>for 1 to 2048 <BR> input #1, a <BR> text1.text = a <BR>next <BR>Close 1 <BR>&#39;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42; <BR> <BR>jedoch ließt der das doch als String ein oder ? <BR> <BR>da m&uuml;ßte ich schreiben : <BR> <BR> <BR>&#39;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42; <BR>Dim a as string <BR> <BR>Open &#34;c: est.bin&#34; For input As 1 <BR> input #1, a <BR>. <BR>. <BR>. <BR>Close 1 <BR>&#39;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42;&#42; <BR> <BR> <BR>jedoch wie bekomme ich den String in 2048 dez. Zahlen ? <BR> <BR>Danke f&uuml;r die ganzen anderen VB Fragen <BR> <BR>Tobias <BR>

[Import-Script]

Dim b As Byte <BR>Open Path For Binary As 1 <BR>Do <BR>Get #1, , b <BR>call MachWas &#40;b&#41; <BR>Loop Until EOF&#40;1&#41; <BR>Close 1 <BR> <BR>Die Variabele Path enthält den Pfad, der zu öffnenden Datei. <BR> <BR>Der SubMach was wird dann nacheinander jedes Byte &uuml;bergeben.