نحوه تعریف کلیدهای تابع صفحه کلید در اکسس(F1 .. F2 .. F3)

[royasaz_bam]

سلام
چگونه با ماژول میتوان کلیدهای تابع صفحه کلید را تعریف کرد تابع ذیل


Function f1pressed() As String
MsgBox "ok"
End Function



که جهت تعریف کلید F1 میباشد در نمونه پیوستی کار میکند یعنی بازدن F1 پیام ok میدهد ولی هنگامی که همین ماژول را در پروژه دیگری می نویسیم با زدن کلید F1 راهنمای اکسس اجرا میشود به گمانم باید ابتدا با تنظیمات اکسس کار اصلی کلید f1 غیر فعال کرد سپس ماژول را اجرا کنیم از دوستان اگر کسی میتواند توضیح دهد ممنون میشوم لازم به ذکر است سایر کلیدهای تابع از جمله کلید F11 را نتوانستم با این ماژول تعریف کنم اگر توضیحی در خصوص نحوه تعریف سایر کلیدها هم دهید ممنون میشوم

[royasaz_bam]

مثل اینکه میبایست یک ماکرو Autokeys میساختم
مطابق عکس83677
این موضوع را خیلی وقت پیش در یک کتاب خوانده بودم ولی فراموشم شده بود با این حال به عنوان جنبه آموزشی از حذف این تاپیک خوداری میکنم امیدوارم به کار سایرین بیاید

[ATA_TABRIZ]

با سلام
ميتونيد از روش زير نيز استفاده كنيد در Form_KeyDown
البته با تو propertis كي پرس on كنيد


Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
On Error GoTo MYERROR

Dim stDocName As String
Dim stLinkCriteria As String

If KeyCode = vbKeyF2 Then
DoCmd.GoToRecord , , acNext

ElseIf KeyCode = vbKeyF3 Then
DoCmd.GoToRecord , , acPrevious
End If