da es ja mit single probleme gibt habe ich

Dim Uuuuu_in0 As Long
Dim Uuuuu_in1 As Single
Dim Uuuuu_in11 As Single
Dim Uuuuu_in2 As String * 5
Dim Uuuuu As String * 5

Keine Fehlermeldung - aber es kommt nicht´s vernünftiger über RS232 an:
<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð <\0>ð
<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð <\0>ð<\0
>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0>ð<\0 >ð<\0>ð