...... اللي اعرفه ان شبيكة البيانات اذا صممناها واضفنا لها اعمدة لا نربطها بخاصية DataSource وانما نسند لها قيم من المصدر الوسيط وهو اما DataSet او DataTable .
PHP كود :
Public Class Form1
Dim dbpath As String = IO.Path.GetDirectoryName(Application.ExecutablePath) & "\db.accdb"
Dim str As String = "provider=microsoft.ace.oledb.12.0;data source=" & dbpath
Dim dt As New DataTable
Dim con As OleDb.OleDbConnection
Dim da As OleDb.OleDbDataAdapter
Private Sub gd()
dt.Clear()
d1.DataSource = Nothing
d1.Rows.Clear()
con = New OleDb.OleDbConnection(str)
da = New OleDb.OleDbDataAdapter("select * from tb", con)
da.Fill(dt)
d1.DataSource = dt
''اما الاخرى لن نربطها عبر الخاصية
' DataSource
d2.Rows.Clear()
For Each row As DataRow In dt.Rows
d2.Rows.Add(row(0), row(1))
Next
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
gd()
End Sub
End Class
![[صورة مرفقة: d1d2.png]](https://i.postimg.cc/wTCQvQ52/d1d2.png)
![[صورة مرفقة: dddd.png]](https://i.postimg.cc/6qGGJFPX/dddd.png)
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير


![[صورة مرفقة: aburawdah.gif]](https://i.postimg.cc/4N3yn7B8/aburawdah.gif)