Public Class Klasse
Public shared MyThread() As Thread
Public Shared MyBytes() As Byte ' <- da vom Thread schreiben lassen
 
Private Sub ThreadSub()
Dim buff() as Byte
' Bytes lesen
mybytes=buff
End Sub
 
' paar funktionen klassen, bla bla halt
End Class
 
Public Class MeineForm
 
Private Sub ReadBuff()
' Aus Buffer lesen...
Dim buff() as Byte
buff=Klasse.MyByttes ' <- da rufst du die bytes ab, die du in Klasse.ThreadSub 
' erzeugt hast
' (kannst aber in meinem Beispiel auf die ThreadSub nit zugreifen, da die nit
' public shared ist...)
End Sub
 
End Class