أريد معرفة قيمة الصف الذى أقف عليه الآن فى الجريد من حقل المفتاح الأساسى للجدول الموجود الأن

وهذا كمان لا يجدى

MsgBox(DT.Rows(Me.BindingContext(DT).Position)(ss.ToString()))

SS.ToString() مع العلم أن الدالة

عندما أعرضها فى رسالة ترجع بإسم حقل المفتاح الأساسى الذى اريده

وإذا إستخدمت الكود بهذا الشكل

MsgBox(DT.Rows(Me.BindingContext(DT).Position)("ID"))

يشتغل عادى بس انا عاوزها مفتوحه مش على الـــ الآى دى فقط

اخي الحبيب ضع الكود في الحدث cell_clickconetent ومن ثم بعد استعمل الوسيط e مع الخاصية الخاصة بالصف او العمود كالتالي

MsgBox(DT.Rows(e.rowindex).index)

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

أخى المشكله ليست فى الصف ................ المشكله فى الحقل

ممكن توضح سؤالك اخي الحبيب

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

- عاوز لما أقف على أى صف سواء هغير الـــ Position من الجريد أو من السجل السابق واللاحق

أعرض رساله فيها قيمه الخليه التى فى عمود الحقل الاساسى بشرط الــ Position الذى انا فيه الآن

قصدك يااخي انه يظهر لك اسم العمود اللي واقف عليه ام يظهر رقم العمود ام ماذا أرجوا التوضيح اكثر لأنه المؤشر إما يعرض بيانات العمود او بيانات الصف

إن كان قصدك قيمة الصف الواقف عليه فالجواب كالتالي

في نفس الحدث تكتب التالي

msgbox(DT(e.rowindex,e.colindex).value)

أما إن كان غير هذا فأرجوا التوضيح اكثر ولو بمثال حتى استطيع مساعدتك

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

اخى الحبيب جزاك الله خيرا على إهتمامك :

لمعرفة قيمة أى خليه لابد ان نحدد شيئين اساسيين هما رقم الصف ورقم الحقل أظن هكذا تمام الحقل الرابع الصف الاول = 5 ، الحقل الثانى الصف السابع = "محمد" .

هذه الجزئيه واضحة .

الذى اريده ان الحقل سوف لا يتغير فهو حقل المفتاح الأساسى دائما ،

ولمعرفة فى أى الصفوف التى انا فيهه الآن هذه أيضا خلاص تمت بحمد الله .

المشكله فى :

هناك داله ترجع بإسم حقل المفتاح الأساسى ولكن لا ترجع بقيمة String ولو كانت ترجع بقيمة String لما كان هناك ادنى مشكله ولكن هى ترجع بإسترنج بلدارس .

لذلك لا تقبل من هذا النوع حتى بعد ما احولهه إلى String ايضا لا تصلح للعامل معها .

ويظهر لى رساله يقول لى بها أن هذا الحقل Belong .

وإليك مثال :

 Public Function ss() As Object

Dim daa As New OleDbDataAdapter("Select * from " + CT.Text, Conn)

Dim dtt As New DataTable()

daa.FillSchema(dtt, SchemaType.Source)

Dim sp As New System.Text.StringBuilder()

For Each d As DataColumn In dtt.PrimaryKey

sp.AppendLine(d.ColumnName)

Next

Return sp

End Function

هذه الداله ترجع بإسم المفتاح الأساسى

 SQL = "Delete * From " & CT.Text & " Where " & Pri.Text & " = " & Convert.ToDouble((DT.Rows(Me.BindingContext(DT).Position)(Pri.Text)))

MsgBox(SQL)

Pri.text هذا إسم حقل المفتاح الاساسى الراجع من الداله السابقة .

لا يقبل أن يعتبره أصلا إسترنج ويظهره فى الرساله ، ويقول انه Belonge ماذا يعنى بـــ Belonge .

اخى الحبيب

الموضوع ببساطه طالما قمت بربط الجريد بالتابل بديهيا ان RowIndex

فى الجريد والتابل يكون واحدا

اى Row التى تحمل الاندكس رقم زيرو فى الجريد هى نفس الرو اللتى تجمل الاندكس زيرو فى التابل تمام كده

يبقى انا هنا عشان اجيب مثلا البريمرى كاى للتابل اللى انا هحذف على اساسه من الداتا بيز كل المظلوب منى انى اعرف الرو اللى انا واقف عليها فى الداتا جريد تمام كده

ودى بسيطه وانت عارفها وممكن تجيب منها الايدى اللى انت عاوزه وتحذف على اساسه

C#

dataGridView1.SelectedRows[0].Cells["YourCoulmnName Or Index"].Value.ToString();

Or 
dataGridView1.CurrentRow.Cells["YourCoulmnName Or

VB

dataGridView1.SelectedRows(0).Cells("YourCoulmnName Or Index").Value.ToString()
' OR
dataGridView1.CurrentRow.Cells("YourCoulmnName Or Index").Value.ToString()

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

مثل

C#

MyDataTable.Rows[dataGridView1.SelectedRows[0].Index]["YourCoulmnName Or Index"].ToString();

VB

Dim dt As New DataTable()
dt.Rows(dataGridView1.SelectedRows(0).Index)("YourCoulmnName Or Index").ToString()

تمام الله ينور

وماذا أفعل فى مشكلة Belong

وهى تظهر عندما أريد ان أضع فى مكان إسم الحقل (داله الرجوع بإسم المفتاح الأساسى)

فهذه الدالة لا ترجع بقيمة String ولكن ترجه بقيمة بيلدرس إسترنج ، لذلك لا يقبلها ، ويظهر لى رساله يقول فيها ان الحقل Belong

بسيطه اخ اسامه

الفكره بس ان فيه حاجه صغيره كده عدت عليك

على فكره الميثود(او الداله ) اللى انت عاملها بترجع اسم المفتاح الرئيسى فيها غلطين

اول غلطه انها بترجع اوجكت مش بترجع سترينج تانى غلطه ان الوبجكت ده سترينج بيلدر فطبيعى ان هيبقى فيه مشكله لان اللى بيرجعلك الوبجكت ده يعنى بيبقى سترينج بيلدر وكلمه بيولنج انت مش مكملها تقريبا هو بيقولك انه نوت بيلونج (Not Belong) يعنى انت التابل مفيهوش كولمن بالاسم ده اللى هوه اسم (StringBuilder

انت بس هتصلح حاجه بسيطه فيها هتخلى الميثود بالشكل ده

 Public Function ss() As String

 Dim daa As New OleDbDataAdapter("Select * from " + CT.Text, Conn)

 Dim dtt As New DataTable()

 daa.FillSchema(dtt, SchemaType.Source)

 Dim sp As New System.Text.StringBuilder()

 For Each d As DataColumn In dtt.PrimaryKey

 sp.AppendLine(d.ColumnName)

 Next

 Return sp.ToString()

 End Function

نفس المشكله