طريقة تحديث ال ( TextBox )

اتمنى ترفق الكود

لتوضيح الفكره وتعم الفائده

Private Sub skt_ObjectReceived(ByVal Sender As rtaUDPSocketLibrary.rtaUDPSocket, ByVal e As rtaUDPSocketLibrary.ObjectReceivedEventArgs) Handles skt.ObjectReceived


        Dim frm As New DataFormHost

        Select Case e.Command

            Case "Latitude"
                Latitude = e.Object.ToString

                frm.Label1.Text = Latitude
            Case "Longitude"
                Longitude = e.Object.ToString

                frm.Label4.Text = Longitude
            Case "Altitude"
                Altitude = e.Object.ToString

                frm.Label8.Text = Altitude
            Case "speed"
                speed = e.Object.ToString

                frm.Label9.Text = speed
            Case "Direction"
                Direction = e.Object.ToString

                frm.Label10.Text = Direction
            Case "Bye"
                Me.Close()
        End Select

    End Sub

هنا يتم الاستقبال و اسناد القيم الى الفورم الذي يحتوي ( TextBox او Label )

اول شيء تعرف متغير من نوع Integer ، وتحدد الـ Interval للـ Timer :

Dim x as integer 

Timer1.Interval=1000

ممكن تستخدم timer و تضع فيه شرط مثل كذا : ( هذا الكود داخل الحدث Tick للـ Timer )

x=x+1

if x mod 3 = 0 then

form1_load(sender,e)

endif

طبعا

بكذا بيكون كل 3 ثواني يستدعي حدث تحميل الفورم ، وتتغير النصوص كما هو مطلوب ،،

بالتوفيق ،،

بعد ما شفت الكود ، استبدل :

form1_load(sender,e)

بـ :

skt_ObjectReceived(sender , e )

ProFesOr-xP كتب:



اول شيء تعرف متغير من نوع Integer  ، وتحدد الـ Interval للـ Timer :


Dim x as integer 

Timer1.Interval=1000

ممكن تستخدم timer و تضع فيه شرط مثل كذا : ( هذا الكود داخل الحدث Tick للـ Timer )

x=x+1

if x mod 3 = 0 then

form1_load(sender,e)

endif

طبعا

بكذا بيكون كل 3 ثواني يستدعي حدث تحميل الفورم ، وتتغير النصوص كما هو مطلوب ،،

بالتوفيق ،،

هل هذه الطريقة هي نفس طريقة

fr.Close()


        fr.Show()

اخي العزيز هذا الكود هو بنفسه يعمل وليس بحاجه الى timer اي ان الحدث يحدث عندما يكون هناك حالة Received اي انه سوف يتكرر كل 3 تواني

ProFesOr-xP كتب:

skt_ObjectReceived(sender , e )

هذه الطريقة افضل واخف على الجهاز ، طريقتك تقوم باغلاق الفورم ثم تحميلها من جديد ..

الطريقة التي وضعتها لك اسرع بكثير ولا تقوم باغلاق البرنامج ابدا ، تحدث صناديق النص والبرنامج شغال ،،

بالتوفيق ،،

ترختومي كتب:

اخي العزيز هذا الكود هو بنفسه يعمل وليس بحاجه الى timer اي ان الحدث يحدث عندما يكون هناك حالة Received اي انه سوف يتكرر كل 3 تواني

اها ، انت لم تبين لي ان الجهاز يقوم بالمطلوب كل 3 ثواني ، اعتقدت انك تريد من البرنامج القيام بذلك ،،

طيب الكود بطريقته الحالية يجب ان يعمل ، لانه يستدعى عند كل استقبال ، اي انه عند كل 3 ثواني يتم تحديث صناديق النص ، وهذا هو المطلوب ،،

ايضا قم بتجربة :

me.refresh()

اتمنى اكون افدتك ، انا طالع الحين ، بالتوفيق ،،

اشكرك اخي الفاضل على تفاعلك معي

اعتقد اني سوف اقوم بتجربة الحل الاول الذي طرحته

لكن ما هو Timer1.Interval=1000

كيف اعملها؟

اضف Timer من ToolBox ،،

اضف الكود السابق في الحدث Load للفورم ،،