الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أين الخطأ هنا Combobox

بدأه red-one في 25 يونيو 2010 · 2 رد · 645 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

اخواني لدي مشكل في هذا الكود أيد ان أعرف أين الخطأ وشكرا لكم

If Not IsNull(TB![GCIN]) Then Trim(cmbName.Text) = TB![GCIN]
If Not IsNull(TB![GCNSS]) Then Trim(GCNSS.Text) = TB![CNSS]
If Not IsNull(TB![AMariage]) Then Trim(AMariage.Text) = TB![AMariage]
If Not IsNull(TB![CTravail]) Then Trim(CTravail.Text) = TB![CTravail]
If Not IsNull(TB![Marie]) Then Trim(Marie.Text) = TB![Marie]
If Not IsNull(TB![Célib]) Then Trim(Célib.Text) = TB![Célib]
If Not IsNull(TB![Divorce]) Then Trim(Divorce.Text) = TB![Divorce]

هذا الكود لاسترجاع البيانات من قاعدة البيانات لكن لا أعرف هل يتم التعامل مع combobox بهذا الكود ام لا ؟؟

#2

السلام عليكم

فقط امسح TRIM فال COMBOBOX هنا تريد ان تضع فيه قيمة اذا لاحاجة للـ Trim

If Not IsNull(TB![GCIN]) Then Combo1.text = TB![CIM_NAME]

وبالتوفيق ان شاء الله

"نحن لا نستسلم... ننتصر أو نموت.... وهذه ليست النهاية... بل سيكون عليكم أن تحاربوا الجيل القادم والاجيال التي تليه... اما أنا... فإن عمري سيكون أطول من عمر شانقي."

عمر المختار

اللهم انعم على بلادي بالأمن والأمان

#3

شكرا لك أخي

مواضيع مشابهة