[الوادي]

يا محمد،

إن كنت تستخدم الربط فيمكنك من DataSet المضافة للفورم تعرف كل المعلومات اللي تريدها مثل

PHP كود :

For Each c As DataColumn In Me.Database1DataSet1.table1.Columns
    Dim colName As String = c.ColumnName
    Dim colType As Type = c.DataType

    MsgBox(colName & vbNewLine & _
            "(" & colType.Name & ")  (" & colType.ToString & ")")

Next 


إن كنت تستخدم الربط بالكود فيمكنك من نتيجة الاستعلام تعرف كل المعلومات التي تريدها مثل

PHP كود :

Dim cnn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=Database1.accdb;Persist Security Info=True")
Dim da As New OleDbDataAdapter("SELECT * FROM [table1]", cnn)
Dim dt As New DataTable
da.Fill(dt)

For Each c As DataColumn In dt.Columns
    Dim colName As String = c.ColumnName
    Dim colType As Type = c.DataType

    MsgBox(colName & vbNewLine & _
            "(" & colType.Name & ")  (" & colType.ToString & ")")

Next