+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : كيف اقوم بوضع بيانات حقل في العمود الاول من القريد (/showthread.php?tid=2826)
كيف اقوم بوضع بيانات حقل في العمود الاول من القريد - aftfm - 10-05-14
السلام عليكم ورحمة الله و بركاته
هذا اجراء لارسال بيانات حقل بدون تكرار الى اداة ListBox
المطلوب تعديل الكود لارسال بيانات الحقل الى العمود الاول في الداتا قريد
كود :
Using MYDataAdapter As New OleDbDataAdapter("Select DISTINCT Tar FROM tbl1", Con)
Call DataSet2.Clear()
Me.ListBox1.Items.Clear()
'==========
Call MYDataAdapter.Fill(DataSet2, "TarTable")
For Each MYRow As DataRow In DataSet2.Tables("TarTable").Rows
Dim a As String = MYRow.Item("Tar")
If String.IsNullOrEmpty(a) = Nothing Then
ListBox1.Items.Add(a)
End If
Next
End UsingRE: كيف اقوم بوضع بيانات حقل في العمود الاول من القريد - aftfm - 10-05-14
تم الحل
كود :
Using MYDataAdapter As New OleDbDataAdapter("SELECT DISTINCT Tar FROM tbl1", Con)
Call MYDataAdapter.Fill(DataSet2, "TarTable")
For Each MYRow As DataRow In DataSet2.Tables("TarTable").Rows
Dim a As String = MYRow.Item("Tar")
If String.IsNullOrEmpty(a) = Nothing Then
MYDataAdapter.Fill(DataSet2)
DataGridView1.DataSource = DataSet2.Tables(0).DefaultView
End If
Next
End UsingRE: كيف اقوم بوضع بيانات حقل في العمود الاول من القريد - vbnet - 10-05-14
-
استخدم DataTable طالما أنك تتعامل مع جدول واحد.
كود :
Using da As New OleDbDataAdapter("SELECT DISTINCT [Tar] FROM [tbl1] WHERE ([Tar] IS NOT NULL) AND (TRIM([Tar]) <> '') ", Con)
Dim dt As New DataTable
da.Fill(dt)
DataGridView1.DataSource = dt
End UsingRE: كيف اقوم بوضع بيانات حقل في العمود الاول من القريد - aftfm - 11-05-14
الله ينور عليك ويزيدك علماً
ما هو الفرق بين DataSet , DataTable
RE: كيف اقوم بوضع بيانات حقل في العمود الاول من القريد - حريف برمجة - 11-05-14
(11-05-14, 11:11 AM)aftfm كتب : الله ينور عليك ويزيدك علماً
ما هو الفرق بين DataSet , DataTable
DataTable = وضع فيه جدول واحد فقط .
DataSet = امكانية وضع فيها اكثر من جدول .
ولأختيار جدول من ضمن الجداول الموجوده في DataSet كالتالي :
كود :
DataSet.Tabel(0) صفر يعني أول جدول قمت بتعبئته في الداتا سيت
DataSet.Tabel(1) واحد يعني ثاني جدول قمت بتعبئته في الداتا سيت
DataSet.Tabel(2) أثنين يعني ثالث جدول قمت بتعبئته في الداتا سيتكود :
DataSet.Tabel("Tab1")RE: كيف اقوم بوضع بيانات حقل في العمود الاول من القريد - aftfm - 11-05-14
الف شكر اخي العزيز
لم اقصد هذا ولكن
Dim ds as new DataSet
&
Dim dt as new DataTable