منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : هل هذا ممكن
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته 
جمعة خير ومباركة للجميع 
اخواني اعتذر عن كثرة اسئلتي لاني مبتدىء في هذة اللغة التي احببتها من كل قلبي  فارجو ان تتحملوا لاني وجدت ما ابحث عنه في هذا المنتدى الرائع 
الموضوع لدي تيكست بوكس عدد10 كما في الصور المرفقة الخمسة الاولى يحتوين على ارقام مختلفة علمابان الارقام هي نتيجة لمجموع ارقام واحياناً تختلف قيمها في داخل التيكست بوكس مثلاً يكون اكبر رقم في التيكست الاول واصغر رقم في التيكست الثاني اي عشوائية فالمطلوب هو نقل الارقام تنزلياًفي التكست بوكس الخمسة الاخرى  اي ان اكبررقم يكون في التكست بوكس6 والذي يليه في التكست بوكس7 وهكذا وكما في الصور تحياتي للجميع
استخدم اداة datagridview افضل
واجمع في header
(22-12-17, 03:25 PM)محمود صالح كتب : [ -> ]استخدم اداة datagridview افضل
واجمع في header

اخي الفاضل محمود المحترم تحية لك وتقدير على ردك واهتمتامك اخي اني مبتدىء جداً ولا اعرف استخدام اداة الداتا جريد فيو  فيا ريت لو كود فيجوال بيسك يقوم بالمهمة ان كان ممكناً
ضع قيم التيكست بوكس في مصفوفة من 5 عناصر
قم بترتيب المصفوفة
اعرض عناصر المصفوفة المرتبة في التيكست بوكسس التي تريد
لا شكر على واجب
تفضل اخي
[attachment=16469]
مثال :
[attachment=16470]

يمكنك نسخ ولصق هذا الكود في فورم جديد :
[attachment=16471]


أو تحميل هذا المشروع :
[attachment=16472]
استاذي الغالي الموضوع للتوضيح اكثر هو صفين من التكست بوكسt1 ,t2 ,t3 ,t4 ,t5 يحتوي الصف الاول على ارقام single هي حصيلة مجموع ارقام  في جدول والارقام مرتبة عشوائيا وهي ربما يكون اكبر اولا ثم يليه اصغر رقم  الارقام في التكست مجرد مثال   ,المطلوب ترتتيب الارقام تنازليا في صف التكست بوكس الثاني الذي هو ,t6, t7 ,t8 ,t9 ,t10  عن طريق button دعك من الجدول والالوان لانها متغيرة
الأقام في الصورة مرتبة تصاعديا، لكن أفترض أنها ترتيبها عشوائي
هذا الكود يرتبها تنازليا
PHP كود :
Dim x As Array = {Val(t1.Text), Val(t2.Text), Val(t3.Text), Val(t4.Text), Val(t5.Text)}
Array.
Sort(x)
Array.
Reverse(x)
t6.Text x(0)
t7.Text x(1)
t8.Text x(2)
t9.Text x(3)
t10.Text x(4
[كما أشرت في المشاركة السابقة
ضع قيم التيكست بوكس في مصفوفة من 5 عناصر
قم بترتيب المصفوفة
اعرض عناصر المصفوفة المرتبة في التيكست بوكسس التي تريد


PHP كود :
Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
        Dim arr 
As Array = {Val(TextBox1.Text), Val(TextBox2.Text), Val(TextBox3.Text), Val(TextBox4.Text), Val(TextBox5.Text)}
 
       Array.Sort(arr)
 
       TextBox10.text arr(0)
 
       TextBox9.Text arr(1)
 
       TextBox8.text arr(2)
 
       TextBox7.Text arr(3)
 
       TextBox6.Text arr(4)
 
   End Sub 
[attachment=16481]

[attachment=16483]
تسلم عزيزي الغالي ابو ناصر هذا هو المطلوب ربي يوفقك ويعزك ويزيد من علمك انت مع كل من اهتم بالموضوع لاهميته