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

عندي قاعدة بيانات اكسيس 2007 مربوطة بالفيجول بيسك

استخدم كود البحث بالطريقة BindingSource1 الشرط الاول المدخل - الثاني التاريخ ولكن كود البحث عن تاريخ لايعمل

اريد تعديل البحث عن التاريخ

كود :

If DataSet1.Tables("Table1").Compute("count(Studentsed)".ToLower, "Studentsed like '%".ToLower & TextBox9.Text.Trim & "%' ").ToString > 0 Then

            BindingSource1.Filter = "Studentsed like '%".ToLower & TextBox9.Text.ToLower & "%'"

        ElseIf IsDate(TextBox9.Text) Then

            Dim day As Date = TextBox9.Text

            TextBox9.Text = Format(day, "MM/yyyy")

            If DataSet1.Tables("Table1").Compute("count(Studentend)".ToLower, "Studentend like '%".ToLower & TextBox9.Text.Trim & "%' ").ToString > 0 Then

                BindingSource1.Filter = "Studentend like '%".ToLower & TextBox9.Text & "%'"

            End If

السلام عليكم اخى انا التعديل لى عندى هو خطا هنا (day, "MM/yyyy") المفروض تكون كده (dd, "MM/yyyy")

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

محمد اسماعيل

alims