السلام عليكم ورحمة الله وبركاته
كل عام وأنتم بخير
أريد تصميم فورم عليه عدد 28 زر وهي أزرار أحرف اللغة العربية أ ، ب ، .... ، ي
أريد عند الضغط على أحد الأزرار للإسم الذي يبدأ بهذا الحرف يتم عرض كافة الأسماء التي تبدأ بذلك الحرف .
وعند الضغط على هذا الاسم المراد بالفأر يتم عرض بيانته السابق تخزينها في قاعدة البيانات
أنا استعمل داتا كنترول وفلكي جرايد وأزرار كوماند وحاولت أسوى ذلك بالأكسس فوجدت أني سأعمل 28 استعلام وهذا ليس حل برمجي
آمل المساعدة .
htmfd
Data1.Recordset.MoveLast Data1.Recordset.MoveFirst For i = 0 To Data1.Recordset.RecordCount - 1 'مطابقة علي حرف الباء "ب If StrComp(Left$(Data1.Recordset.Fields(0).Value, 1), "ب", vbTextCompare) = 0 Then List1.AddItem Data1.Recordset.Fields(0).Value 'قائمة لاضافة الاسماء المطابقة End If Data1.Recordset.MoveNext Next
Ali Sayed
ياريت يا أخ Ali Sayed
مثال ولو بسيط
وشكراً
HTMFD
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…