الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

New program **Mair 2003 Agenda

مغلق
بدأه kessabiriadh في 31 مايو 2003 · 2 رد · 517 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

BESMELLAH هذا الكود قمت به لتخزين معلومات

TO SAVE

open "c:/mair2003agenda.txt"for append as #1

print #1,text1.text

print#1,text2.text

close#1

TO OPEN INFORMATION

Open "C:Mair2003agenda.txt" For Input As #1

For i = 0 To 50

On Error GoTo 22

Input #1, x

Input #1, y

List1.AddItem x

Next

22 Close #1

On the list box

o = List1.ListIndex

Open "C:Mair2003agenda.txt" For Input As #1

For i = 0 To o

On Error GoTo 22

Input #1, x

Input #1, y

Text2.Text = y

Next

22 Close #1

BUT------------------>

أريد أن يتم ترتيب القائمة بالأبجدية

و الكود الخاص كي استطيع تغير احد المعلومات

I NEED HELP PLEASE

THANK FOR ALL(f)(f)(f)

#2

'

لترتيب البيانات المعروضة في القائمة List توجة إلى الخصائص التابعة للقائمة ثم ابحث عن الخاصية Sorted وغير قيمتها من False إلى True .

وتقبل تحياتي

#3

Thanks I try and I tell you

THANKS TO ALL

(f)(f)(f)

هذا الموضوع مغلق.

مواضيع مشابهة