منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] حساب المساحه المستخدمه وتمثيلها - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] حساب المساحه المستخدمه وتمثيلها (/showthread.php?tid=12263)

حساب المساحه المستخدمه وتمثيلها - mera - 11-05-15

يعطيكم العافيه جميعا 
انا حاولت اسوي برنامج بأنه يحسب المساحه المستخدمه ويمثلها ..
لكن واجهتني مشكله انه مو قادره احط اكبر من 71 والسبب انه بحكيلي 
compile error
procedure too large

ومو عارفه اكملها ل 100 بسبب هاد الشي .. 

مثال توضيحي : اذا فتحتوا البرنامج من المرفقات وحطيتوا في خانه ال BW قيمه 70 رح تتمثل امامكم ، 
لكن اي شي اكبر من 70 ما رح يتمثل !!!!!!! واذا حاولت ازود كومند بطلعلي انه too large


[attachment=7043]

RE: حساب المساحه المستخدمه وتمثيلها - Ahmed_Mansoor - 12-05-15

أهلا , كم أعلى قيمة ممكن تكون في الـ BW ونفس الشي مع الـ utilization وشو معنى هدول الكلمتين , وهل إنتي بتحاولي تطلعي نسبه مئوية في هاد السطر :
كود :
used = Val(BW.Text) * Val(uti.Text) / 100


RE: حساب المساحه المستخدمه وتمثيلها - mera - 12-05-15

اعلى قيمه ب BW ممكن تكون 1550 ميجا
utilization اعلى شي 100%

bw= bandwidth وتعني ال capacity او المساحه الكليه
السطر هاد فعلا بحاول اطلع النسبه المئويه ...
مثال : اذا عندكي قيمه ال BW=155M
وال utilization =80%
فالمستخدم من المساحه الكليه left رح يكون 124ميجا
والنسبه المئويه المتبقيه حتكون 31%

RE: حساب المساحه المستخدمه وتمثيلها - Ahmed_Mansoor - 13-05-15

أهلا , هذا أعتقد التعديل المناسب للمثال .

RE: حساب المساحه المستخدمه وتمثيلها - mera - 13-05-15

شكرا جزيلا وبارك الله فيك Smile