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

ايوة كذا ممتاز خطوة خطوة
هذا لاني مباشرة كتبت الاشتقاق من دون ان اخبرك ان هناك خياران:
الاول مثل ماكتبته لك وحل الخط الازرق المتعرج ان تستدعي فضاء الاسماء imports system data oledb
الاخر ان تكتب بالطريقة التالي:

لكي تفرق بينهم ساكتب كلا الطريقتين

مكان استدعاء فضاءات الاسماء اعلى اطار محرر الشيفرة يعني قبل كل شيء حتى قبل الكلاس نفسه.

استاذ سعود عملت زى ما انت قلت بس برضه فى خطوط زرقة انا طبعا عرفت انه فى فرق بين
(dim con as new oledb.oledbconnection(str


dim con as new oledbconnection(str)

الفرق النقطة ودى اشتغلت معاية Dim Conn As New OleDbConnection(ConStr)
وبص على الكود اللى كتبته وقلى ايه اللى فيه غلط

Imports System.Data
Imports System.Data.OleDb
Public Class Form1
Dim ConStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source =" & Application.StartupPath & "\بيانات_قطع_الأراضى_اخير.mdb.mdb"
Dim Conn As New OleDbConnection(ConStr)
Dim DataSet1 As New DataSet
Dim SQLstr As String = "SELECT * FROM بياتات_العملاء"

Private Sub GroupBox4_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GroupBox4.Enter
Conn.Open()
Dim DataAdapter1 As New OleDbDataAdapter(SQLstr, Conn)
DataAdapter1.Fill(DataSet1, "Table1")
Conn.Close()
TextBox1.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.ID_Amlaa")
TextBox2.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.neme")
TextBox3.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.National ID")
TextBox4.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.Name of the wife / husband")
TextBox5.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.Number of Children")
TextBox6.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.Phone number")
TextBox7.DataBindings.Add("Text", DataSet1, "بياتات_العملاء.Address")
End Sub
End Class

هو عطينى الخط الأزرق تحت كل تكست زي ما انا موضح

اخ علي الله يرضى عليك اكتب الكود بعد ان تغير المحاذاة الى اليسار ثم تضمن الكود ضمن احدى الوسوم لكي يظهر الكود ضمن تنسيق الكود وتظهر بالجهة اليسرى لانها انجليزي.
لان كذا الامر مزعج واسف اخوي

استاذ سعود انا كاتبه الكود الى اليسار بس هو لما نسخته ولصقته على الموقع فى الرد على الموضع بيجى كده بالعكس

اخي الكريم قد ابدو متعصبا ضد اللغة العربية لكن ليس الامر كذلك .. لا احب كتابة اسماء الاعمدة باللغة العربية استخدم حروف لاتينية ولو بنطق عربي بالذات لاسماء الاعمدة ايضا استبدل الفراغ بحرف التسطير السفلي _ افضل.
الطلب الاخير ان تقوم بانشاء مشروع جديد(بسيط) بمحاولاتك للربط وتقوم برفعه لكي تعرف الامور الغامضة.
وفقك الله لكل مافيه رضاه.

حاضر انا اسف لأزعاجك انا هعمل مشروع جديد وابعته لحضرتك

ابد مافيه اي ازعاج.

imports System.Data.OleDb