منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مثال تلوين داخل الكمبو بكس - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : مثال تلوين داخل الكمبو بكس (/showthread.php?tid=3702)

الصفحات: 1 2


مثال تلوين داخل الكمبو بكس - rookan - 24-08-14

السلام عليكم ورحمة الله وبركاتة
كل عام وانتم بخير
ابي كود ضروري الله يحفظكم عند اختياري رقم من الارقام داخل الكمبو بكس يعطيه اللون الاحمر أي(مشغول) وتكون بقية الارقام متاحه باللون الاخظر داخل الكمبو
دمتم بود مبرمجينا المحترفين والمبتدئين امثالي


RE: مثال تلوين داخل الكمبو بكس - rookan - 25-08-14

غريبة وين المحترفين ؟!!!


RE: مثال تلوين داخل الكمبو بكس - abulayth - 25-08-14

السلام عليكم

اليك هذا المثال المنقول للتحكم بالوان الكمبو كما تريد

يعطيك العافية


RE: مثال تلوين داخل الكمبو بكس - rookan - 25-08-14

هلابك اخوي abulayth
ومشكور يعطيك العافيه لكن ماعتقد ان هذا اللي ابي لو فيه اخر ؟ اذا امكن


RE: مثال تلوين داخل الكمبو بكس - king2512010 - 25-08-14

الأخ / rookan

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

تنويه بسيط للبرنامج المرفق صورتة أعلاه .... لم تذكر فى قاعدة البيانات ان الشقة خالية او مسكنة ..!!!!! لذا يجب ادخال هذه المعلومة فى الداتا ، وعلى كلٍ سواء استخدمت كومبو بوكس او استخدمت اى شىء للبحث يجب ادراج هذه النقطة ..

ثانياً : مرفق مشروع صغير للبحث (ليس بالكومبو بوكس) بحث بواسطة تكست بوكس وعند البحث بكلمة خالية او مسكنة تحصل على تلوين مختلف لنتيجة البحث... هذا مع امكانية حصر عدد الشقق الملونة ، وايضا ترتيبهم حسب التسلسل من خلال الكومبو بوكس ..

مرفق مثال للبحث وهو منقول من النت ومعدل علشان عيونك ...

ارجو ان يفيدك ...

تحياتي ..


RE: مثال تلوين داخل الكمبو بكس - rookan - 25-08-14

king2512010 جعل اميمتك وابيك بالجنه ومن يقراء... وبارك الله فيك وفي اخوي abulayth ماقصرتو
اي موضح اللي ذكرت بالقاعدة الان ابجرب هذا زي ما تفضلت

جاري التحميل


RE: مثال تلوين داخل الكمبو بكس - rookan - 26-08-14

اخوي king2512010
عندي المشكلة الرساله هذي بس مادري كيف احلها؟ بعد ماركبت المطلوب


RE: مثال تلوين داخل الكمبو بكس - rookan - 26-08-14

هذا المتداد بالشكل هذا ونفس المشكلة
Connect_AdoControl Adodc1, App.Path & "qser.mdb", "SELECT * FROM index Order By [Last Name]", False, ""


RE: مثال تلوين داخل الكمبو بكس - king2512010 - 26-08-14

جرب الكود ده

PHP كود :
Private Sub Form_Load()
  
Dim DB_Path As String
  DB_Path 
App.Path "\ qser.mdb"
  
Me.Adodc1.ConnectionString "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" DB_Path ";Persist Security Info=False"
  
Me.Adodc1.Refresh
  Me
.Adodc1.CommandType adCmdUnknown
  Me
.Adodc1.RecordSource "select * from Last Name "
  
Me.Adodc1.Refresh
End Sub 



RE: مثال تلوين داخل الكمبو بكس - rookan - 26-08-14

تسلم يا king2512010
نفس المشكلة عموما هذا الجدول بالمرفق ونفس الفورم يا ليت تضبطها بنفس الامتدادات لانها الامتدات الاصلية
ولا هنت البحث بين تاريخين ما زبط معي بكلف عليك يا عمي