[علي بنيان]

السلام عليكم

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

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