منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] استعراض الداتا جريد فيو بين تاريخين - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] استعراض الداتا جريد فيو بين تاريخين (/showthread.php?tid=24534)



استعراض الداتا جريد فيو بين تاريخين - الو0 - 14-04-18

عند عمل هذا الاستعلام يعطي خطاء البيانات تعرض في داتاجريد فيو

كود :
Dim SQLstr As String = "SELECT id,num2,name1,date2,name2,fax,note1,name3,num3,num4,num5,num6,num7,num8,num9,num10,num11,num12,num13,num14,num15,num16,num17,num18,num19,num20 FROM [Table2]WHERE num19 BETWEEN ''" & Date.Now.Date & "'' AND ''" & Date.Now.Date.AddDays(30) & "''"
تاتي رساله خطاء في بناء التعبير

يوجد مرفق لنسخه توضيحيه عند تشغيلها اريد الذي بالون الاحمر تظهر فقط
شاكر ومقدر للجميع


RE: استعراض الداتا جريد فيو بين تاريخين - ملهمـ - 16-04-18

كود :
    Dim SQLstr As String = "SELECT id,num2,name1,date2,name2,fax,note1,name3,num3,num4,num5,num6,num7,num8,num9,num10,num11,num12,num13,num14,num15,num16,num17,num18,num19,num20 FROM [Table2] WHERE num19 BETWEEN '" & Date.Now.Date & "' AND '" & Date.Now.Date.AddDays(30) & "'"
جرب الكود الآن وأخبرني بالنتيجة


RE: استعراض الداتا جريد فيو بين تاريخين - الو0 - 16-04-18

ظهر بيان واحد فقط مع العلم يوجد اكثر من بيان بين التاريخين


RE: استعراض الداتا جريد فيو بين تاريخين - الو0 - 16-04-18

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

كود :
 Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
       For i As Integer = 0 To Me.DataGridView1.RowCount - 1
           If Me.DataGridView1(24, i).Value.ToString() > Date.Now.Date.AddDays(30) Then
               Me.DataGridView1.Rows(i).Visible = False

           End If
       Next
   End Sub