ايران ويج

نسخه‌ی کامل: معرفي يك كليد خاص به برنامه
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
با سلام من مي خواهم نحوه معرفي يك كليد كه مثلا اگه اون كليد را زدي برنامه شروع به كار كنه را برام توضيح بدهيد مثلا اگر كليد c يا اسپيس يا اينتر را زد برنامه پرينت بدهد
بايد در واقعه KeyPress فرمتون اين عمل رو تعريف كنيد. به نحوي كه با فشرده شدن كليد خاصي ، عمليات مورد نظر شما انجام شود. براي نمونه در كد زير چنانچه كليد Enter‌را فشار دهيد برنامه خاتمه پيدا مي كند.
کد:
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then End
End Sub
Di Di نوشته است:بايد در واقعه KeyPress فرمتون اين عمل رو تعريف كنيد. به نحوي كه با فشرده شدن كليد خاصي ، عمليات مورد نظر شما انجام شود. براي نمونه در كد زير چنانچه كليد Enter‌را فشار دهيد برنامه خاتمه پيدا مي كند.
کد:
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then End
End Sub
درسته
فقط با اجازه آقا Di Di یک تغییر کوچیک تو کدش دادم:

کد:
Private Sub Form_KeyPress(KeyAscii As Integer)
'13 = vbKeyReturn
If KeyAscii = vbKeyReturn Then End
End Sub
سلام
اگه بخایم خارج از فرم این کارو بکونیم چی؟
یعنی فرم پنهانه میخواهیم به فرض مثال با زدن ctrl+k فرم ظاهر بشه...
سلام

دوستان قبلا در این مورد به بنده کمک کردنHeart این هم جواب شما:
http://forum.iranled.com/attachment.php?aid=838
برای اطالاعات بیشتر نسبت به این موضوع به آدرس زیر مراجعه کنید
http://forum.iranled.com/showthread.php?tid=7193&page=1
برای مبتدی هایی مثل خودم:
با زدن دکمه ترکیبی ALT+Z برنامه نمایان می شه.
فقط باید برای خروج یه دکمه بزاری و کد زیر رو وارد کنید
me.hide
برای چی باید این کد رو وارد کنیم:
تا با زدن دکمه خروج از برنامه خارج نشیم فقط فرم مخفی بشه تا بعدا بتونیم دوباره فراخانی کنیم(این رو برای مبتدی هایی مثل خودم گفتم نه به شما اساتیدکه خودتون این ها رو یادم دادیدShy)

خدا حافظ