interfaceلبرنامج + تقريب العدد بزياده واحداذا كان أكبر العدد العشري أكبر من النصف

بالنسبة للـ interface أتوقع افضل شيء لو تشوفين مشاريع جاهزة وتأخذين بعض الافكار منها ،،

بالنسبة للتقريب ممكن تستخدمين :

أو :

بالتوفيق في المشروع ،،

يعطيك العافيه

لكن أنا مبتدئة جدا بهذي اللغه ..

فكيف أسوي بهذي الفنكشن؟!

يعني الان عندي مخزنه القيمه

افرض انها مخزنه بمتغير أسمه num

وكانت قيمتها 12.3

الان أبغى أشيك على اللي بعد البوينت أذا كان أكبر أو يساي 0.5 أبغى أزيد واحد على num

بس

وبخصوص الواجهه الرسوميه .. سمعت عن skin لكن ماعرفت أصلحها

أنا فيجوال 2005

اذا كان اسم المتغير num مثلا ، وتبغين قيمته تكون قيمته بعد التقريب ،،

أو بالطريقة الثانية :

بالطريقة هذي المتغير num بيكون فيه القيمة بعد التقريب سواء تقريب للأكبر أو للأصغر ،،

ربي يوفقك ويسعدك أن شاء الله :wub:

وبخصوص الأنترفيس

حصلت موضوع عن الثيمات راائعه لكن أبغى أفضل

حابه يطلع مثل ثيم office 2007

مره حلووو

لكن اللي عندي حملته وضبط هو ثيم vista

خلاص ضبطت الأنترفيس بثيم الفيستا وطلعت الحمدلله مره حلوه

لكن ودي أحط شعار المؤسسه في الفورم

الأيكون أقصد

لكن الصوره اللي أبغى أحطها بدالها من نوع jpg

كيف أحوله الى ico

:blink:

بليز أبي مساعدتكمم

^

جربي الموقع هذا :

هنا ..

num=Math.Round(num,2,MidPointRounding.AwayFromZero)

ضبطت معاي مثل ما ابي يوم تركت بس أول براميتر والباقي شلتهم

لكن يقرب لي اذا كان فوق النصف

انا ابغى أكبر أو يساوي النصف

تهي تهي

فيه أحد يقدر يساعدني تكفون

الدالة هذي تقرب اذا كان آخر رقم بعد الفاصله 5 ، تقرب للكبير ، وهذا هو الصحيح ،،

بامكانك الدمج بين الدالتين :

Dim a As Double = Math.Round(num,2,MidPointRounding.AwayFromZero)

Msgbox(Format(a,"#.00"))