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

كيف اقوم بعرض بيانات موظف اسمه مدرج في ComboBox؟

مغلق
بدأه الحالم 2005 في 29 مارس 2006 · 8 رد · 880 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

أخواني الاعضاء اريد منكم المساعدة في هذا الموضوع ....

لدي اعمل برنامج جديد ووضعت به Combo لكي يبحث لي عن الاسماء التي تتخزن به .. مثال على كلامي عندي نموذج الموظفين واريد أن أختار من Combo الاسم المراد وتخرجلي بياناته في الحال , لكن في بداية الموضوع أريد أن تتجمع الاسماء في Combo مثل اليست

بالمعنا هي عملية بحث سريع بالاسم أو الرقم أو ايا كان .. ارجو من الاخوة الافاضل المساعدة العاجلة

أخوكم الحالم :rolleyes:

#2

i did not get it... would you kindly explain it more

#3

وينكم يااخواني

#4

مافيه رد وين أهل الخبره

#5

لو التزمت بقواعد المشاركة واخترت العنوان المناسب للموضوع لربما كان وصلك الحل بصورة اسرع ولم تكن لتحتاج الى رفع الموضوع خلال.. ساعتين!؟

/index.php?showtopic=29343

لذا يرجى الالتزام بهذه القواعد في المشاركات اللاحقة.

Do as I say, not as I do

We are Anonymous. We are Legion. We don't forgive. We don't forget

#6

اشكر أوخي على هذه النصيحه والتوجية ...

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

اخوك الحالم

#7

لم أجد الحل حتى الان أخواني ساعدوني في هذا الموضوع .

أشكركم

#8

لم أجد الحل حتى الان أخواني ساعدوني في هذا الموضوع

#9

أخي الكريم / الحالم 2005

حسب ما فهمت من سؤالك انك عايز تجيب الاسماء الموجودة في حقل معين من جدول وتعرضها في كومبو ، وعليه سأقوم بوضع الكود الخاص بذلك كما يلي :

Private Sub Combo1_GotFocus()
Dim sq As String
sq = "Select * from TableName"
Set rs = db.OpenRecordset(sq, 2)
If rs.BOF = True And rs.EOF = True Then Exit Sub
rs.MoveFirst
Do While Not rs.EOF
Combo1.AddItem rs("Name")
rs.MoveNext
Loop

End Sub

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

أحمــد

هذا الموضوع مغلق.

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…