الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

حساب متوسط عمودين داخل ال DataGrid

مغلق
بدأه cdcase في 28 يونيو 2006 · 2 رد · 550 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

مرحباااااا

عندى بيانات فى الداتا جريد فى عمودين الاول أسمه (Price) والتانى أسمه (quantity)

كنت عاوز انفذ الجملة ديه أو ما بشكل او بأخر من داخل أو خارج الداتا جريد

Sum(Price*Quantity )/SumQuantity  as AVRPrice From MyTable

والناتج النهائى للجملة السابقة ينزل فى أخر صف فى الجريد فى اى خانة

لكن مش عارف

أتمنى المساعدة :)

تحياتى

قال رسول الله صلى الله عليه وسلم

يكبر بن أدام ويكبر معه شيئان كثرة المال وطول العمر

صدق رسول الله صلى الله عليه وسلم

قال عمر بن الخطاب رضي الله عنه

نحن قوم أعزنا الله بالإسلام فإذا إبتغينا العزة فى غيره أذلنا الله

#2

السلام عليكم

بعد كتابة جملة الاستعلام التي ذكرتها انت في السؤال, ستكون أما في في Command Object أو StoredProcedure أو بأي طريقة أخرى.

بعد ذلك قم بإضافة عامود في الجدول الذي سيكون مصدر للـ DataGrid وليكن مكانه مثلاً تحت الـ sub New بهذا الشكل

'Creating Data Columns 
		Dim AveragePrice As DataColumn = _
		myTable.Columns.Add("AVRPrice", GetType(Integer))

كما تلاحظ نجعل اسم العامود مطابق للأسم الذي كتبنها في جملة الاستعلام. AVRPrice

بالتوفيق إن شاء الله.

في المثال يتضح المقال

#3

مرحبااااا

مشكور أخى الغملاسي

ماذا عن هذا الكود

   OpenConn()
		 Dim OSql As String = "Sum(Price*Quantity)/Sum(Quantity) as AVRPrice from  Query"
		Dim ODa As New OleDbDataAdapter(OSql, MyConn)
		Dim ODs As New DataSet
		ODa.Fill(ODs, "Query")
		Dim cm As OleDbCommandBuilder
		cm = New OleDbCommandBuilder(ODa)
		DataGrid1.SetDataBinding(ODs, "Query")

اعتقد إنى مخطىء على أساس إنى أريد وضع الناتج فى جريد جديد هل لى بحل منك

تحياتى...

قال رسول الله صلى الله عليه وسلم

يكبر بن أدام ويكبر معه شيئان كثرة المال وطول العمر

صدق رسول الله صلى الله عليه وسلم

قال عمر بن الخطاب رضي الله عنه

نحن قوم أعزنا الله بالإسلام فإذا إبتغينا العزة فى غيره أذلنا الله

هذا الموضوع مغلق.

مواضيع مشابهة