بدء دورة الإنتقال من vb6 إلى الدوت نيت

عاشت ايدك بس لو تعلمنا كيف نضع بيانات مثل 1و2و3و4و5و6وفي الكومبو بوكس وعند اختيارها والضغط على خزن تذهب القيمة المختارة لقاعدة البيانات المربوطة بالـform

مع الشكر

أنا لا أحب العجلة أخي العزيز سيأتي وقته إن شاء الله

ولكن هل تريد المثال بالفيجوال بيسك 6 أو الدوت نيت لكي أرفع لك المثال إذا كنت بحاجة إليه الآن

:happy:

كم كنت اتمنى أن أحصل على مثل هذا الشرح رائع جدا

وياليت استاذي bahbah تقول لنا بفهرس الدوره وهل راح يكون هناك دروس خاصه بقواعد البيانات وطرق الربط

واصل فاأحنا بنتضارك والله يجزيك الفردوس

yasser96 كتب:

كم كنت اتمنى أن أحصل على مثل هذا الشرح رائع جدا

وياليت استاذي bahbah تقول لنا بفهرس الدوره وهل راح يكون هناك دروس خاصه بقواعد البيانات وطرق الربط

واصل فاأحنا بنتضارك والله يجزيك الفردوس

فهرس الدورة لم أعدده إلا الآن ولكن سأقوم بإعداده فيما بعد

وطبعاً سيكون هناك دروس خاصة بقواعد البيانات وطرق الربط :happy:

أتمنى أن تكون من المتابعين

bahbah كتب:

أتمنى أن تكون من المتابعين

أكيـــــــد بأن الله من إول المتابعين فاأنا بأنتضار الدروس بفارغ الصبر

أتمني أن تقبلني من المتابعين

أكيد سيكون طعم المتابعة سيكون أفضل بكثير جداً

شكراً لك أخ bahbah

وجزاك الله كل خير علي إدراج فيجوال 2008

بالتوفيق والي الأمام

MMA_EG_Cairo كتب:

أتمني أن تقبلني من المتابعين

أكيد سيكون طعم المتابعة سيكون أفضل بكثير جداً

شكراً لك أخ bahbah

وجزاك الله كل خير علي إدراج فيجوال 2008

بالتوفيق والي الأمام

شكراً أخي MMA_EG_Cairo وطبعاً سيكون للمتابعة طعم أفضل بكثير بوجودك معنا :blush:

وللأسف اليوم لن أستطيع تقديم الدرس الثاني ولكن غداً إن شاء الله جميع أجزاء الفيجوال دوت نيت 2008

وأيضاً سأضع الدرس الثاني :cool:

بالتوفيق وإلى الأمام وارجو عدم وضع اي روابط لبرامج مقرصنة حيث يمكن تحميل الفيجوال استوديو اكسبرس من موقع مايكروسوفت مجانا .

TareqVB كتب:

بالتوفيق وإلى الأمام وارجو عدم وضع اي روابط لبرامج مقرصنة حيث يمكن تحميل الفيجوال استوديو اكسبرس من موقع مايكروسوفت مجانا .

الحمدلله البرنامج غير مقرصن وكامل ويعمل معي جيداً ويمكنكم الفحص أيضاً

اليوم درسنا عن الترحيب والوقت والتاريخ

لذلك صمم فورم كهذا الفورم الموجود في الصورة ...

حسناً الآن سنضع الأكواد خطوة بخطوة

وأيضاً قبل أن أنسى صمم مرة آخرى مثل هذا التصميم في الدوت نيت

إستخدم في الدوت نيت هاتين الأداتين

و

فسيصبح الفورم هكذا

الآن وقت الأكواد :)

سنبداً بزر الإنهاء

لا إختلاف في هذا الكود وهو

End

الآن زر الترحيب

في الفيجوال بيسك

سيصبح هكذا

Text1.Text = "Hello World "

أما في الدوت نيت أيضاً سيصبح هكذا ولكن سيتغير اسم الأداة

TextBox1.Text =  "Hello World "

لماذا الكود متشابه ؟؟!

لأن دائماً الأداة التي نريد تغيير خاصيتها

نكتبها وهي Text1 أو TextBox1 ثم نضع . ثم نختار الخاصية التي نريد تغييرها

وهي Text ثم نضع إشارة = حتى نقول غير خاصية Text إلى ما سنكتبه الآن ، بعد إشارة = ضع ما تريد من نص بين علامتي التنصيص "" .

-----------------------------------

الآن جاء وقت زر التاريخ

في الفيجوال بيسك 6

Text1.Text = Date

في الدوت نيت

TextBox1.Text = DateAndTime.Now.Date

شرح كود الدوت نيت :

أولاً إخترنا دالة التاريخ والوقت ثم إخترنا منها التاريخ والوقت الآن ثم إخترنا عرض التاريخ والآن بهذا الكود ستعرف الأكواد الباقية فقط بمسح Date وإستبدالها من الخيارات المتاحة لذلك سأضع الأكواد فقط دون شرح

لأن الشرح سيكون هكذا للبقية الأكواد !!

أولاً في الفيجوال بيسك

والآن الدوت نيت

الحمدلله أنتهى الدرس أتمنى أن أرى إقتراحاتكم وآرائكم حول الدرس وأتمنى أن أرى أعمالكم حول هذا الدرس ألقاكم بعون الله في درس آخر من هذه الدورة وأتمنى من المشرف العزيز تثبيت الموضوع !!!

للتحميل الدرس بصيغة Pdf مع الصور والسورس كود على هذا الرابط

إضغط هنا

السلام عليكم و رحمة الله و بركاته

الله يجزيك الخير يا أخي العزيز bahbah و إن شاء الله تعالى لك في كل حرف حسنة و الله يعطيك العافية

أنا بدأت العمل على .Net و كان مشروعي التخرج كان على دوت نيت و على سي شارب بذات لكن عندما عملت كانت اللغة VB6 في أول شركة عملت فيها ,و كان ذلك فس سنة 2006 الى لان,و الحمد لله مستواي متوسط لا أريد مدح نفسي وسأبقى أتعلم ما حييت

و أنا من فترة طويل يراودني شعور إني أتحول الى الدوت نيت لأسباب كثيرة منها :

1- التطور و الأكواد المختصرة في الدوت نيت .

2- سوق العمل على حد علمي أصبح يعمل ككل عل الدوت نيت .

3-لا أريد أن أجد نفسي بعد سنوات أعمل على لغة صحيح ممتازة و أنا من عشاق VB6 و سأضل ولكن قديمة مثل مبرمجين FOXPRO مثلاً .

4-الحلول الممتازة و السريعة و الإمكانيات الدوت نيت التي ليس لها حدود .

5- ....إلخ

فأرجو أن تقبلني تلميذ عندك أستاذي bahbah و أن لا تمل من أسألتي.... أنت تعرف كل تغير صعب في البداية ولكن مع التوفيق من الله تعالى وثم الإرادة يسهل أي شيء.

أرجو أخي أن تشرح لنا ما هي الدوت نيت كمقدمة و مكوناتها وما الفرق بين السي شارب و الفيبي دوت نيت مثلا.. و المعلومات أساسية التي لازم يعرفها أي مبرمج دوت نيت

شكرا لك

dark_man كتب:

السلام عليكم و رحمة الله و بركاته

الله يجزيك الخير يا أخي العزيز bahbah و إن شاء الله تعالى لك في كل حرف حسنة و الله يعطيك العافية

أنا بدأت العمل على .Net و كان مشروعي التخرج كان على دوت نيت و على سي شارب بذات لكن عندما عملت كانت اللغة VB6 في أول شركة عملت فيها ,و كان ذلك فس سنة 2006 الى لان,و الحمد لله مستواي متوسط لا أريد مدح نفسي وسأبقى أتعلم ما حييت

و أنا من فترة طويل يراودني شعور إني أتحول الى الدوت نيت لأسباب كثيرة منها :

1- التطور و الأكواد المختصرة في الدوت نيت .

2- سوق العمل على حد علمي أصبح يعمل ككل عل الدوت نيت .

3-لا أريد أن أجد نفسي بعد سنوات أعمل على لغة صحيح ممتازة و أنا من عشاق VB6 و سأضل ولكن قديمة مثل مبرمجين FOXPRO مثلاً .

4-الحلول الممتازة و السريعة و الإمكانيات الدوت نيت التي ليس لها حدود .

5- ....إلخ

فأرجو أن تقبلني تلميذ عندك أستاذي bahbah و أن لا تمل من أسألتي.... أنت تعرف كل تغير صعب في البداية ولكن مع التوفيق من الله تعالى وثم الإرادة يسهل أي شيء.

أرجو أخي أن تشرح لنا ما هي الدوت نيت كمقدمة و مكوناتها وما الفرق بين السي شارب و الفيبي دوت نيت مثلا.. و المعلومات أساسية التي لازم يعرفها أي مبرمج دوت نيت

شكرا لك

مقبول يا dark_man وأتمنى أن تستفيد من المعلومات التي في المرفقات التي تتكلم عن الدوت نيت

الدوت نيت.zip

استاذي bahbah

بارك الله فيك وجزاك الله خير على مجهودك الطيب

أسأل الله تعالى أن يرزقك تقى في القلب

وزيادة في الرزق

وكثره في فعل الصالحات

واصل وشرحك مميز جدا وجزاك الله كل خير

اتمنى الدرس الثالث باسرع وقت

في المرفق تطبيقي للدرس Lesson2.rar

شكراً لك أخ bahbah

والي الأمام

إفتح نافذة الكود بالضغط على زر الأمر مرتين

قم بالكتابة في Class الفورم هذا الكود

وهو تعريف المتغير :

الكود :

Dim msgbox As String = "My Name is Bahbah"
Dim msgtitle As String = "Arab Team"
Dim mynum As Integer = 50

شرح الكود :

أول سطر:

تعريف المتغير msgbox على أنه متغير نصي ووضعنا قيمة المتغير هي "My Name is Bahbah"

ثاني سطر:

شرحه مثل السطر الأول إلا أننا غيرنا قيمة المتغير هنا إلى قيمة آخرى .

ثالث سطر:

عرفنا المتغير mynum على أنه متغير رقمي

ووضعنا قيمته تساوي 50 .

إنتهى شرح الكود ...

الآن إنتقل للكود زر الأمر وأكتب الكود التالي :

الكود :

MessageBox.Show (msgbox, msgtitle)
MessageBox.Show (mynum, msgtitle)

شرح الكود :

السطر الأول :

قمن بإستدعاء رسالة من البرنامج نص الرسالة سيكون المتغير msgbox أما عنوان الرسالة سيكون المتغير msgtitle .

السطر الثاني :

قمن بإستدعاء رسالة من البرنامج نص الرسالة سيكون المتغير mynum أما عنوان الرسالة سيكون المتغير msgtitle .

تجريب البرنامج :

ستظهر رسالتين مثل التي في الصورة :

إليك هذه الشروط في كتابة المتغيرات

1- عدم البدء برقم في اسم المتغير مثال :

Dim 1a As String

2- عدم كتابة الرموز في اسم المتغير مثال :

Dim @@! As Integer

3- يمنع استخدام النقطة أو الفاصلة في اسم المتغير مثل :

Dim a,s As String
Dim a.w As String

4- عدم إستخدام الكلمات في المحجوزة في البرنامج مثال :

If Dim a As string ="!" Then

طرق تعريف المتغيرات :

1- الطريقة الإفتراضية

Dim ali As String

2- وضع قيمة للمتغير في نفس السطر

Dim num As Integer = 50

3- تعريف أكثر من متغير للنفس النوع

Dim num1,num2 As Integer

4- تعريف أكثر من متغير وليسوا نفس النوع

Dim Name As String, Age As Integer

5- تعريف عدة متغيرات ليس لهم نفس النوع ونسب القيم لهم

Dim Name As String = "Bahbah", Age As Integer = 18

6- تعريف متغير دون إستخدام كلمة Dim

Ame = "ggg"

7- تعريف متغير بإستخدام الكلمة المحجوزة static

Static Age As Integer

أنواع المتغيرات وكيفية إستخدامهم في هذه الصورة :-

إنتهى الدرس أتمنى أن ينال إعجابكم وأشكر العضو

yasser96 على إرفاقه العمل الذي قام به للدرس الثاني وأتمنى من الجميع أيضاً أن يرفقوا ما قاموا بعمله

وشكراً جزيلاً لكم على متابعة الدروس أولاً بأول ومن لديه سؤال فعليه فقط السؤال وعلينا الإجابة

تحميل مرفقات الدرس من سورس كود ومن الدرس بصيغة PDF والصور على هذا الرابط

إضغط هنا

شكرأ لك وبارك الله فيك

الدرس سهل جدا زي ماقلت مافيش فرق كثير إلا اني حبيت اطبق الدرس علشان ممارسه كتابه الاكواد عل الدوت نت

في المرفق تطبيقي للدرس الثالث المتغيرات

Lesson3.rar

yasser96 كتب:

شكرأ لك وبارك الله فيك

الدرس سهل جدا زي ماقلت مافيش فرق كثير إلا اني حبيت اطبق الدرس علشان ممارسه كتابه الاكواد عل الدوت نت

في المرفق تطبيقي للدرس الثالث المتغيرات

Lesson3.rar

بسبب تطبيقاتك للدروس أظن أنك ستتقن الدوت نيت وقد تحترفها

شكراً لك على تطبيق الدرس ولكن لو قمت بالتدرب أكثر فأكثر أي قم بالتدرب على إستخدام المتغيرات

مثلاً تغيير القيم أو تغيير النوع هذا سيجعلك تتقنها أكثر فأكثر :happy:

أخMMA_EG_Cairo و أخ dark_man لم أسمع صوتكما عن الدرس :mellow:

bahbah كتب:

أخMMA_EG_Cairo و أخ dark_man لم أسمع صوتكما عن الدرس :mellow:

bahbah كتب:

بسبب تطبيقاتك للدروس أظن أنك ستتقن الدوت نيت وقد تحترفها

ان شاء الله

شكراً لك على تطبيق الدرس ولكن لو قمت بالتدرب أكثر فأكثر أي قم بالتدرب على إستخدام المتغيرات

مثلاً تغيير القيم أو تغيير النوع هذا سيجعلك تتقنها أكثر فأكثر :happy:

اقتباس

أخMMA_EG_Cairo و أخ dark_man لم أسمع صوتكما عن الدرس :mellow:

أخي الحبيب ، نظرت الي الدروس وهي في قمة الروعة

ولكن أعتزر لك إن كنت تأخرت علي الرد سريعاً ، حيث أنني في هذه الأيام في قمة الديق في العمل

آسف جداً أن تأخرت عليك مرة أخري

والعمل رائع جداً ، وأتمني أن تستكملة علي خير لأنه سيفيد الجميع

بالتوفيق الدائم

MMA_EG_Cairo كتب:

أخي الحبيب ، نظرت الي الدروس وهي في قمة الروعة

ولكن أعتزر لك إن كنت تأخرت علي الرد سريعاً ، حيث أنني في هذه الأيام في قمة الديق في العمل

آسف جداً أن تأخرت عليك مرة أخري

والعمل رائع جداً ، وأتمني أن تستكملة علي خير لأنه سيفيد الجميع

بالتوفيق الدائم

فقط أردت أن أطمئن عليك وإن شاء الله سأستكمل الدروس قريباً :)

بأنتضارك

تحياتي

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

اللهم صل على محمد وآل محمد

السلام عليكم ورحمة الله وبركاته

أحببت اليوم نقل الدرس قبل أن أنقله من مدونتي لأنكم إنتظرتم كثيراً الدرس الرابع وهو ينقسم

إلى جزئين مع أن الدرس سهل ولكن لا أملك الوقت لكي أقوم بشرح الجزئين معاً

مقدمة :-

الجملةالشرطية التي تبدأ بـIF وتنتهي بـEnd IF وهذا الدرس من الدروس السهلة والبسيطة في البرمجة ولا تختلف بين الفيجوال بيسك 6والفيجوال بيسك دوت نيت ، سأقسم الدرس إلى جزئين مع أن الدرس بسيط وسهل ولكن للإستيعاب فقط :) .

أولاُ كيفية كتابة الجملة الشرطية :-

تبتدئالجملة بـIf وتعني إذا وتنهتي الجملة بـEnd IF وتعني نهاية الجملة الشرطية...

أولاً تكتب IF ثم تكتب الشرط الذي تريد تحققه

ثم تكتب Then ثم في السطر الثاني تكتب ما الذيتريد حدوثه إذا تحقق الشرط ثم في السطر الثالث تكتب End IF ...

بالأحرى كمافي هذه الصورة :-

برمجة البرنامج :

اليومسنستعمل ثلاثة أدوات في هذا البرنامج وهم كما في هذه الصورة :

سيصبح الفورم هكذا :

الآن كتابة كود زر الأمر"الكتابة الناتجة" :

نريد إذاكتبنا في صندوق النصوص "Hello"يقوم البرنامج بالكتابة في الليبل "World" ، إذاً كيف سنقوم بعمل هذا البرنامج ؟؟!

اهاا لقدجاءتني الفكرة سأكتب هذا الكود هل سينجح معي ؟؟! :

If TextBox1.Text = "Hello" Then

Label1.Text = "World"


End If

تجريب البرنامج :

نعم !! ،لقد نجحت :lol: أنظر إلى الصورة :

واجب اليوم :

أريد برنامجإذا كتبت في مربع النصوص "Welcome"يصبح نص الفورم "Hello"أريد رؤية البرنامج لإكمال الجزء الثاني :wink: والسلام عليكم ورحمة الله وبركاته....

تحميل المرفقات من هذا الرابط :

إضغط هنا