رويداد راست كليك براي پيكچرباكس؟ [بایگانی]

View Full Version : رويداد راست كليك براي پيكچرباكس؟

mah.yar

سه شنبه 07 خرداد 1387, 00:47 صبح

چه جوري راست كليك روي يه پيكچرباكس رو تشخيص بدم همچين رويدادي نداره؟

ali_habibi1384

سه شنبه 07 خرداد 1387, 04:38 صبح

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then MsgBox "rigth click"
End Sub

مهران رسا

سه شنبه 07 خرداد 1387, 10:58 صبح

اگه بخوایم تشخیص بدیم که یکی از کلیدهای کیبورد هم زده شده چی ؟!!
مثلاً Shift + Right Click .؟!!!!

مرسی

ali_habibi1384

سه شنبه 07 خرداد 1387, 15:09 عصر

اگه بخوایم تشخیص بدیم که یکی از کلیدهای کیبورد هم زده شده چی ؟!!
مثلاً Shift + Right Click .؟!!!!

مرسی

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 And Shift = 1 Then MsgBox "Press Shift and Right Click"
End Sub

HjSoft

شنبه 11 خرداد 1387, 06:00 صبح

چه طور منو نشون بديم ؟

مهران رسا

شنبه 11 خرداد 1387, 06:38 صبح

اول باید منو رو ایجاد کنی بعد با popupmenu منوی مورد نظر رو فراخوانی کنی .

ali_habibi1384

شنبه 11 خرداد 1387, 17:53 عصر

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then PopupMenu mnuname
End Sub