boussida fethi كتب :اريد من الاعضاء الكرام مثال بسيط حول كيفيّة اجراء جمع حقل في داتا قريد مرتبطة بقاعدة بيانات اكسيس في بيئة vb6
Dim i As Integer Dim Wolf As Double db.Col = 1 'رقم العمود المراد جمعه في الداتا بيز For i = 0 To DataGrid1.ApproxCount - 1 wolf= wolf+ DataGrid1.Columns(1).CellValue(DataGrid1.GetBookmark(i)) Next Label1.Caption = wolf