Version=6.80 NumberOfForms=1 Form1=Form1 FormWidth=238 FormHeight=268 IconFile= NumberOfDesktopIncludes=2 DesktopInclude1=FormExDesktop.dll DesktopInclude2=SerialEx.dll NumberOfDeviceIncludes=2 DeviceInclude1=FormExDesktop.dll DeviceInclude2=SerialEx.dll NumberOfObjects=2 Object1=Serial:SerialEx Object2=FormEx:FormEx NumberOfModules=0 Sub designer addform(Form1,"Form1","",220,220,220)@ addlabel(form1,Label1,10,235,100,25,"",220,220,220,0,0,0,True,True,9,False)@ addbutton(form1,Button1,140,235,75,23,"Clear",212,208,200,0,0,0,True,True,9)@ addtextbox(form1,TextBox1,10,15,215,205,"",255,255,255,0,0,0,True,True,True,9)@ End Sub @EndOfDesignText@ Sub Globals 'Declare the global variables here. End Sub Sub App_Start 'Form1.Show formEx.New1("Form1") Serial.New2(1, 4800, "None",8,1) Serial.EnableOnComm = True Serial.PortOpen = True FormEx.EnableThreadEvent("Main.Serial","OnCom", B4PObject(1)) FormEx.Run End Sub Sub Button1_Click TextBox1.Text = "" ' multiline textbox on Form1 End Sub Sub Serial_OnCom char = Serial.InputString TextBox1.Text = TextBox1.Text & char End Sub