فیلتر در محیط گزارش

[smderfan]

با سلام
خدمتتون عرض کنم یک جدول دفترچه تلفن داریم که در محیط گزارش می خوام وقتی کلید منفی (-) زده شد فیلدهایی رو در محیط گزارش نمایش بده که فیلد TEL اونها (***) نداشته باشه و برعکس در صورتی که کلید + از صفحه کلید فشار داده شد فیلد TEL رکوردهایی رو که (***) رو دارند فقط نمایش بدند.
با تشکر

[mazoolagh]

از رخداد report_keydown استفاده کن (یا report_keypress)

[smderfan]

از رخداد report_keydown استفاده کن (یا report_keypress)

در قسمت EVENT های گزارش که این رویداد وجود نداره ....

[mazoolagh]

شاید در ورژنهای قبل از 2007 نباشه ولی در 2007 هست

[smderfan]

از آفیس 2003 استفاده می کنم .....

[smderfan]

کسی نمی تونه نمونه من رو تکمیل کنه ...

[smderfan]

در لیست کلیدهای میانبر برنامه اکسس نامی از کلیدهای + ؛ - ؛ * و / قسمت اعداد صفحه کلید برده نشده است برای این گزینه ها چه پیشنهادی دارید...


SENDKEYS Syntax :
BACKSPACE = {BACKSPACE}, {BS}, or {BKSP}
BREAK = {BREAK}
CAPS LOCK = {CAPSLOCK}
DEL or DELETE = {DELETE} or {DEL}
DOWN ARROW = {DOWN}
END = {END}
ENTER = {ENTER}or ~
ESC = {ESC}
HELP = {HELP}
HOME = {HOME}
INS or INSERT = {INSERT} or {INS}
LEFT ARROW = {LEFT}
NUM LOCK = {NUMLOCK}
PAGE DOWN = {PGDN}
PAGE UP = {PGUP}
PRINT SCREEN = {PRTSC}
RIGHT ARROW = {RIGHT}
SCROLL LOCK = {SCROLLLOCK}
TAB = {TAB}
UP ARROW = {UP}
F1 = {F1}
F2 = {F2}
F3 = {F3}
F4 = {F4}
F5 = {F5}
F6 = {F6}
F7 = {F7}
F8 = {F8}
F9 = {F9}
F1 =
F10 = {F10}
F11 = {F11}
F12 = {F12}
F13 = {F13}
F14 = {F14}
F15 = {F15}
F16 = {F16}

To specify keys combined with any combination of the
SHIFT, CTRL, and ALT keys, precede the key code with one
or more of the following codes:

SHIFT = +
CTRL = ^
ALT = %

To specify that any combination of SHIFT, CTRL, and ALT
should be held down while several other keys are pressed,
enclose the code for those keys in parentheses. For
example, to specify to hold down SHIFT while E and C are
pressed, use "+(EC)". To specify to hold down SHIFT while
E is pressed, followed by C without SHIFT, use "+EC".

[mazoolagh]

راهی که به ذهنم میرسه این هست که 2 تا دکمه در report header اضافه کنین

[smderfan]

به چه صورت می تونم از نوارهای ابزار استفاده کنم ..... که یک نوار ابزار ظاهر بشه البته در موقعیت پایین گزارش ....

[smderfan]

خدمتتون عرض کنم یک جدول دفترچه تلفن داریم که در محیط گزارش می خوام وقتی کلید منفی (-) زده شد فیلدهایی رو در محیط گزارش نمایش بده که فیلد TEL اونها (***) نداشته باشه و برعکس در صورتی که کلید + از صفحه کلید فشار داده شد فیلد TEL رکوردهایی رو که (***) رو دارند فقط نمایش بدند

نمونه ای برای این مورد سراغ ندارید؟

[seeker]

در لیست کلیدهای میانبر برنامه اکسس نامی از کلیدهای + ؛ - ؛ * و / قسمت اعداد صفحه کلید برده نشده است برای این گزینه ها چه پیشنهادی دارید...


SENDKEYS Syntax :
BACKSPACE = {BACKSPACE}, {BS}, or {BKSP}
BREAK = {BREAK}
CAPS LOCK = {CAPSLOCK}
DEL or DELETE = {DELETE} or {DEL}
DOWN ARROW = {DOWN}
END = {END}
ENTER = {ENTER}or ~
ESC = {ESC}
HELP = {HELP}
HOME = {HOME}
INS or INSERT = {INSERT} or {INS}
LEFT ARROW = {LEFT}
NUM LOCK = {NUMLOCK}
PAGE DOWN = {PGDN}
PAGE UP = {PGUP}
PRINT SCREEN = {PRTSC}
RIGHT ARROW = {RIGHT}
SCROLL LOCK = {SCROLLLOCK}
TAB = {TAB}
UP ARROW = {UP}
F1 = {F1}
F2 = {F2}
F3 = {F3}
F4 = {F4}
F5 = {F5}
F6 = {F6}
F7 = {F7}
F8 = {F8}
F9 = {F9}
F1 =
F10 = {F10}
F11 = {F11}
F12 = {F12}
F13 = {F13}
F14 = {F14}
F15 = {F15}
F16 = {F16}

To specify keys combined with any combination of the
SHIFT, CTRL, and ALT keys, precede the key code with one
or more of the following codes:

SHIFT = +
CTRL = ^
ALT = %

To specify that any combination of SHIFT, CTRL, and ALT
should be held down while several other keys are pressed,
enclose the code for those keys in parentheses. For
example, to specify to hold down SHIFT while E and C are
pressed, use "+(EC)". To specify to hold down SHIFT while
E is pressed, followed by C without SHIFT, use "+EC".
ببینید این کدها کدهایی هستند که شما میتوانید با استفاده از آنها در توابع فشرده شدن این کلید هارو شبیه سازی کنید. یعنی وقتی از "EC+" استفاده میکنید در واقع به برنامه میگید کلید شیفت و e و c را باهم نگه دارد
اما سوال شما چیز دیگری بود
من فکر میکنم سوال شما این بود که برنامه تشخیص دهد شما چه کلیدیرا فشرده اید که مثلا اگر آن کلید + بود یک عملی انجام دهد که اینکار فقط با استفاده از کد ها asci مقدور است.
شما باید در رویداد کی پرس یا کی دان بگید که اگر اسکی کد برابر کد + بود آن عمل خاص را انجام دهد. برای اینمنظور میتوانید در تالار وی بیجستجو کنید.

[smderfan]

با تشکر از seeker عزیز


شما باید در رویداد کی پرس یا کی دان بگید که اگر اسکی کد برابر کد + بود آن عمل خاص را انجام دهد. برای اینمنظور میتوانید در تالار وی بیجستجو کنید.

مشکل اینجاست که من از اکسس 2003 استفاده می کنم و می خوام از این کلیدها در محیط ریپورت استفاده بشه که رویداد کی پرس یا کی دان در این محیط وجود نداره ...

+ : علامت مثبت صفحه کلید اعداد
- : علامت منفی صفحه کلید اعداد

که برای اینکار از Autokeys استفاده کرده ام ولی نمی دونم به چه صورت + و یا - رو تعریف کنم و به چه صورت فاکتورهای این در محیط گزارش ترو شود.

پیشاپیش از زحمتی که کشیده اید متشکرم.

[seeker]

ببینید در vb از یک تابع API به نام GetKeyState برای تشخیص کلید فشرده شده در زمان فراخوانی تابع استفاده میشود ولی نمیدونم که در VBA میتوان از این API استفاده کرد یا نه
اگر خواستید بگید تا طریقه declare کردنشو بگم:چشمک:

[smderfan]

ببینید در vb از یک تابع API به نام GetKeyState برای تشخیص کلید فشرده شده در زمان فراخوانی تابع استفاده میشود ولی نمیدونم که در VBA میتوان از این API استفاده کرد یا نه
اگر خواستید بگید تا طریقه declare کردنشو بگم:چشمک:

سلام
اگر لطف کنید ممنون می شم.

[seeker]

البته با توجه به اینکه این تابع فشرده شدن کلید را در زمان فرا خوانی تابع تشخیص میدهد پیشنهاد میشود از یک تایمر برای فراخوانی استفاده کنید
ثابت مقدار کلید +

Const VK_ADD=&H6B
طریقه Declare کردن

Private Declare Function GetKeyState lib "user32.dll" (ByVal nVirtKey As Long) As Integer

مقدار برگشتی تابع در صورت فشرده شدن کلید مورد نظر
&H8000

[smderfan]

خیلی زحمت کشیدید ... متشکرم ....
اگر اشکالی ندارده و زحمتی نیست یک نمونه برام بذارید که در محیط گزارش (Report) بشه از این کلیدها استفاده کرد.