PDA

View Full Version : سوالی در مورد CommandButton



meisambandari
یک شنبه 12 اسفند 1386, 13:21 عصر
سلام دوستان
سوالی داشتم در مورد رویداد MouseUp در CommandButton در این رویداد با زدن اینتر CommandButton فعال نمیشه میخواستم بدونم راهی هست که فعال بشه ؟

saied_hacker
یک شنبه 12 اسفند 1386, 16:33 عصر
رویداد موس اپ نوشتی می خای با زدن اینتر کاری واسط بکنه؟




Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

MsgBox "Mouse up event!"

End Sub




Private Sub Command1_KeyUp(KeyCode As Integer, Shift As Integer)
MsgBox "Key up event!"
End Sub

meisambandari
یک شنبه 12 اسفند 1386, 17:13 عصر
یعنی هیچ راهی واسه اینکار نیست ؟

saied_hacker
یک شنبه 12 اسفند 1386, 19:07 عصر
چرا یه راهی هست....
اینو دانلود کن

Private Sub XPButton1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
MsgBox "ddd"
End If
End Sub

meisambandari
یک شنبه 12 اسفند 1386, 19:35 عصر
من میخوام حتما تو رویداد MouseUp عمل اینتربر روی دکمه انجام بشه . راهی نیست ؟

saied_hacker
یک شنبه 12 اسفند 1386, 19:54 عصر
شما سوالتو درست توضیح بده...

stealer2007
یک شنبه 12 اسفند 1386, 21:45 عصر
داداشه من بگو چی تو command نوشتی ؟

یکم بیشتر بگو تا بهتر راهنمایی بشی

اوبالیت به بو
یک شنبه 12 اسفند 1386, 22:58 عصر
آخه فدات شم داری می گی MouseUp شما این خط رو دقت بکن:

Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

یه متغیر برای دکمه های اشاره گر، یه متغیر Shift ، یه متغیر برای مختصات X و یکی دیگه برای Y وجود داره.

از همه اینها گذشته شما داری می گی MouseUp یعنی هر وقت اون انگشت مبارکت رو از روی دکمه ماوس ورداشتی. در حالی که کلید Enter رویداد دیگه ای رو طلب می کنه!

Mbt925
دوشنبه 13 اسفند 1386, 00:10 صبح
اگه سورس دکمه ی موردنظر اه شما موجود هست ، میشه اضافه کرد و در غیر این صورت نه.

vbhamed
دوشنبه 13 اسفند 1386, 00:16 صبح
سلام
بچه ها فکر کنم منظور دوستمون اینه



Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

Command1.Value = True

End Sub

Mbt925
دوشنبه 13 اسفند 1386, 00:24 صبح
سلام
بچه ها فکر کنم منظور دوستمون اینه



Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

Command1.Value = True

End Sub


این کد چیکار می کنه؟

saied_hacker
دوشنبه 13 اسفند 1386, 08:54 صبح
اصلا کسی سوالو فهمیده من که نفهمیدم...

vbhamed
دوشنبه 13 اسفند 1386, 09:51 صبح
سلام
من فکر می کنم دوستمون می خواد وقتی رویداد Mouse_Up فراخونی شد، یعنی وقتی دست از روی دکمه ماوس برداشته شد، کار دکمه انجام بشه، یعنی انگار روی دکمه کلیک کردیم
کد Command1.Value = True هم همین کار رو انجام می ده، البته می تونه خود متد Command1_Click رو هم فراخونی کنه

Mbt925
دوشنبه 13 اسفند 1386, 09:56 صبح
سلام
من فکر می کنم دوستمون می خواد وقتی رویداد Mouse_Up فراخونی شد، یعنی وقتی دست از روی دکمه ماوس برداشته شد، کار دکمه انجام بشه، یعنی انگار روی دکمه کلیک کردیم
کد Command1.Value = True هم همین کار رو انجام می ده، البته می تونه خود متد Command1_Click رو هم فراخونی کنه

دوست عزیز مشکل این نیست.
سوال رو دوباره بخونید.

vbhamed
دوشنبه 13 اسفند 1386, 10:18 صبح
من میخوام حتما تو رویداد MouseUp عمل اینتربر روی دکمه انجام بشه . راهی نیست ؟


آقای Mbt925 (http://barnamenevis.org/forum/member.php?u=34702)
نقل قول بالا رو ببینید
من فکر می کنم می خواسته همین منظورو برسونه

Mbt925
دوشنبه 13 اسفند 1386, 10:23 صبح
احتمالا ایشون اشتباه کردن . چون

اولا
این سوال بی معنی اه ، چون بعد از MouseUp کلیک فراخوانی میشه.
دوما
طبق سوالی که در شروع تاپیک مطرح کردن مشخصه که منظورشون چیه:

سلام دوستان
سوالی داشتم در مورد رویداد MouseUp در CommandButton در این رویداد با زدن اینتر CommandButton فعال نمیشه میخواستم بدونم راهی هست که فعال بشه ؟

vbhamed
دوشنبه 13 اسفند 1386, 10:25 صبح
سلام
خب آره
شروع تاپیک رو منم دیدم
در حقیقت کاملا مشخص نکردن چی می خوان
اما تو رویداد Mouse_Up هم در صورتی دکمه خودش فعال میشه که چپ کلیک کرده باشیم و اگر این کار رو با دکمه راست یا بقیه دکمه های ماوس انجام بدیم، دیگه کلیک فراخونی نمیشه

meisambandari
دوشنبه 13 اسفند 1386, 10:55 صبح
سلام دوستان
من اصلا نمیخوام که موس روی دکمه بره و عمل کلیک انجام بشه و میخوام که در رویداد MouseUp با زدن اینتر دکمه فعال بشه و دستوراتی که بهش دادمو انجام بده

اوبالیت به بو
دوشنبه 13 اسفند 1386, 13:15 عصر
سلام دوستان
من اصلا نمیخوام که موس روی دکمه بره و عمل کلیک انجام بشه و میخوام که در رویداد MouseUp با زدن اینتر دکمه فعال بشه و دستوراتی که بهش دادمو انجام بده
خوبی؟ خوشی؟ فکر نکنم!

خوب باید دکمت SetFocuse بشه و هر وقتم که اینتر کردی کد فراخوانی بشه. البته تویه رویداد
KeyPress یا KeyDown باید کدت رو بنویسی. تویه MouseUp این کار شدنی نیست. اصلاً ربطی به این نداره.

meisambandari
دوشنبه 13 اسفند 1386, 14:03 عصر
یعنی هیچ راهی نیست ؟>

Mbt925
سه شنبه 14 اسفند 1386, 14:48 عصر
دوست عزیز فکر کنم 1بار بهتون گفتم.
همچین کاری رو نمی تونین برای دکمه ی ویبی یا سایر دکمه هایی که سورشون رو ندارین انجام بدین.

اگه دکمه ی خاصی مدنظرتون هست که سورسش رو دارین ، بگین تا بهش اضافه کنم.

meisambandari
سه شنبه 14 اسفند 1386, 20:33 عصر
دوست عزیز فکر کنم 1بار بهتون گفتم.
همچین کاری رو نمی تونین برای دکمه ی ویبی یا سایر دکمه هایی که سورشون رو ندارین انجام بدین.

اگه دکمه ی خاصی مدنظرتون هست که سورسش رو دارین ، بگین تا بهش اضافه کنم.
سلام Mbt925 جان شما خودت استاده مایی هر دکمه ای رو صلاح میدونین رو ادیت کنید . ممنون شما

Mbt925
چهارشنبه 15 اسفند 1386, 11:17 صبح
باشه ، من در اسرع وقت یه دکمه که سورس بازه رو براتون ادیت می کنم.

stealer2007
چهارشنبه 15 اسفند 1386, 11:28 صبح
داداشه من خوب .............. من

اینجا رو سانسور کردم

ببین شما باید اینو توی KeyPress بنویسی تا بعد کد اسکی رو بگیری اگه اینتر بود ماژول اجرا بشه.

یعنی دکمت حتما باید فوکس بشه ولی هرچی فکرش میکنم میبینم یه کم مشکله

Mbt925
چهارشنبه 15 اسفند 1386, 11:35 صبح
دوست عزیز در این که دکمه باید فوکوس داشته باشه شکی نیست ، چون با زدن اینتر باید کلیک بشه.

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

meisambandari
شنبه 18 اسفند 1386, 12:48 عصر
سلام Mbt925 (http://barnamenevis.org/forum/member.php?u=34702) جان همچنان منتظر دکمه که گفته بودین هستم!

Mbt925
شنبه 18 اسفند 1386, 13:12 عصر
توی این دکمه با زدن اینتر علاوه بر کلیک ، رویداد MouseUp هم اتفاق میفته.

meisambandari
شنبه 18 اسفند 1386, 13:21 عصر
ممنون از شما Mbt925 (http://barnamenevis.org/forum/member.php?u=34702) جان