منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
تعديل ترتيب أرقام الصفحات تصاعدياً - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : تعديل ترتيب أرقام الصفحات تصاعدياً (/showthread.php?tid=41896)



تعديل ترتيب أرقام الصفحات تصاعدياً - مصمم هاوي - 11-07-22

هذا كود يم فيه استدعاء سجلات المأذونيين حسب اسم المأذون وهو شغالٌ 100%
ولكن عند إختيـار اسم المأذون من الكومبوكس Comboalmadhun وإظهار سجلات المأذون
يتم تعبئة كومبوكس Comborecord بالسجلات.
المشكلة أن أرقام السجلات غير مرتبة تصاعدياً، حاولت ترتيبها ولكن دون جدوى؛ فهل يمكن التعديل على الكود حتى يتم إظهار الأرقام تصاعدياً؟

كود :
Private Sub Comboalmadhun_Click()
'On Error Resume Next: Err.Clear
''''''''''''''''''''''''''''''''''
Call ConnectionDatabase
If RS.State = adStateOpen Then RS.Close

SQL = " SELECT record  FROM TBL_archives GROUP BY TBL_archives.record, TBL_archives.aism_almadhun HAVING (((TBL_archives.aism_almadhun)='" & Trim$(Comboalmadhun.Text) & "'))"
Text1.Text = SQL
RS.Open SQL, db, adOpenStatic, adLockOptimistic
                      
Comborecord.Clear

For I = 0 To RS.RecordCount - 1
Comborecord.AddItem RS.Fields(0)
Comborecord.ItemData(Comborecord.NewIndex) = RS.Fields(0)
RS.MoveNext
Next
'
End Sub



RE: تعديل ترتيب أرقام الصفحات تصاعدياً - مصمم هاوي - 13-07-22

حيث لم أجد جوابا لسؤالي المطروح قمت بحل المشكلة عن طريق تغيير نوع الحقل record إلى (عملة) ونجح في ترتيب الارقام تصاعديا بعد إجراء تغيير ظفيف بكود الكومبوكس combrecord


RE: تعديل ترتيب أرقام الصفحات تصاعدياً - Taha Okla - 13-07-22

السلام عليكم ورحمة الله وبركاته.
إذا كان الحقل من نوع نصي فعليك ترتيب وتنسيق الأرقام فيه بعدد الخانات المتوقع الوصول إليها
فلو تتوقع أنه لن يتجاوز الرقم 999
فيكن ترتيب الأرقام وتنسيقها فيه على الشكل التالي  :
001
002
003
...
...
998
999
-----
المقصود من ذلك أن تحفظها بالتنسيق الثلاثي الخانات
فلو طلبت ترتيبها فستترتب كما تريد تصاعدياً أو تنازلياً ..
===================================
أما لو كانت :
1
2
.
.
11
12
13
..
21
22
23
...
.
998
999

فلن يتم ترتيبها تصاعديا أو تنازلياً كما تتصور على أنه رقم بل على أنه نص
فيرتب بحسب الخانة التي تقع على اليسار ( بالرقم الذي يبتدأ به من جهة اليسار بالواحد ثم الرقم 2 ثم الرقم ثلاثة ) 
فيكون الترتيب كـ التالي :
1
10
11
12
13
.
.
.
101
102
103
.
.
.
2
20
21
22
..
وهكذا ..


RE: تعديل ترتيب أرقام الصفحات تصاعدياً - مصمم هاوي - 13-07-22

بارك الله فيك أخي طه.
نعم نوع الحقل نصي، وقد جالت في خاطري هذه الفكرة ولكنني لم انفذها.