تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] عند فتح الكومبو بوكس تظهر فيها جميع اسماء الزبائن
#2
وعليكم السلام ..

كود :
Private Sub Form_Load()

   Set db = OpenDatabase(".\compny.mdb")
   Set rs = db.OpenRecordset("tbl1")
   Do Until rs.EOF
       Combo4.AddItem (rs!Namee)
       rs.MoveNext
   Loop
End Sub

Private Sub Combo4_Click()
   Text15.Text = Combo4.Text
End Sub
قال صلى الله عليه وسلم: 
«كلمتان خفيفتان على اللسان 
ثقيلتان في الميزان،حبيبتان إلى الرحمن: 
سبحان الله وبحمده، سبحان الله العظيم».
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
RE: عند فتح الكومبو بوكس تظهر فيها جميع اسماء الزبائن - بواسطة Taha Okla - 24-11-23, 09:29 PM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Question [vb6.0] هل يمكن عرض اسماء الاصناف في الرسم البياني في جهة اليمين بشرط ياخد الاسماء من قاعدة Microformt 0 232 14-08-24, 06:42 PM
آخر رد: Microformt
  حفظ نص أو قيمة التشك بوكس في السيتنغ مصمم هاوي 1 224 14-08-24, 03:26 AM
آخر رد: مصمم هاوي
  كود تحديد وإلغاء تحديد التشك بوكس مصمم هاوي 2 292 11-08-24, 12:08 AM
آخر رد: مصمم هاوي
  [vb6.0] حذف سجل محدد بضغطة زر وحذف جميع السجلات بضغطة زر وادي العوضي 2 484 31-12-23, 07:24 AM
آخر رد: وادي العوضي
  [سؤال] التيكست بوكس Abdellah 2 643 18-11-23, 10:55 AM
آخر رد: Abdellah
  رسالة خطأ تظهر لي ما الحل؟ Alhootti1 3 593 28-08-23, 02:11 PM
آخر رد: ahmedabdelaliem
  [سؤال] كود عدم تكرار الداتا المستعدة فى الكومبو بوكس mostafa fricool 6 6,777 09-02-23, 02:10 PM
آخر رد: ahlan_32
  استفسار اخوتي بخصوص التيكست بوكس او الليست بوكس عبدالمؤمن 1 731 27-11-22, 08:51 PM
آخر رد: عبدالمؤمن
  [vb6.0] ادخال الاسم في الكومبو بوكس ويحفظ في الكومبو بوكس وادي العوضي 3 1,130 15-06-22, 01:56 AM
آخر رد: ahmedabdelaliem
  [vb6.0] اضافة الاسماء في الليست بوكس وظهور البيانات مثل الكريدفيو وادي العوضي 5 1,661 04-06-22, 09:42 PM
آخر رد: مصمم هاوي

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم