تقييم الموضوع :
  • 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 ك ب / التحميلات : 6)
شـــايـفـــك

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

.rar   Sum_Diff.rar (الحجم : 1.47 ك ب / التحميلات : 10)
سأعود قريباً ان شاء الله

الرد }}}}
تم الشكر بواسطة: عبد العزيز البسكري
#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
مع تمكين المعادلة 
 والله اعلم
سأعود قريباً ان شاء الله

الرد }}}}
تم الشكر بواسطة:
#9
نقطة البداية
ماهو الرقم الذي سيكون نقطة البداية؟
هول هو ما تدخله في التكست بوكس مثلا 10000000000
والبرنامج يبدأ يعد ويزود يصبح مثلا أول رقم 10000000018+8
الرقم الثاني 10000000026+8
الرقم الثالث 10000000032+8
الرقم الرابع 10000000040+17
الرقم الخامس 10000000057
الى ان يصل للرقم مية الف xxxxxxxxxxx
????????????????????????/
؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة: عبد العزيز البسكري
#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
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  فتح برنامج مبرمج بالفيجوال بيسك6 و قاعدة بيانات MYSQL Ahmed Salem12 1 43 01-12-16, 03:40 PM
آخر رد: sendbad100
  [سؤال] احتاج مساعده في برنامج موعد الحضور والانصراف mera 6 298 30-11-16, 10:59 PM
آخر رد: فاطمة غ
  [سؤال] ممكن مساعدة في ايجاد كود او اداة لاظهار جدول في واجهة البرنامج مبرمج جديد 2 100 09-11-16, 03:48 AM
آخر رد: مبرمج جديد
  [vb6.0] مساعدة عاجلة من الاخوة الكرام (ادارج صورة من فيجوال بيسك الى ملف وورد) sher 1 225 08-11-16, 02:32 AM
آخر رد: AL_BRNS
  برنامج فجوال ستوديو 6 اسلام الكبابى 5 137 05-11-16, 11:10 PM
آخر رد: اسلام الكبابى
  برنامج القسمة المطولة احمداحمداحمد6 1 77 30-10-16, 01:22 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] كيف اجعل عند إدارج مسار الصورة في Text تظهر الصوره في برنامج المرفق ؟؟ Microformt 1 83 07-10-16, 12:37 PM
آخر رد: Amir_alzubidy
Question [vb6.0] كيف يمكن إدراج مسار الصورة في التكس بوكس في برنامج المرفق ؟؟ Microformt 1 129 01-10-16, 06:25 PM
آخر رد: Amir_alzubidy
  [vb6.0] طلب تعديل على برنامج iisys 21 580 23-09-16, 03:03 PM
آخر رد: iisys
  مساعدة في Active report haiderkh 4 179 31-08-16, 12:08 AM
آخر رد: Ahmed_Mansoor

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


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