كيف اتعامل مع هذا الاجراء .. ارجو الاجابة

السلام عليكم

كيف تتعامل معها ؟؟؟!

أنت ماذا تريد أن تعمل معها ؟

يااخى اريد ان استدعى الفورم الخاصة بالبحث من اى فورم اخرى وتقوم بعملية البحث وتعرض البيانات وذلك من خلال قاعدة البيانات

اتمنى ان تكون وضحت

وجزاك الله خيرا

النافذة التي قمت بعملها بدل InputBox : اكتب الكود التالي في زر بحث في النافذة :

GetDataFromDbs Text1.Text,Form2

بفرض أن اسم الإجراء في المودل GetDataFromDbs وهوا معرف في مودل على النحو التالي :

Public Sub GetDataFromDbs (str As String,frm As Form)
.
.
.
End Sub

هذا الإجراء تم تمرير القيمة التي كتبها المستخدم في النافذة البحث في صندوق النص Text1 وكذلك تم تمرير النافذة التي سيتم وضع النتائج بها :

وا للوصول الى محتويات النافذة التي سيتم العرض بها من داخل الإجراء :

Set frm.DataGriad1.DataSource = Rs

يمكنك الوصول إلى اي إداه في النافذة التي سيتم العرض (عرض النتائج بها ) من الإجراء عن طريق كتابة اسم frm وهوا عبارة عن المتغير الذي مررنا نافذة العرض وأنا فرضتها بإسم From2 إلية بعد ذلك اعمل دت وسوف تضهر لك قائمة اكتب اسم الإداه سوا text او textbox الخ .

frm.Label1.Caption = "نتائج البحث 20 نتيجة "

بالتوفيق B)

ممكن يااخى تعدل على الملف اللى ارفقته سابقا

معلش هتعبك معى

وجزاك الله خيرا

للرفع