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

انا الان لدي اداة كومبو بوكس وبها بعض القيم التاليه


1
2
50
98546


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

وشكرا لكم
الرد }}}}
تم الشكر بواسطة:
#2
لو القيم من جدول بالقاعدة فالافضل استخدام sum لانها اضمن
كود :
select sum(col) from tb
وتسندها لـ oledbcommand وتقراها هكذا
كود :
textbox1.text= cm.executescalar

وممكن كذا
كود :
Dim i As Integer
        For a = 0 To ListBox1.Items.Count - 1
            i += ListBox1.Items.Item(a)
        Next
        TextBox1.Text = i
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة: C.s
#3
جزاك الله خيرا اخي الفاضل على الرد
بالفعل القيم من جدول من قاعدة البيانات

انا اريد معرفة الـ cm معناها ايه علشان استبدلها بالقيم الى عندي

لاني وضعت الكود هكذا


   
PHP كود :
 Dim saveinto As New OleDb.OleDbCommand
       Dim constr 
As String "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" Application.StartupPath "\db.mdb"
 
      Dim conn As New OleDb.OleDbConnection(constr)
 
      Dim DataSet1 As New DataSet
       Dim SQLstr 
As String
       SQLstr 
"SELECT SUM(t_modares_safy) From t_modares "
 
      conn.Open()
 
      Dim dataadapter1 As New OleDb.OleDbDataAdapter(SQLstrconn)
 
      dataadapter1.Fill(DataSet1"t_modares")
 
          TextBox1.Text cm.ExecuteScalar 


وظهر لي الخطأ التالي


PHP كود :
'cm' is not declaredIt may be inaccessible due to its protection level
الرد }}}}
تم الشكر بواسطة:
#4
كود :
dim cm as new OleDb.OleDbCommand(sqlstr,con)
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ازاى اما اكتب داتا فى التكست بوكس يدور عليها فى اى سطر ويزود على cell تانية 1 araxis 4 74 منذ 2 ساعة مضت
آخر رد: araxis
  [سؤال] تغير لون كتابة التيكست بوكس ؟ Mido9 5 2,350 30-11-16, 10:16 PM
آخر رد: omferas
  طلب كود لحذف جميع البيانات من الجدول haiderkh 4 112 21-11-16, 07:11 PM
آخر رد: haiderkh
  كيف اقوم بتعبئت كمبو بوكس من جدول في اسكيول سيرفر معتز الجازوي 2 63 19-11-16, 03:10 AM
آخر رد: معتز الجازوي
  مسار قاعدة البيانات في التكست بوكس hglogtd 2 70 19-11-16, 02:19 AM
آخر رد: hglogtd
  الحذف من قاعدة البيانات بدلات تشيك بوكس في داتا جريدفيو makky 1 69 17-11-16, 10:50 PM
آخر رد: السرور
  كيف اربط ثلاثة كومبو بوكس abanoub saeed nabil 6 171 13-11-16, 11:23 PM
آخر رد: هاوي1995
  نقل قيمة من تكست بوكس الي تكست بوكس فى نموذج اخر السيد الجوهري 4 104 05-11-16, 07:39 PM
آخر رد: shwehdi4pc
Big Grin [VB.NET] الكنترولز في التول بوكس مش متفعلة Asmaa adel 0 42 30-10-16, 09:47 AM
آخر رد: Asmaa adel
  طريقة تغيير الباك كلر للتكست بوكس thevirus 8 210 29-10-16, 05:57 PM
آخر رد: thevirus

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


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