منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

Private Sub MSComm1_OnComm()

Dim MyData As String
Select Case MSComm1.CommEvent
Case Is = comEvReceive
MyData = MSComm1.Input
End Select
Label5.Caption = MyData

End Sub
أستاذي الفاضل هذا الكود هو المسؤول عن ظهور رقم الوزن مع علامة ال @

-------------------------------------------------------------------------------------------------
Me.Label5.Caption = Replace(Me.Label5.Caption, "@", " ")

سؤالي هو : اين اضع هذا الكود الذي حضرتك تفضلت به علي هل اضعه بدل هذا الكود Label5.Caption = MyData اذا امكن التوضيح اكثر بارك الله فيك وجزاك الله خيرا

هو يقصد أن تكتب :


بدلا من :

الله يبارك في حضرتك استاذ Taha Okla جزاك الله خيرا
شكرا جزيلا لسرعة الرد حفظكم الله ورعاكم

السلام عليكم
تمام نفس اجابة اخي طه

بالتوفيق

بارك الله فيك استاذ ahmedabdelaliem  وجزاك الله خيرا ممنون منك جدا يا طيب ربنا معاك في كل خطوة يارب