مستر کد
mrcode.wikibix.ir

ایجاد دکمه جستجو در فرم اکسس

نویسنده : رضا قربانی | زمان انتشار : 09 اسفند 1399 ساعت 21:36

جهت انجام پروژه های دانشجویی و یا تمرین‌های برنامه نویسی رشته کامپیوتر میتوانید به آی دی تلگرام زیر پیام دهید

@AlirezaSepand



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

فرمها دارای کاربردهای متنوع هستند اما مهمترین رسالت فرمها این است که بعنوان واسط بین کاربر و بانک اطلاعاتی عمل کنند .

به این صورت که اطلاعات مورد نیاز را از کاربر دریافت نموده و آنها را برای ذخیره نمودن در اختیار جداول می گذارند .

نرم افزار اکسس دارای فرم های مختلفی هستند . 

هر چند که این فرم ها دارای شکل و شمایل متفاوتی هستند اما همگی آنها در عملکرد دارای اشتراکات زیادی هستند .

یکی از انواع فرمهایی که از آنها می توان بهره برد  فرم هایی از نوع Data sheet  می باشد. 

 فرم های Data sheet  شکل خاصی از فرم ها هستند که اطلاعات موجود در خود را به صورت یک صفحه گسترده به نمایش می گذارند .

یعنی چیزی مثل شیت های کاری در نرم افزار اکسل . 

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

به گونه ای وقتی که کاربر در این کادر یک آیتم را وارد می کند با زدن یک دکمه برنامه به جستجوی آیتم مورد نظر پرداخته و نتیجه نهایی را با توجه به در خواست کاربر نمایش می دهد. 

البته برای جستجو کردن و نمایش اطلاعات در اکسس راهها و روش های مختلفی وجود دارند .

من در همین سایت هم به چند مورد از این روش ها پرداخته ام .

مثلا یک سری به لینک زیر بزنید .

در این مطلب من در خصوص اینکه چه جوری می توان از یک تکس باکس استفاده کرد تا اطلاعات مورد نظر را جستجو کرده و انها را در فرم خود نمایش دهیم صحبت کرده ام .

یا در لینک زیر در خصوص اینکه چه جوری می توان از یک کمبو باکس کمک گرفت تا اطلاعات مورد نظر خود را جستجو و پیدا کنیم صحبت کرده ام .

حتی در مطلب زیر هم یک حالت جستجوی کاملا پیشرفته را معرفی کرده ام که به محض اینکه شما یک کاراکتر از آن چیزی را که به دنبالش هستید را وارد می کنید کار جستجو در بین اطلاعات بطور همزمان شروع می شود .

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

من علیرضا شهرآئینی هستم و از شما می خواهم که تا پایان این آموزش همراه من باشید تا با هم  بررسی می کنیم که چگونه می توانیم این کار را انجام دهیم .

مراحل افزودن کادر جستجو برای یافتن مقادیر در یک فرم 

ابتدا جدولی شامل اطلاعات زیر را در نظر بگیرید .

در گام نخست باید از این جدول خود یک فرم تهیه نماییم .

برای این کار کافی است از سربرگ Create  بر روی more Form  و زیر مجموعه Multiple Itemکلیک می کنیم .

بعد از انجام مراحل فوق فرم مربوطه ایجاد شده و برای شما به نمایش در می آید .

انجام تنظیمات مربوط به فرم و افزودن کادر جستجو به یک فرم.

در اینجا باید یکسری تغییرات را در فرم خود ایجاد و برخی از اشیایی را که به آنها نیاز داریم را به فرم خود اضافه کنیم .

برای انجام تنظیمات مورد نظر ابتدا فرم خود را در نمای design  باز می کنیم .

 در ادامه مراحل مختلف را با همدیگر دنبال می کنیم .

  1. ابتدا با جابجایی هایی که انجام می دهیم فضایی برای قرار دادن یک تکس باکس را در قسمت Form Header  ایجاد می کنیم
  2. یک تکس باکس را در محل مناسب در بالای این فرم قرار می دهیم. نام این تکس باکس را بصورت txtsearch تعیین کنید  .
  3. عنوان برچسب مربوط به این تکس باکس را به ” نام نویسنده را وارد کنید ” تغییر دهید . 
  4. یک Command Button   را نیز در محیط این فرم و درست در کنار تکس باکس مربوطه قرار دهید .   

بعد از انجام ۴ مرحله فوق باید فرمی مشابه تصویر زیر داشته باشید . 

اکنون باید به سراغ اصل موضوع برویم .

کاری که می خواهیم انجام این است که کاربر نام یک نویسنده را در تکس باکس مورد نظر وارد کند .

سپس با زدن دکمه “پیدا کن ” نام نویسنده مورد نظر در بین اطلاعات موجود در فرم پیدا شده و فیلد مربوط به نام نویسنده را به همراه سایر آیتم ها نمایش می دهد.

اما این اطلاعات در کجا قرار دارند .

این اطلاعات در داخل همان جدولی ذخیره شده اند که فرم ما به آن متصل شده است .

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

برای این منظور باید برای دکمه ای  که بر روی فرم قرار دادیم کد نویسی کنیم .

برای این کار همزمان که فرم ما در حالت طراحی قرار دارد  دکمه مورد نظر را انتخاب می کنیم .

سپس از طریق کادر Property Sheet  و از سربرگ Event  رویداد On Click  را انتخاب کنید . 

استفاده از کدهای VBA 

اکنون در رویداد مربوط به این دکمه کدهای زیر را وارد کنید .

()PrivateSub Command27_Click

Dim strsql AsString

strsql="SELECT * FROM tblbooks WHERE ((author Like ""*"&txtsearch&"*""))

Me.RecordSource=strsql

EndSub

بیایید با هم نگاهی به این کدها بیندازیم .

در خط اول از این کدها ما یک متغیر به نام strsql  از نوع متنی تعریف کردیم .

در خط دوم متغیری که در خط قبل تعریف کردیم را برابر با  یک عبارت SQL  قرار دادیم .

اگر بخواهیم این خط از کد را که حاوی دستورات SQL  است را به زبان محاوره دراوریم می توان اینطور گفت که :

” انتخاب کن تمامی آیتم های موجود در جدول   tblbooks را اما بعد از کلمه کلیدی where  این شرط  را تعیین کردیم که فیلد مربوط به نویسنده  این اطلاعات باید  هم نام با اسمی باشد که من در تکس باکس موجود بر روی فرم خود وارد می کنم” .

در خط آخر از این کد هم که منبع فرم خود را اطلاعات استخراج شده از همین عبارت SQL  خود قرار می دهیم. 

اگر می خواهید اطلاعات بیشتری از کار با دستورات SQL  پیدا کنید می توانید به این مطلب مراجعه کنید .

مطلب مرتبط : آشنایی با دستورات کاربردی SQL  در اکسس

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

بعد از کلیک بر روی دکمه “پیدا کن ” نتیجه کار را مشاهده خواهید کرد .

اگر می خواهید فایل نمونه این آموزش را داشته باشید کافی است فرم زیر را پر نمایید بلافاصله لینک دانلود فایل نمونه به ایمیل شما ارسال خواهد شد . 

برای دریافت نمونه فایل رایگان اسم و آدرس ایمیل خودتون رو بطور کامل وارد کنید .


منبع: softpluse.ir