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

السلام عليكم ورحمة الله وبركاتة
اخواني الافاضل

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

1
2
50
98546

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

وشكرا لكم

لو القيم من جدول بالقاعدة فالافضل استخدام 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

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

انا اريد معرفة الـ 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(SQLstr, conn)
       dataadapter1.Fill(DataSet1, "t_modares")
           TextBox1.Text = cm.ExecuteScalar 

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

PHP كود :

'cm' is not declared. It may be inaccessible due to its protection level. 

كود :

dim cm as new OleDb.OleDbCommand(sqlstr,con)

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

Mido9

سعود

Mido9

سعود