بسم الله الرحمن الرحيم


كيف حالكم اليوم , تتابعون الأخبار:confused:

طرح تاريخين شرح خطوة بخطوة - مع المثال

أولاً : مدخلات المستخدم / التاريخ القديم - الحديث ( الفرق بينهم)

التاريخ القديم : هى التواريخ التى يضعها المستخدم مثلاً : تاريخ ميلاده 9/7/1990 أو تاريخ نقطة تاريخية 25/1/2011

طيب التاريخ الاخر ( الحديث) عبارة عن التاريخ الأحدث مثل: اليوم , نستنج ان نضع زر لتاريخ اليوم (بديهى)


[ATTACH=CONFIG]1656[/ATTACH]
ولنبدأ بزر تاريخ اليوم

هذا الكود

يعنى Date = تاريخ اليوم


الزر الثانى : (اطرح)

ثم نبدأ نعرف متغيرات الأتية

PHP كود :

Dim sp() As String, sp2() As String
        Dim yy As Integer, mm As Integer, dd As Integer 


شرح [SIZE=4]الكود
sp() : مصفوفة تم تعريفها كمتغير نصى سنقسم بداخلها الأيام الخاصة بالتاريخ الحديث
sp2() : مصفوفة أخرى تم تعريفها كمتغير نصى سنقسم بداخلها الأيام الخاصة بالتاريخ القديم
yy: متغير السنة الناتجة
mm: متغير الشهر الناتج
dd:متغير اليوم الناتج

الا[SIZE=4]ن تست[SIZE=4]خدم ال[SIZE=4]متغيرات التى عرفانها

PHP كود :

sp = Split(Textbox1.Text, "/")
        sp2 = Split(Textbox2.Text, "/") 


[/SIZE][/SIZE][/SIZE]

[SIZE=4]سبليت Split
[SIZE=4]دالة ت[SIZE=4]قسيم ا[SIZE=4]لنصوص [SIZE=4]والمدخلات من خلال رمز [SIZE=4]أو حرف
فمثلاً :
أحمد [SIZE=4]/ محمد / محمود / ع[SIZE=4]بد[SIZE=4]الله
فا[SIZE=4]لرمز هنا هو ([SIZE=4]/[SIZE=4] )
ويتم اسناد لكل اسم ر[SIZE=4]قم بدأ من الص[SIZE=4]فر
أحمد = 0
محمد = [SIZE=4]1
محمود = 2
.... وه[SIZE=4]كذا

[SIZE=4]طيب كيف نفعل هذا بالكود [SIZE=4]:

نفترض أن المدخلات فى Tex[SIZE=4]t1[SIZE=4] و[SIZE=4]هى : [/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4]أحمد [SIZE=4]/ محمد / محمود / ع[SIZE=4]بد[SIZE=4]الله[/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4][SIZE=4]
[SIZE=4]نج[SIZE=4]ي[SIZE=4]ب [SIZE=4]متغير يستطيع ت[SIZE=4]خزين [SIZE=4]عدة مدخلات[SIZE=4] ونعرفه [SIZE=4]dim
dim arr() as string
[SIZE=4]وضعنا قوسان أما[SIZE=4]م المتغير لن[SIZE=4]عله مصفوفة
[SIZE=4]طيب كي[SIZE=4]ف [SIZE=4]نقس[SIZE=4]م النص
[SIZE=4]arr [SIZE=4]= Split(Tex[SIZE=4]t1.text[SIZE=4] , "/" )[/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE]
فعند[SIZE=4]ما نريد اس[SIZE=4]تدعا[SIZE=4]ء الاسم " محمود "
ن[SIZE=4]كتب

PHP كود :

msgbox (arr (2)) 


[SIZE=4]البقية فى [SIZE=4]الحلقة... ا[SIZE=4]قصد .. [/SIZE]المشاركة القادمة [/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE]
[/SIZE][/SIZE]
[/SIZE]