روتين يعمل لووب لكل صفوف الداتا جريد

For i=0 to GataGrid1.Rows.Count-1
TextBox1.Text += DataGrid1.Rows(i).Item(0).Text
Next

Scoool كتب:

For i=0 to GataGrid1.Rows.Count-1
TextBox1.Text += DataGrid1.Rows(i).Item(0).Text
Next

مرحبا أخى SCoool

لم يشتغل معى والله اعلم لماذا

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

بمعنى انا عندى طالب رقم 1 واسمه ودرجته انا عايز SubRoutine يقوم بعمل فلترة لكل الطلبة من خلال الجريدة ويقوم بحفظ كود الطالب ودرجته فى جدول اخر

انا بشتغل بفيجوال 2003

اقتباس

فلترة لكل الطلبة

يعني ايه فلتر لكل الطلبه والفلتر يكون على اساس ايه ؟

بالتوفيق ,,,

A7med_prof

A7med_prof كتب:

يعني ايه فلتر لكل الطلبه والفلتر يكون على اساس ايه ؟

بالتوفيق ,,,

A7med_prof

بمعنى انى كنت عايز افصل الطلبة الراسبين عن الناجحين ولكن بطريقة اوتوماتيك

مشكور يا اخى لقد تم الحل الحمد لله

تحياتى

طيب ممكن الحل عشان نفهم المسألة ..

وبالنسبة للكود انا اعطيتك مثال فقط ..

Scoool كتب:

طيب ممكن الحل عشان نفهم المسألة ..

وبالنسبة للكود انا اعطيتك مثال فقط ..

مرحبا

الفكرة كانت بسيطة جدا وكانت غايبة عن بالى المهم الفكرة تتلخص فى انى بجمع درجات الطلبة على مستوى السنة واعمل عمليات حسابية كل شهر اوتوماتيك بضغطة زر واحدة بحيث انى بجمع كل درجات الشهور مع بعض واقارن النتيجة اذا كان الطالب ناجح او لا والكلام ده هينشي على كل الطلبة وانا طبعا شغال ب master and details

فى 2 جريد وكنت عايز اخد كل صفوف الجريد الماستر الخاصة بكل الطلبة واكوادهم واجمع بيها البيانات بجملة استعلام من الجريد الاخرى انا عارف انهم يطلعو فى تقرير بكل سهولة او بجملة استعلام متغيرة المهم انا حبيت اجرب الطريقة ديه ونفعت معى فكان سؤالى انى كنت عايز اعرف كيفية عمل روتين يعمل لووب لكل صفوف الداتا جريد ومع كل صف موجود يحط اول قيمة فيه فى تيكست بوكس علشان اخد الكود ده واجمع بيه البيانات من الجريد الاخرى

وكان الحل عن طريق مثالك ولكنى اعتقد انه خاص ب 2005 لانه لم يعمل معى

 Dim NumberOfGridRows As Integer
'وفى الروتين الخاص بملء الجريد زودت الكود ده ليعود بعدد الصفوف فى الجريدة
NumberOfGridRows = DBGrid.BindingContext( _
			DBGrid.DataSource _
			, DBGrid.DataMember).Count.ToString()
'وفى نفس الروتين عملت الكود ده علشان اعرف القيمة التالية للصف التالي
		If DBGrid.CurrentRowIndex = NumberOfGridMasterRows - 1 Then  Exit Sub
		DBGrid.CurrentRowIndex = DBGrid.CurrentRowIndex + 1
'وهكذا

اتمنى اكون قدرت اوضح مشكلتى وحلها البسيط جدا

جزاك الله خير يا اخى وتمنياتى بالتوفيق لنا جميعا بإذن الله

تحياتى

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

ربنا يوفققك ,,,, الف مبروك انها اتحلت ,,,

بالتوفيق ,,,,

A7med_prof