14-02-23, 04:44 PM
14-02-23, 07:07 PM
وعليكم السلام ورحمة الله وبركاته
قم بإرفاق مثال - ليتم التطبيق عليه.
قم بإرفاق مثال - ليتم التطبيق عليه.
14-02-23, 07:41 PM
(14-02-23, 07:07 PM)Taha Okla كتب : [ -> ]وعليكم السلام ورحمة الله وبركاته
قم بإرفاق مثال - ليتم التطبيق عليه.
حسنا في الحين
14-02-23, 09:11 PM
كود :
Dim xCount 'As Integer 'As Long 'As Double
xCount = 0
For i = 3 To MSFlexGrid1.Cols - 1
xCount = Val(xCount) + Val(MSFlexGrid1.TextMatrix(1, i))
Next i
Text2.Text = xCount