منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
سؤال فى قواعد البيانات - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : سؤال فى قواعد البيانات (/showthread.php?tid=27345)



سؤال فى قواعد البيانات - احمد خطاب - 08-11-18

عند تحميل قاعدة البيانات فى اللابل او التيكست او الكمبوبوكس كما فى الكود التالى 
Imports System.Data.OleDb
Public Class Form1
   
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source= D:\lessons\lessons\bin\Debug\ss.accdb")
        Dim da As New OleDbDataAdapter
        Dim ds As New DataSet
        'load all colummns of 'table in access 2007
        da = New OleDbDataAdapter("select*from table1", con)
        da.Fill(ds, "table1")
        DataGridView1.DataSource = ds.Tables("table1")
        Label1.DataBindings.Add("text", table1, "user_forname")
        TextBox1.DataBindings.Add("text", table1, "user_forname")
        ComboBox1.DataBindings.Add("text", table1, "user_forname")

    End Sub
تظهر هذه الرسالة 
The method or operation is not implemented.
Private Function table1() As DataTable
        Throw New NotImplementedException
    End Function
مالخطأ فى الكود وماهو الحل 
اشكركم