في الدرس السابق وهو درس عمل آله حاسبه بفيجوال بيسك تم شرح بعض الخواص والأكواد وفي هذا الدرس نشرح المزيد بإذن الله والدرس هذا هو شرح عمل برنامج زخرفة أسماء بسيط بالفيجوال بيسك وسنجعل أنواع الزخارف في هذا البرنامج 3 فقط!! إختصاراً للوقت ويمكنك أنت زيادة العدد
الآن سنبداً بالشرح وكما تعودنا أولاً نبدأ برسم الأدوات وبعد ذلك بتغيير الخصائص ولن أشرح تغيير الخصائص لأن جميع الخصائص تم شرحها سابقا إختصاراً للوقت ولكي تتعود على الإعتماد على نفسك في البرمجه الآن إرسم الأدوات وغير خصائصها ليصح مشروعنا مثل مافي الصوره التاليه:
الآن إضغط على زر المبرمج مرتين لتفتح لك صفحة الكود أكتب فيها الكود التالي:
كود:
MsgBox ("فاعل خير"), , "برنامج زخرفة الأسماء"
الكود مشروح في الأعلى لذلك لا نحتاج إلى شرحه.
وإضغط على زر خروج مرتين لتفتح لك صفحة الكود أكتب فيها:
كود:
End
وكما شرحنا في الأعلى كلمة End في لغة vb6 تعني خروج
والآن إضغط على زر الزخرفه الأولى >> الأسم << مرتين لتفتح لك صفحة الكود وأكتب:
كود:
Text2.Text = ">>" + Text1.Text + "<<"
والشرح:
عند الضغط على الزر تتحول خاصية الكتابه (text) في مربع النص الثاني (text2) إلى (>>) + (النص المكتوب في مربع النص الأول) + (<<) ليكون الناتج تتحول الكتابه في مربع النص الثاني إلى
>>الكتابه التي في مربع النص الأول <<
وفي زر الزخرفه الثانيه .:.:: الأسم ::.:. نكتب الكود:
كود:
Text2.Text = ".:.::" + Text1.Text + "::.:."
وشرحه:
عند الضغط على الزر تتحول خاصية الكتابه (text) في مربع النص الثاني (text2) إلى (.:.:
+ (النص المكتوب في مربع النص الأول) + (::.:. ) ليكون الناتج تتحول الكتابه في مربع النص الثاني إلى
.:.:: الكتابه التي في مربع النص الأول ::.:.
وفي زر الزخرفه الثالث نكتب الكود التالي:
كود:
Text2.Text = "-=
" + Text1.Text + "|:=-"
والشرح:
عند الضغط على الزر تتحول خاصية الكتابه (text) في مربع النص الثاني (text2) إلى (-=
) + (النص المكتوب في مربع النص الأول) + (|:=-) ليكون الناتج تتحول الكتابه في مربع النص الثاني إلى
-=
الكتابه التي في مربع النص الأول |:=-
والآن أنتهينا من عمل البرنامج وهذا رابط تحميل البرنامج المعمول في الشرح:
http://www.4shared.com/file/15888695...___online.htmlفي الدرس القادم: س: لو عملت مشروع طويل وأردت التوقف والإكمال فيما بعد ماذا أفعل؟
.:.:إنتظروا الدرس القادم:.:.
>>يتبع<<