[تنبيه - عنوان غير مناسب]الرجاء المساعدة !

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

انا لدي مشروع وودي اعمل فورم يظهر البيانات من اكثر من جدول بس حاولت بس ما ظبت الكود معي الرجاء مساعدتي في كتابة الكود

  Dim conn As New OleDb.OleDbConnection("provider=microsoft.jet.oledb.4.0 ; data source=|datadirectory|\db2.mdb") 
        Dim ds As New DataSet 
        Dim da As New OleDb.OleDbDataAdapter("select appointment.c_name,appointment.id_appointment,doctor.firstname,doctor.Detection_rate from appointment,doctor where doctor.id_doctor = appointment.id_appointmentby order by appointment.id_appointmentby", conn) 
        conn.Open() 
        da.Fill(ds, "appointment") 
        conn.Close() 
        TextBox1.Text = ds.Tables("appointment").Rows(0).Item(0) 
        TextBox2.Text = ds.Tables("appointment").Rows(0).Item(2) 
        TextBox3.Text = ds.Tables("doctor").Rows(0).Item(1) 
        TextBox4.Text = ds.Tables("doctor").Rows(0).Item(8)