ترکیب کلید ها در رویداد KeyPress ?

[saeedvir]

سلام دوستان

چه طوری میشه در رویداد key press وقتی کلید های ctrl + enter فشرده شده ، برنامه مثلا یه پیغام بده ؟؟؟

:تشویق::

[mpmsoft]

Shift = 1 یعنی کلید Shift نگه داشته شده است
Shift = 2 یعنی کلید Ctrl نگه داشته شده است

[Dr.Bronx]

باز هم جهت کامل شدن این تاپیک می گم و گرنه گفته جناب mpmsoft کاملا صحیحه.

این در زمانی که بخوایم بگیم مثلا : کلید شیفت و F5
If KeyCode = vbKeyF5 And Shift = 1 Then msgbox "shift + f5"

و در زمانی هم که بخوایم بگیم مثلا : کلید کنترل و F5
If KeyCode = vbKeyF5 And Shift = 2 Then msgbox "shift + f5"


شیفت برابر با 3 باشه میشه : ctrl + shift

شیفت برابر با 4 باشه میشه : Alt

شیفت برابر با 5 باشه میشه : Shift + Alt

شیفت برابر با 6 باشه میشه : Ctrl + Alt

شیفت برابر با 7 باشه میشه : Shift + Ctrl + Alt

[30rabi]

من اينها رو اجرا مي كنم اما كليد تركيبي جواب نميده. لطفا اگه ميشه سورس بزاريد. من ميخام كليد تركيبي ctrl
و S رو بزارم.
با تشكر

[just4froum]

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If Shift = 2 And KeyCode = vbKeyS Then MsgBox "You Press Ctrl + S"
End Sub