[hanylever]

اولا بشكر حضرتك على اهتمامك ومساعدك
الشاشة اول ما الجهاز بيشتغل بتكتب الفيرجن بتاعها بس وبعد كدة بتطفى
الجهاز فى بانل خاصة بية من خلالها تقدر تجرب الشاشة وتكتب عليها اى حاجه ودا اكدلى ان الشاشة شغالة كويس ومتعرفة وملهاش اى تعريف او درايف
فى حد قبل كدة كان ادانى كود اتعمل بيه مع الشاشة دى بس الكود خاص بمدخل السريال فمشتغل مع الشاشة دى لانها USB
دا الكود اللى كان عندى
Sub TERMINAL_DISPLAY(ByVal MSG As String)
       Dim COM_PORT As String = "COM4"
       Try
           SP = New SerialPort(COM_PORT, 9600, Parity.None, 8, StopBits.One)
           SP.Open()
           ' to clear the display
           SP.Write(Convert.ToString(ChrW(12)))

           ' first line goes here
           SP.WriteLine(" TOTAL : " & MSG & "  JD")

           ' 2nd line goes here

           SP.WriteLine((ChrW(13) & "WELCOME..."))

           SP.Close()
           SP.Dispose()
           SP = Nothing
       Catch ex As Exception

       End Try

    End Sub