منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم و رحمة الله 
السؤال غير واضح

هل هذا طلبك

(27-01-18, 09:45 PM)Amir_alzubidy كتب : [ -> ]السلام عليكم و رحمة الله 
السؤال غير واضح

جزاك الله خير سيتم ارفاق مثال

---

(28-01-18, 01:57 AM)عبدالله الصافي كتب : [ -> ]هل هذا طلبك

كود :

Private Sub Combo1_Click()
Text1 = Combo1
End Sub

Private Sub Form_Load()
Dim xx(4) As String
xx(0) = "أحمد"
xx(1) = "خالد"
xx(2) = "جمعة"
xx(3) = "صالح"
For i = 0 To 3
Combo1.AddItem xx(i)
Next
End Sub

بجرب الكود

---

المرفق تحت مع صورة توضيحية

السلام عليكم و رحمة الله و بركاته 
اتمنى ان يكون هذا هو المطلوب 
[attachment=16938]

كم أنت رائع أستاذ أمير
بورك فيك وفي أعمالك الرائعة

(28-01-18, 09:35 PM)Amir_alzubidy كتب : [ -> ]السلام عليكم و رحمة الله و بركاته 
اتمنى ان يكون هذا هو المطلوب 

استاذي الفاضل أشكرك من كل قلبي
وأسأل الله تعالى أن يوفقك
تم الحل