تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب كود
#1
سلام عليكم 
محتاج كود 
اولا : اظهار مجموع العمود داتا جريد فيو   في  نهاية العمود 

ثانيا : ترقيم تلقائي للتيكست بوكس يظهر بدون كتابة الرقم
الرد
تم الشكر بواسطة:
#2
ما هي قاعدة البيانات التي تعتمدها؟
إسرائيل إلى زوال ... وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة:
#3
الكود التالي يمكنك من حساب مجموع قيم حقل ويضع المجموع في تيكست بوكس قد يفيدك .
كود :
Dim cmd As New OleDbCommand("Select SUM(اسم الحقل العددي) From اسم الجدول", con)
       Dim dt As New DataTable

       con.Open()
       TextBox1.Text = cmd.ExecuteScalar
       con.Close()
الرد
تم الشكر بواسطة:
#4
إطلع على هذه المشاركة سوف تفي بالغرض
http://vb4arb.com/vb/thread-15565.html
بالتوفيق
إسرائيل إلى زوال ... وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة:
#5
(13-09-16, 01:57 AM)أبو ناصر كتب : الكود التالي يمكنك من حساب مجموع قيم حقل ويضع المجموع في تيكست بوكس قد يفيدك .
كود :
Dim cmd As New OleDbCommand("Select SUM(اسم الحقل العددي) From اسم الجدول", con)
       Dim dt As New DataTable

       con.Open()
       TextBox1.Text = cmd.ExecuteScalar
       con.Close()

هذا كود مستخدمه 
اني اريده يظهر
نهاية العمود اي
نهاية العمود في 
داتا جريدفيو 
وليس في تيكست
بوكس
وقاعدة البيانات
هي اكسس

(13-09-16, 01:59 AM)khodor1985 كتب : إطلع على هذه المشاركة سوف تفي بالغرض
http://vb4arb.com/vb/thread-15565.html
بالتوفيق

هو هذا الي اريده 
بس ياريت تكتبلي 
الكود لان المثال 
نزلته بس مجاي 
يظهر الكود به مشكله
الرد
تم الشكر بواسطة:
#6
أخي العزيز الكود مجرب وليس فيه مشكلة، ولكن لو سمحت هل يمكن أن ترسل لنا رسالة الخطأ؟
إسرائيل إلى زوال ... وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة:
#7
(13-09-16, 09:11 PM)khodor1985 كتب : أخي العزيز الكود مجرب وليس فيه مشكلة، ولكن لو سمحت هل يمكن أن ترسل لنا رسالة الخطأ؟

اخي الغالي 
المثال من انزله 
وافتحه ميظهر الكود
ارجو تنزلي الكود 
هنا
الرد
تم الشكر بواسطة:
#8
السلام عليكم و رحمة الله و بركاته 
الكود التالي سهل و بسيط و أظن أنه حسب طلبك بحيث يجمع قيم العمود وفي نهاية العمود 


كود :
Dim sum As Double
       For i = 0 To DataGridView1.Rows.Count - 2
           sum = sum + DataGridView1(index, i).Value
       Next

DataGridView1(index, DataGridView1.Rows.Count - 1).Value = sum

حيث index  هو قيمة انديكس العمود المراد حساب مجموع قيمه و المثال المرفق يوضح ذلك :


الملفات المرفقة
.rar   Collection of column values.rar (الحجم : 82.88 ك ب / التحميلات : 28)
الرد
تم الشكر بواسطة:


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم