Hi I upgraded to 3.0.0 The serial port example doesnt work anymore. When i get input on the serial port i stops with an error. Public Sub SPort_Read() Dim s As String Read #Sport, s, Lof(Sport) ' At this line i get an error saying: End of file in FSerialPort:53 TextArea1.Text = TextArea1.Text & s End Christer