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

عندي بالفورم TrackBar1
ولدي متغير من نوع Integer
يحمل قيمه افتراضيه Dim timup As Integer = 30000

وفي حدث تغير الTrackBar1
اضع هذا الكود

كود :

 timup += 3000

            Label3.Text = timup

لزياده قيمه المتغير في كل مره يتغير فيها قميه ال TrackBar1
ولكن لاحظت ان عند زياده الTrackBar1 يزيد قيمه المتغير وعند نقص ال TrackBar1 يزيد كذالك قيمه المتغير
لا تنقص

السطر ده بيزود قيمة المتغير كل ما يتغير التراك بار ، سواء التغير كان زيادة او نقص

كود :

 timup += 3000

اللي انت محتاج تعمله هو انك تربط قيمة المتغير بقيمة التراك بار :

في حدث اللود اظبط قيمة التراك بار على قيمة المتغير ، وكمان اصغر واكبر قيمة :

كود :

TrackBar1.Minimum = 10000

 TrackBar1.Maximum = 60000

TrackBar1.Value = timup

دلوقتي في حدث تغير قيمة التراك بار اكتب :

كود :

timup = TrackBar1.value

Label3.Text = timup

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

اليوم السابع

Anas Mahmoud