ممكن أحد يشرح لي الكلمات التالية...

ياأخوان مافي أحد قادر يشرح هذه الكلمات

ارجو التفاعل من الأعضاء

السلام عليكم ورحمة الله وبركاته

أخى الفاضل

سؤالك أخاف أغلب الأخوة - أو على الأقل أنا - من محاولة مساعدتك

لو كنت ذكرت جملة وطلبت تفسيرها كنت يسرت علينا وعلى نفسك المسألة

لكن على حد علمى أدلى بدلوى وبالله التوفيق

فى العادة عندما تريد إدراج مرجع لنوع معين من المراجع RecordSet مثلا، فإنك تكون محتاج لخطوتين

1- التعريف بهذا المرجع ونوعه بأن تقول Dim Rs As ADODB.RecordSet

2- تربط هذا المرجع بالنوع الذى حددته له من خلال قولك Set Rs = New ADODB.RecordSet

بذلك تكون فى الخطوة الأولى قلت له من هو Rs وفى الخطوة الثانية قلت له تحتوى على ماذا

أما بخصوص TypeOf لا أعرف إن كان مثالى التالى هو ما تريد أم هناك أكثر

بفرض أنك تريد مسح كل مربعات النصوص الى فى النموذج فماذا تفعل؟ هل تذكرها واحدة بواحدة وتنسى البعض أو تضطر للتغيير كلما أضفت مربع نص جديد؟

لا، يمكنك كتابة كود يمسحها كلها أيا كان عددها

Dim txt As Control
For Each txt In Controls
If TypeOf txt is TextBox then
txt.Text=""
End If
Next txt

فى هذا تقول إن كان نوع الأداة TypeOf من النوع TextBox إجعل محتواه فارغا

أسأل الله أن تكون هذه الإجابة تفى أو تساعد فى الإجابة على سؤالك

كفيت ووفيت أخي abulymann وشكراوالله على شرحك الجميل

ولكن إذا سمحت لي أخي عندى سؤالين وهو هل يجب استخدام typeof مع جملة for each

السؤال الثاني وهو مانوع البيانات الي ممكن أن أضعها بعد كلمة as غير البيانات المعروفة مثل integer أو variant ... ؟

مثلا كلمة control

وأرجو اني ماأكون كثرت عليك الكلام أخي abulymann

مصطفى زيداني

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