کمک در ساخت برنامه ای جالب

[ahsan22]

سلام
کسی هست که به من در نوشتن برنامه ای که با چرخاندن او دکمه لغزنده ی موس به بالا بشه اعداد از یک تا 10 رو تو یک textbox نشان داد و باز وقتی رو به پایین چرخوندیم باز از 10 تا 1 بشه کمک کنه

[ajlajlajl]

اگه درست فهميده باشم. اينو توي رويداد mousewheel تكستباكس بنويسيد (VBس):

Static num As Int16 = 0
If e.Delta > 0 AndAlso num < 10 Then
num += 1
TWnum.Text = num
ElseIf e.Delta < 0 AndAlso num > 0 Then
num -= 1
TWnum.Text = num
End If

اينجا اسم تكستباكس TWnum هست. در ضمن براي اين كه كار كنه بايد تكستباكس روش فوكوس بشه.

[ahsan22]

ببخشید نمی شهکمی در باره delta و کدتون توضیح بدید

[yeketaz]

آقا اینا با چه زبونی نوشتی ؟؟؟

ما توی ویبی دات نت می تونیم هم چین کاری کنیم ؟ :

Num-=1

[ajlajlajl]

ببخشید نمی شهکمی در باره delta و کدتون توضیح بدید

Static num As Int16 = 0
اين كه يه متغير استاتيكه كه مقدارمونو نگه ميداره و استاتيك تعريفش كردم كه مقدارشو از دست نده
If e.Delta > 0 AndAlso num < 10 Then
delta وقتي موس بچرخه بالا مثبت ميشه وقتي بچرخه پايين منفيميشه. خب چكش ميكنيم اگه مثبت بود و متغيرمون كمتر از ده
num += 1
TWnum.Text = num
به متغيرمون يكي اضافه ميكنيم و نشونش ميديم توي تكست باكس
ElseIf e.Delta < 0 AndAlso num > 0 Then
وگرنه اگه delta منفي بود و عددمون بزرگتر از صفر
num -= 1
TWnum.Text = num
يكي از مقدارمون كم ميكنيم و نمايشش ميديم
End If
خلاص

آقا اینا با چه زبونی نوشتی ؟؟؟

ما توی ویبی دات نت می تونیم هم چین کاری کنیم ؟ :

Num-=1

اختيار داريد. توي ويبي دات نت كارا ميتونيد بكنيد ... . شاخ غولو ميشكنه.

[ahsan22]

خیلی قشنگ توضیح دادید ممنون

[download69]

از توضیحات کامل تشکر می کنم

[Di Di]

دوستان عزیز

لطفا از دکمه "تشکر" که در نوار ابزار زیر هر پست قرار داره برای تشکر استفاده و از ارسال پست جدید برای این کار حتی المقدور خودداری کنید.

[reza4359]

اگه درست فهميده باشم. اينو توي رويداد mousewheel تكستباكس بنويسيد (VBس):

Static num As Int16 = 0
If e.Delta > 0 AndAlso num < 10 Then
num += 1
TWnum.Text = num
ElseIf e.Delta < 0 AndAlso num > 0 Then
num -= 1
TWnum.Text = num
End If

اينجا اسم تكستباكس TWnum هست. در ضمن براي اين كه كار كنه بايد تكستباكس روش فوكوس بشه.

ببخشید ما رویداد mousewheel نداریم !!!