تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة فى عمل برنامج بسيط
#1
السلام عليكم

أرجو من أخوانى المساعدة فى عمل برنامج بسيط فكرته بسيطه جدا لكن ستقوم بتسهيل عملى

الفكره هيا ساقوم بعمل زر command و text سوف اضع رقم مكون من 11 رقم
المطلوب :
1 - عند انتهاء الرقم ب 0 أو 1 يزيد 18 رقم
مثال : اذا بدأ 10110354130 يصبح 10110354148

2 - عند انتهاء الرقم ب 2 الى رقم 9 يزيد 8 ارقام

3 - عند انتهاء الرقم ب 40 أو 41 أو 42 يزيد 17 رقم

4 - عند انتهاء الرقم ب 45 أو 46 أو 47 أو 48 أو 49 يزيد 7 وباقى الارقام كما هيا الا هذه الارقام .

أرجو المساعدة
الرد
تم الشكر بواسطة:
#2
السلام عليكم

استخدم الكود التالي

يعطيك العافية

PHP كود :
Private Sub Command1_Click()
Text2 ""
If Len(Text1.Text) < 11 Then MsgBox ("ÇáÑÌÇÁ ÇÏÎÇá ÑÞã ÕÍíÍ"): Text1.SetFocus: Exit Sub
Select 
Case Val(Mid$(Text1.Text102))
Case 
404142
    Text2
.Text Trim(Str(Val(Text1.Text) + 17))
 
   Exit Sub
Case 4546474849
    Text2
.Text Trim(Str(Val(Text1.Text) + 7))
 
   Exit Sub
End Select
Select 
Case Val(Mid$(Text1.Text111))
Case 
01
    Text2
.Text Trim(Str(Val(Text1.Text) + 18))
 
   Exit Sub
Case 23456789
    Text2
.Text Trim(Str(Val(Text1.Text) + 8))
 
   Exit Sub
End Select
Text2
.Text Text1.Text
End Sub 


الملفات المرفقة
.rar   num.rar (الحجم : 1.4 ك ب / التحميلات : 29)
(( يَا أَيَّتُهَا النَّفْسُ الْمُطْمَئِنَّةُ ارْجِعِي إِلَى رَبِّكِ رَاضِيَةً مَرْضِيَّةً فَادْخُلِي فِي عِبَادِي وَادْخُلِي جَنَّتِي ))

الرد
تم الشكر بواسطة: Amir_alzubidy , عبد العزيز البسكري
#3
متشكر جدا جدا لحضرتك مش عارف اقولك ايه بس ممكن اتقل عليك فى حاجه تاني معلش
عايز يولد 100000 رقم على هذا المنوال ويعمل اكسبورت لفايل اكسل كده حضرتك تبقي خدمتني مش عارف اشكرك ازاى
الرد
تم الشكر بواسطة:
#4
السلام عليكم
عجبتني الفكرة وحبيت اكتبها
فقط هذا مثال اخر للزيادة

.rar   Sum_Diff.rar (الحجم : 1.47 ك ب / التحميلات : 28)
 اللهم اغفر لي و لوالديّ و للمؤمنين و المؤمنات 
و المسلمين و المسلمات الأحياء منهم و الأموات 
سبحان الله وبحمده Heart سبحان الله العظيم
الرد
تم الشكر بواسطة: عبد العزيز البسكري , rnmr , rnmr
#5
من اين سوف ياخذ المدخلات
(( يَا أَيَّتُهَا النَّفْسُ الْمُطْمَئِنَّةُ ارْجِعِي إِلَى رَبِّكِ رَاضِيَةً مَرْضِيَّةً فَادْخُلِي فِي عِبَادِي وَادْخُلِي جَنَّتِي ))

الرد
تم الشكر بواسطة:
#6
(25-09-16, 01:35 PM)abulayth كتب : من اين سوف ياخذ المدخلات

مش فاهم انا اسف مدخلات ايه هيا كل الفكره اني هكتب الرقم زى ما وضحت لحضرتك فى التكست مكون من 11 رقم على حسب المعادله اللى ظبطناها يولد 100000 رقم يطلعوا فى تكست او فايل اكسل يبقي كده انا تمام اوى

(25-09-16, 01:34 PM)Amir_alzubidy كتب : السلام عليكم
عجبتني الفكرة وحبيت اكتبها
فقط هذا مثال اخر للزيادة

متشكر جدا لمجهود حضرتك بس معلش افتح الملفات ديه باصدار كام
الرد
تم الشكر بواسطة: Amir_alzubidy
#7
اخي الكريم

اولا البرامج اصدار vb6 حسب القسم الموجود فيه السؤال
ثانيا الارقام المطلوبة ستكون متسلسلة او نفس الرقم مكرر 100000 مرة ام ماذا

يعطيك العافية
(( يَا أَيَّتُهَا النَّفْسُ الْمُطْمَئِنَّةُ ارْجِعِي إِلَى رَبِّكِ رَاضِيَةً مَرْضِيَّةً فَادْخُلِي فِي عِبَادِي وَادْخُلِي جَنَّتِي ))

الرد
تم الشكر بواسطة: Amir_alzubidy , Amir_alzubidy
#8
يقصد توليد ارقام عشوائية ب 11 منزلة .
 عدد الارقام العشوائية 100.000
مع تمكين المعادلة 
 والله اعلم
 اللهم اغفر لي و لوالديّ و للمؤمنين و المؤمنات 
و المسلمين و المسلمات الأحياء منهم و الأموات 
سبحان الله وبحمده Heart سبحان الله العظيم
الرد
تم الشكر بواسطة: rnmr , rnmr
#9
نقطة البداية
ماهو الرقم الذي سيكون نقطة البداية؟
هول هو ما تدخله في التكست بوكس مثلا 10000000000
والبرنامج يبدأ يعد ويزود يصبح مثلا أول رقم 10000000018+8
الرقم الثاني 10000000026+8
الرقم الثالث 10000000032+8
الرقم الرابع 10000000040+17
الرقم الخامس 10000000057
الى ان يصل للرقم مية الف xxxxxxxxxxx
????????????????????????/
؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد
تم الشكر بواسطة: عبد العزيز البسكري
#10
(25-09-16, 01:52 PM)abulayth كتب : اخي الكريم

اولا البرامج اصدار vb6 حسب القسم الموجود فيه السؤال
ثانيا الارقام المطلوبة ستكون متسلسلة او نفس الرقم مكرر 100000 مرة ام ماذا

يعطيك العافية

المقصود أخى العزيز توليد 100000 رقم بداية من ال 11 رقم الذى سيتم وضعهم فى التكست كمثال 10088370001
 وأسف لازعاجكم وشاكر مجهودكم اسف اعذرونى لانى مبتدأ

(25-09-16, 02:23 PM)hithemlion كتب :
(25-09-16, 01:52 PM)abulayth كتب : اخي الكريم

اولا البرامج اصدار vb6 حسب القسم الموجود فيه السؤال
ثانيا الارقام المطلوبة ستكون متسلسلة او نفس الرقم مكرر 100000 مرة ام ماذا

يعطيك العافية

المقصود أخى العزيز توليد 100000 رقم بداية من ال 11 رقم الذى سيتم وضعهم فى التكست كمثال 10088370001
 وأسف لازعاجكم وشاكر مجهودكم اسف اعذرونى لانى مبتدأ

أم حضرتك تقصد أنه يجب وضع رقم ثابت لتوليد الارقام بدلا من اى رقم عشوائي هو بكل الاحوال الارقام عددها 11
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Video احتاج مساعدة من مبرمجي الفجوال بسيك 6 hicham716 3 128 27-11-18, 11:10 AM
آخر رد: عبدالله الصافي
  برنامج setup factory 9 norhan 6 3,014 25-11-18, 05:52 PM
آخر رد: عبد العزيز البسكري
  مساعدة في اداة MMcontrol VB.NET 2 93 23-11-18, 03:20 AM
آخر رد: VB.NET
  [vb6.0] كيف اجعل زر امر الطابعه في برنامج المرفق غير مفعل نامل الاطلاع عليه والمساعدة ان امكن Microformt 3 107 12-11-18, 02:06 PM
آخر رد: elgokr
  السلام عليكم أريد برنامج لجمعية خيرية محمد جبريل 3 119 08-11-18, 03:01 PM
آخر رد: elgokr
  سؤال عن كيفية ربط برنامج فجوال بيسي6 بقاعدة بيانات على النت amrou 4 278 19-09-18, 08:37 PM
آخر رد: amrou
  احبابى فى الله ارجو المساعدة برنامج طباعة الباركود mhareek 2 189 19-09-18, 07:37 PM
آخر رد: mhareek
  [سؤال] كيفية استخراج تقرير ملف PDF من برنامج مصمم بالفيجوال بيسك 6 mohamed arafa 4 253 11-09-18, 05:10 PM
آخر رد: mohamed arafa
  رابط تحميل برنامج 6.0 Microsoft Visual Basic ابو يسرية 3 7,969 04-09-18, 11:03 PM
آخر رد: عبدالقادرعواد
  السلام عليكم ممكن مساعدة يا اخوان كيف بدي اربط الفورم في الاكسل ضروري بارك الله فيكم محمد جبريل 3 167 29-08-18, 08:56 PM
آخر رد: مصمم هاوي

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


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم