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

ارجو المساعدة من  في تعديل المثال زر الحفظ وز البحث تم توضيح المثال في المرفق

شكر امير وجزاك الله الف خير

ارجو من الاخوة الزملاء سرعة الرد

كود وسؤال اخر---- في حال جمع الفليكس للعمود( اذا كان بنسبة مئوية% ).كيف يكون ذلك%   كما هو موضح في الصورة
ارجو التعديل في الكود او ايجاد حل لجمع الاعدد بالنسب المئوية10%+12%+30%...........وهكذا
Private Function sum(xcol)
Dim i As Integer
Dim sum1 As Double
sum1 = 0
For i = 1 To MSHFlexGrid1.Rows - 1
sum1 = sum1 + (IIf(MSHFlexGrid1.TextMatrix(i, xcol) = "", 0, MSHFlexGrid1.TextMatrix(i, xcol)))
Next
sum = sum1
End Function

هلا اخوتي الغاليين 
وكيف حالك اخي الغالي امير الزبيدي 
اعتذر على عدم تواصلي بسبب انشاغالي في هذه الايام 
ان شاء الله لنا لقاءات كثيرة في هذا المنتدى الجميل 
احبكم في الله