منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - إضافة بيانات من متغير الى الداتا قريد

السلام عليكم ورحمة الله وبركاته

اخواني الاعزاء جزاكم الله الف خير

هذا كود اقوم من خلاله ارسال البيانات من اداة ListBos العمود الاول من اداة DataGridView

كود :

Me.DataGridView13.Rows.Clear()

        For Each it In ListBox1.Items

            Dim Ro As DataGridViewRow = DataGridView13.Rows(DataGridView13.Rows.Add())

            Ro.Cells(0).Value = it

        Next

المطلوب نفس الفكرة لكن من خلال ارسال البيانات من متغير يحمل بيانات الى العمود الاول من القريد

هذا كود جلب البيانات من قاعدة البيانات الى المتغير

كود :

Using MYDataAdapter As New OleDbDataAdapter("SELECT DISTINCT Tar FROM DB_Info ", 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

                    ListTar = a.ToArray

                    MsgBox(ListTar )

                End If

            Next

        End Using

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

aftfm

aftfm