|
![]() |
|
أدوات الموضوع | انواع عرض الموضوع |
![]() |
#1 | |||||||||
Creator
![]() ![]() ![]()
شكراً: 0
تم شكره 0 مرة في 0 مشاركة
|
![]()
كود: Private Sub Command1_Click() Dim a, b, c, d As Integer a1.Text = a b1.Text = b c1.Text = c d = (b * b) - (4 * a * c) If d = 0 Then r1.Text = r2.Text = (-b) / (2 * a) End If If d < 0 Then r1.Text = "Pas De SoluTion --' " End If If d > 0 Then r1.Text = -b + (Sqr(d)) / (2 * a) r2.Text = -b - (Sqr(d)) / (2 * a) End If End Sub Private Sub Command2_Click() a1.Text = "" b1.Text = "" c1.Text = "" r1.Text = "" r2.Text = "" End Sub r2.Text = "" و هاهي صورة للخطئ ![]() أرجوكم لو يوجد أحد عنده Projet Vb كامل لهده العملية يرسله لي بارك الله فيكم المصدر: development-point - للمزيد تابع : الأرشيف Hv[,;l Yo,hk gr] ,[]j la;gm td ulg i]h hgfvkhl[ hHv[,;l lshu]m fsd'm
|
|||||||||
![]() |
مواقع النشر (المفضلة) |
الكلمات الدلالية (Tags) |
أرجوكم, إخوان, لقد, وجدت, مشكلة, في, عمل, هدا, البرنامج, اأرجوكم, مساعدة, بسيطة |
![]() |
|
الذين يشاهدون محتوى الموضوع الآن : 1 ( الأعضاء 0 والزوار 1) | |
|
|
![]() |
||||
الموضوع | كاتب الموضوع | المنتدى | مشاركات | آخر مشاركة |
[ مشكله ] ممكن مساعدة .... عند مشكلة في فتح البورت | picsooo | مشاكل وحلول إختراق الأجهزة | 3 | 01-24-2013 07:40 PM |
[ مشكلة ] مساعدة هل أنا مخترق | windows 8 | الأرشيف | 0 | 11-11-2012 04:12 PM |
مشكلة في الدولفي بسيطة ارجوا الحل | windows 8 | الأرشيف | 0 | 11-06-2012 02:10 PM |
مشكلة بسيطة في اتشفير | windows 8 | الأرشيف | 0 | 11-03-2012 03:40 AM |
مشكلة بسيطة بتعديل سباي نت | aaqassam | الأرشيف | 0 | 10-30-2012 11:16 PM |