[mohamedallams]

أما بعد السلام

عندي سؤال عن التحكم بمخرجات السريال وإعادة تحويلها
المشروع عبار عن ارسال أوامر مشفره عبر السيريال
عن طريق السريال بورت رقم 1
يقوم بارسالها واستقبال الكود بتشفير مختلف
ومن ثم تخزينها
ما اريده هو بدلا من تخزين تلك البيانات اريد ارسالها عن طريق
السريال بورت رقم 2

[mohamedallams]

*تم الحل*

الكود المستخدم

كود :

'''serialport2 = sp2 
Private Sub ReceivedText(ByVal [data] As String) 
        If Me.Label1.InvokeRequired Then
           Dim x As New SetTextCallback(AddressOf ReceivedText)
           Me.Invoke(x, New Object() {(data)})
       Else
           Me.Label1.Text = [text] 'to take data from serialport1 to label1

            SP2.Write(Label1.Text) 'for take data from label1 to serialport2
       
        End If