تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود خصم نسبة مئوية محدده من القيمة
#11
(21-05-20, 03:15 PM)سعود كتب :
PHP كود :
Dim a As Double Val(TextBox1.Text)
 
       Dim b As Double Val(TextBox2.Text)
 
       TextBox3.Text = (100) * 
اخواني الكرام اعتذر لكوني ضعيف في الرياضيات عموماSmile
لكن اظن المطلوب هو الكود بمشاركتي هذه.
قولو رايكم.

هذا وانت ضعيف في الرياضيات  Dodgy

بارك الله فيك يا رائع
بالضبط هذا هو المقصود 

تسلم ربي يحفظك
الرد }}}
تم الشكر بواسطة: سعود , alshandodi , alshandodi
#12
ياليت تشوف الكود
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
الرد }}}
تم الشكر بواسطة: ZaerAllail , alshandodi , alshandodi
#13
(21-05-20, 03:23 PM)سعود كتب :
ياليت تشوف الكود

من أول ما نزلت الكود جربته ولقيته منور بنور إبداعك ربي يحفظك  Wink
الرد }}}
تم الشكر بواسطة: سعود , alshandodi
#14
(21-05-20, 03:31 PM)ZaerAllail كتب :
(21-05-20, 03:23 PM)سعود كتب :
ياليت تشوف الكود

من أول ما نزلت الكود جربته ولقيته منور بنور إبداعك ربي يحفظك  Wink

انا قصدت الصورة لاني خفت انها لن تظهر  احيانا تصوير الكود اسرع من كتابتهSmile
PHP كود :
Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        Dim a 
As Double Val(TextBox1.Text)
 
       Dim b As Double Val(TextBox2.Text)
 
       TextBox3.Text = (100) * a
        TextBox4
.Text Val(TextBox3.Text)
 
   End Sub 
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
الرد }}}
تم الشكر بواسطة: alshandodi , ZaerAllail , tryold
#15
قمت بالتعديل على المثال واضافة بعض الأكواد اتمنى ان يكون ذو فائده والسموحه والعذر منك أخي العزيز


الملفات المرفقة
.zip   PercentageCalculation.zip (الحجم : 82.47 ك ب / التحميلات : 42)
الرد }}}
تم الشكر بواسطة: سعود , ZaerAllail , tryold
#16
(21-05-20, 03:40 PM)alshandodi كتب : قمت بالتعديل على المثال واضافة بعض الأكواد اتمنى ان يكون ذو فائده والسموحه والعذر منك أخي العزيز

جدا رائع أخي الكريم 
تفعيل الكود في الحدث الخاص بالتكست وتعطيل التكست 3 و 4 وتنسيق النموذج وتفعيل تنسيق الأرقام العشرية يدل على لمسة مبرمج مميز

فعلا مميز ما قمت به 
شكرا لك
الرد }}}
تم الشكر بواسطة: alshandodi , tryold
#17
بارك الله فيكم جميعا
الرد }}}
تم الشكر بواسطة: ZaerAllail , alshandodi
#18
كود :
Public Class Form1
   Private Sub BtnCalculator_Click(sender As Object, e As EventArgs) Handles BtnCalculator.Click
       Dim Prix As Single
       Prix = CSng(Val(TBoxPrix.Text / 100))
       Dim PerCent As Single
       PerCent = TBPercentageCalculation.Text
       LbNewPrix.Text = CSng(Math.Round(Val(TBoxPrix.Text) - (Prix * PerCent), 2))
   End Sub
End Class

الشفرة التالية تفي بالغرض   و عيد سعيد


الملفات المرفقة صورة/صور
   

.rar   PercentageCalculation.rar (الحجم : 82.2 ك ب / التحميلات : 29)
هَٰٓؤُلَآءِ قَوْمُنَا ٱتَّخَذُوا۟ مِن دُونِهِۦٓ ءَالِهَةً لَّوْلَا يَأْتُونَ عَلَيْهِم بِسُلْطَٰنٍۭ بَيِّنٍ فَمَنْ أَظْلَمُ مِمَّنِ ٱفْتَرَىٰ عَلَى ٱللَّهِ كَذِبًا
الرد }}}
تم الشكر بواسطة: kiki , kiki
#19
يبدو انني تاخرت كثيرا في الرد .................. المشكلة انك عندما تفتح السؤال ترى الصفحة الاولى فقط و بعد الاجابة يظهر انك تاخرت
هَٰٓؤُلَآءِ قَوْمُنَا ٱتَّخَذُوا۟ مِن دُونِهِۦٓ ءَالِهَةً لَّوْلَا يَأْتُونَ عَلَيْهِم بِسُلْطَٰنٍۭ بَيِّنٍ فَمَنْ أَظْلَمُ مِمَّنِ ٱفْتَرَىٰ عَلَى ٱللَّهِ كَذِبًا
الرد }}}
تم الشكر بواسطة: kiki , kiki


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اريد التعديل على كود اذا كان القيمة المدخلة مكررة بDataGridView يتم فقط زيادة العدد moh61 6 1,442 26-07-23, 10:41 AM
آخر رد: تركي الحلواني
  عرض فورم اذا كانت القيمة 0 h2551996 6 988 11-01-23, 09:14 PM
آخر رد: h2551996
  [VB.NET] تعديل على القيمة المختارة في ListBox محمد العامر 18 6,260 25-09-22, 10:35 AM
آخر رد: رضوان الجماعي
  [سؤال] تنفيذ الكود بعد مده زمنيه محدده حسن الجلب 5 1,873 22-08-22, 04:32 AM
آخر رد: سعود
  [سؤال] كيف اخلي المتغير يحمل القيمة " Shade0001 1 811 04-11-21, 02:45 AM
آخر رد: Anas Mahmoud
  اخواني كيف أقوم بتحديد واختيار ( selection ) الصفوف التي بناء على القيمة في textbox2 جيولوجي مبتدئ 3 1,669 11-08-20, 10:00 AM
آخر رد: جيولوجي مبتدئ
  [VB.NET] تحويل القيمة فارغة الي صفر في قاعدة البيانات sql Codack 2 2,537 16-06-20, 06:43 PM
آخر رد: kiki
  عدم السماح بادخال القيمة في قاعدة البيانات مع مطابقتها للجدول الاساسي Mohammed Nafa 3 1,749 02-05-20, 01:01 AM
آخر رد: ابراهيم ايبو
  كيف يمكن تغيير القيمة Albgaly99 1 1,329 01-03-20, 09:41 PM
آخر رد: ابو ليلى
  كيفية جعل القيمة null لحقل رقمي = 0 في الكريستال ريبورت bassant 2 2,146 29-01-20, 04:32 PM
آخر رد: alsalamoni

التنقل السريع :


يقوم بقرائة الموضوع: