تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة عند عرض البيانات داخل داتا قرايد فيو
#1
Photo 
استعملت هذا الكود لعرض البيانات وكانت النتيجة غريبة جدا  
 Dim sql As String = " Select (storedetail.num) as x1 ,(storedetail.datea) as x2,(storedetail.q3) as x3  ,(storedetail.q4) as x4 ,(storedetail.price) as x5,mowared,(acounts.acounname) as x6,(storedetail.type)as x7 ,(storedetail.mostand)as x8   From storedetail INNER JOIN acounts ON storedetail.mowared=acounts.acountnum  where storedetail.active =1 and storedetail.itemnum ='" & TextBox1.Text & "' order by storedetail.num ,storedetail.datea"
      

        Dim sqlcommand As New SqlCommand(sql, Con)
        Dim sqladapter = New SqlDataAdapter(sqlcommand)
        Dim dt As New DataTable
        dt.Clear()
        sqladapter.Fill(dt)
        If dt.Rows.Count > 0 Then
            DataGridView1.Rows.Clear()
            For i = 0 To dt.Rows.Count - 1
                DataGridView1.Rows.Add()
                DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(0).Value = dt.Rows(i).Item("x1")
                DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(1).Value = dt.Rows(i).Item("x2")
                DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(2).Value = dt.Rows(i).Item("x3")
                DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(3).Value = dt.Rows(i).Item("x4")
                '     DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(4).Value = dt.Rows(i).Item("x6")
                DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(5).Value = dt.Rows(i).Item("x5")
                ' DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(6).Value = dt.Rows(i).Item("x9")
                DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(7).Value = dt.Rows(i).Item("x6")

                DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(8).Value = dt.Rows(i).Item("x7")
                DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(9).Value = dt.Rows(i).Item("x8")

            Next
        Else
            MessageBox.Show("nothing")
            DataGridView1.Rows.Clear()

        End If
وكانت النتيجة عند التنفيذ كما يلي

 فقط يتم تعبئة السطر الاخير من الاداة والباقي فاضى
الرد
تم الشكر بواسطة:
#2
احذف cunt -1   وضيف مكانها 
متغير حلقة التكرار  i
صلى الله على نبينا محمد
اخيكم / محمود صالح
  قال الزهري رحمه الله  
 مــا عُـــبـِد الله بشئ أفضل من العلم 
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  جعل داتا جريد فيو لا يسمح بتعديل قيمة بشرط stiger 5 47 منذ 16 دقيقة مضت
آخر رد: stiger
  [VB.NET] كود نقل سجلات مححدة في داتا جريد الى ملف اكسل بنت الشام 3 60 01-06-20, 05:56 PM
آخر رد: سعود
  [سؤال] مشكلة , برنامج عند فتحه يقفل وكان يعمل قبل كدا aqarfinder 2 59 29-05-20, 12:56 AM
آخر رد: ابراهيم ايبو
  مساعدة في خل مشكلة فيجوال بيسك mennad sofiane 4 84 28-05-20, 03:10 AM
آخر رد: mennad sofiane
  تنفيذ استعلام حذف البيانات في جدول قاعدة بيانات سيكوال سيرفر باستخدام الكود في فجوال momani33 4 99 28-05-20, 12:46 AM
آخر رد: اسامه الهرماوي
  مشكلة في الترقيم التلقائي في قاعدة بيانات سيكوال سيرفر momani33 3 78 27-05-20, 11:49 PM
آخر رد: momani33
  [سؤال] تصدير البيانات منه 1 39 27-05-20, 10:46 PM
آخر رد: منه
  [VB.NET] اريد اضافة امر الغاء الامر او العملية اي عملية داخل الفروم بشكل كامل Ahmed TEAM YEMEN 8 229 25-05-20, 08:51 PM
آخر رد: Ahmed TEAM YEMEN
  مشكلة معقدة بعرض البيانات بالدتاجريد على ما فكرت فيها لم اجد لها حل ابو محمد محمد محمد 10 290 24-05-20, 12:16 PM
آخر رد: ابو محمد محمد محمد
  مشكلة رسالة overflow لمابعمل حفظ mazentq 3 70 24-05-20, 08:46 AM
آخر رد: mazentq

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم