ah3000

مشكور كتير اخي وبارك الله فيك

اريد برنامج يطبع على الفورم وتكون النيجة 1 1 2 1 3 1 4 1 5 1 6 2 7 2 8 2 9 2 10 2 11 3 12 3 13 3 14 3 15 3 16 4 17 4 18 4 19 4 20 4

هو برنامج يعتمد على خرائط جوجل يجب كتابه اسم المدينه باللغم الانجليزيه البرنامج يعمل 100% هل يمكن المساعده على تطويره ليبحث عن اسم المدينه باللغة العربية خطوط الطول وخطوط العرض.rar

Private Sub Form_Activate() Dim a As String Do While Not Data1.Recordset.EOF = True a = Data1.Recordset.Fields("GameName").Value List1.AddItem a Data1.Recordset.MoveNext Loop End Sub ويصلح لل combo فقط حيث GameName هو اسم العمود في قاعدة البيانات test.rar

مشكور أخي Abu-Salman على مجهودك الرائع ولن انسى الذي شارك في هذا الموضوع وحلول يحل مشكلتي البرنامج يعطي النتيجة المطلوبة لكن احياناً يتوقف عن الاستجابة هل ممكن المساعدة في هذه المشكلة أخي Abu-Salman

لقد قمت بتصميم هذا البرنامج وهذه صورة النتجيجة عند تنفيذه اريد المساعدة في التعديل عليه لتصبح النتيجة كما في الصورة وشكراً للمساعدة ping.rar