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

مساعدة عاجلة وهامة جدا

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

الاخوة الاعزاء كيف اجعل البحث في الحقول الثلاثة في نفس الوقت

F1

F2

F3

هذا الكود للبحث في حقل واحد وهو (F1) كيف اجعل البحث في الحقول الثلاثة (F3)(F2)(F1) في نفس الوقت

السطر الاول للبحث بكامل الكلمة

السطر الثاني للبحث باول الكلمة

السطر الثالث للبحث باخر الكلمة

السطر الرابع للبحث باي جزءالكلمة

If Combo1.ListIndex = 1 Then
        If Option1.Value = True Then
            RS.Open "SELECT * FROM [workers] WHERE [f2] LIKE '" & Trim(Text77) & "'", db, adOpenStatic, adLockPessimistic
        End If
        If Option2.Value = True Then
            RS.Open "SELECT * FROM [workers] WHERE [f2] LIKE '%" & Trim(Text77) & "';", db, adOpenStatic, adLockPessimistic
        End If
        If Option3.Value = True Then
            RS.Open "SELECT * FROM [workers] WHERE [f2] LIKE '" & Trim(Text77) & "%';", db, adOpenStatic, adLockPessimistic
        End If
        If Option4.Value = True Then
            RS.Open "SELECT * FROM [workers] WHERE [f2] LIKE '%" & Trim(Text77) & "%';", db, adOpenStatic, adLockPessimistic
        End If
    End If

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

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