لقد عملت موضوع عن الحج وخزنته في ملف
وعملت button اسمه الحج واريد كود بحيث اذا ضغط المستخدم على button الحج ينعرض له الموضوع في combobox ولكم جزيل الشكر
button و combobox
مغلق
استخدمي الكود التالي
Private Sub Command1_Click()
nFile = FreeFile()
Open "c:test.txt" For Input As nFile
Do
Line Input #nFile, st
Combo1.AddItem st
Loop Until EOF(nFile)
Close nFile
End Subوشكرا
هذا الموضوع مغلق.