السلام عليكم ورحمة الله وبركاته
وكما هو موضح بالصورة
قمت بربط combobox بقاعدة البيانات وجعلت الخاصية = 2 كما بالصورة لاجبار المستخدم الاختيار من القائمة وعدم الكتابة
وعند التنقل الى سجل جديد تظهر الرساله التى بالصورة
هل من حل افادكم الله وهل يوجد ادوات او اكواد او طريقة لحل هذه المشكلة بارك الله فيكم
مرفق المشروع للتعديل عليه
ودمتم سالمين
والسلام عليكم ورحمة الله وبركاته
قولوا لا إله إلا الله تفلحوا
الحمد لله ... وجدت الحل
Private Sub Combo1_Key Press(KeyAscii As Integer)
مع الشكر للجميع
والسلام عليكم ورحمة الله وبركاته
قولوا لا إله إلا الله تفلحوا
تعرف لية يا أخي ، لأن ببساطة جداً الآداة DataControl ترسل قيمة الـ Text الي الآداة Combo ، وجدول قاعدة البيانات تحتوي علي عمود يدعي Name مكوناتها قيم نصية !!!
أما بخصوص الكومبو عند ضبط خاصية Style الي 2 لا يجوز تنفيذ هذه العملية به ، حاول تكتب الكود التالي علي زر أمر :
Combo1.Text = "Ahmed"
ستري أن الرسالة التي تعرض هي نفس الرسالة التي تعرض لك أثناء التنقل بين السجلات
لذك من المفضل إستخدام الكومبو بدون الربط المباشر
شكراً
لا تخلط ما بين شخصيتي وأسلوبي .. فشخصيتي هي
ما أنا عليه وتحت تصرفي .. وأسلـوبي يعتمد عليـك
أنت وتصرفاتك
ولحظاتي صمت... وصمـت لحظاتي كلام ... كلامه
اشد آلام ... فصمتي أنا عنوان
الكود سهل جدا و بسيط للغاية و أتفضل يا سيدي الكود
Private Sub Combo1_KeyPress(KeyAscii As Integer)
KeyAscii = 0
End Sub
الكود ده بيمنع المستخد من كتابة أي شئ داخل الكمبو بوكس و ده طبعا هيجبرو أنو يختا من الكمبو
مع خالص شكري و تقديري