[ibrahimmakhool]

(03-12-19, 01:33 AM)علي بنيان كتب : السلام عليكم

هذا كود للبحث عن تنسيق تاريخ قم بتغيره كما يناسب برنامجك

PHP كود :

If IsNumeric(TextBox5.Text) = False Then
            'اذا كان المدخل في مريع البحث تاريخ  
            If IsDate(TextBox5.Text) Then
                TextBox5.Text = CDate(TextBox5.Text).ToString("dd/MM/yyyy")
            End If
            Dim DataAdapter As New OleDbDataAdapter("SELECT * FROM Tab WHERE name LIKE '%" & Trim$(TextBox5.Text) & "%' or datee LIKE '" & Trim$(TextBox5.Text) & "'", con)
            con.Open()
            DataSet3.Clear()
            DataAdapter.Fill(DataSet3, "Tab")
            con.Close()
            If Me.BindingContext(DataSet3, "Tab").Count > 0 Then
                DataSet1.Clear()
                DataAdapter.Fill(DataSet1, "Tab")
                      Exit Sub
            End If
        End If 


اذا واجهت صعوبة بشيء لا تتردد في السؤال 

للامانة هذا الكود موجود في احد برامج الاخ ramilove

قمت بعمل جميع الخطوات ولكن دون جدوى .... قمت بارفاق المشروع كامل اذا امكن حل المشكلة المطلوب هو في نموذج Tahwelat