هل تريد العمل على الفيجوال من دون تنصيب الفيجوال هل تريد صنع مشاريع من خلال جوالك :-

من طرف **صانع برامج** الجمعة أبريل 30, 2010 5:27 pm

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

العنوان : تعلم كيفية العمل على الفيجوال بيسك وصناعة المشاريع حتى من خلال جوالك من دون تنصيب برنامج الفيجوال بيسك او اي برنامج اخر.

الموضوع : -

في هذا الموضوع سوف اعلمكم كيفية عمل المشاريع حتى من دون فتح برنامج فيجوال بيسك بمعنى اعمل مشاريع فجوال بيسك من خلال جوالك ان البرنامج الوحيد الذي سوف نستخدمه في هذا الحال هو برنامج المفكره والجميع يعرف برنامج المفكرة وسهولته بداية نفنح برنامج المفكره اولا كيفية صنع الفورمات والاداوت ان عملية صنع الفورمات والاداوات سهله جدا حيث كل ما عليك هو اتباع الخطوات الاتيه مثلا لعمل نموذج Form1 اولا كتابة هذا السطر مره واحده فقط

كود PHP:
VERSION 5.00
ثم لصنع الاداة نقوم بكابة الامر التالي
اولانبدء صنع الاداة من خلال كتابة الامر Begin ثم كلمة VB. ثم اسم الاداة البرمجي لها ومن ثم الاسم البرمجي الذي سوف نستخدمه فمثلا لو اردنا صنع زر امر نكتب الامر بالصورة الاتية
Begin VB.CommandButton Command1
الان في الامر السابق حددنا نوع الاداة والاسطر التالية سوف تحدد موقعه واسمه وغيرها لتسمية الاداة نكتب وكانن السطر السابق هو
With Command1
مثلا لاختيار او لتحيد عنوانها نكتب السطر التالي
Caption = "Command1"
وهكذا مع الباقي لاحظ
Height = 495
Left = 480
TabIndex = 0
Top = 360
Width = 1215
ففي الاسطر السابقه لا اتصور ان الامر مبهم حددنا عرض وطول ومكان الاداو على النموذج وننهي عمل الاداة بالكلمة End واذا انتينا من تصميم جميع الاداوت اللازمه نكتب End اخرى لتعريف انه قد انتهينا من تصميم الاداوت لاحظ الامثله لتفهم بصورة اكبر
لعمل نموذج
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 7980
ClientLeft = 60
ClientTop = 450
ClientWidth = 8835
LinkTopic = "Form1"
ScaleHeight = 7980
ScaleWidth = 8835
StartUpPosition = 3 'Windows Default

End
لاحظ ان الامر بتصميم الاداوت يشابه البرمجة بلغة الفيجوال كثييرا
شوف مثلا مثال لصنع فورم ووضع اداة زر امر عليه
VERSION 5.00 البداية
Begin VB.Form Form1 عرفنا نوع الاداة وهي مشورع
Caption = "Form1" حددنا العنوان
ClientHeight = 7980 حددنا الطول
ClientLeft = 60 حددنا مكانه افقيا
ClientTop = 450 حددنا مكانه عموديا
ClientWidth = 8835 حددنا عرضه
LinkTopic = "Form1"
ScaleHeight = 7980
ScaleWidth = 8835
StartUpPosition = 3 'Windows Default حددنا عندما يعمل او يفتح المشروع كيف يفتح مكبر او مصغر
Width = 1215
End
Begin VB.CommandButton Command1 عرفنا نوع الاداة مع اعطاء اسمها البرمجي
Caption = "Command1" هنا اعطينا العنوان
Height = 495 هنا ارتفاع
Left = 480 هنا المكان افقيا
TabIndex = 0 هل هو ظمن مصفوفة اداوات ام لا
Top = 360 حددنا مكانه عموديا
Width = 1215 حددنا عرضه
End
End

نهاية صناعة الواجهة نهاية وضع التصميم
الان نبدأ بكتابة الاكواد

كود PHP:
الامر ثابت نكتب هذه الجمل في البداية
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
نضع هذه الجمل بالاسفل مع تغير هذه الجمله
Attribute VB_Name = "Form1"
فقط مع الاسم البرمجي للنموذج

ثم بعد ذلك نقوم بالبدء بكتابة الاكواد
[مثلا

كود PHP:
Command1_Click()
Msgbox ""
End Sub

وهنا انتيهنا من كل شيء تصميم النموذج وكتابة الاكواد الان احفظ المثال بامتداد Frm وشغل البرنامج ببرنامج الفيجوال لاحظ كيف تم التصميم