|
|
![]() |
|
#1
|
||||
|
||||
|
برامج ومشاريع Visual Basic.NET بالاكواد
السلام عليكم يا جماعة
انا واحد من ناس كتير بنقعد ندور علي برامج بالفيجول بيسك وكتير قوي مش بنلاقي البرنامج او الكود المطلوب :no000000: عشان كدة فكرت اعمل الموضوع دة وهو عبارة عن برامج انا عملها وهتكون متاحة للكل بالكود والتصميم وكل حاجة ... مستني موافقتكم وردودكم عشان نبدأ ويارب الموضوع يعجبكم :bye10000: |
|
#2
|
||||
|
||||
|
مساء الخير ::::
شكرا يا amora2222 على الاكواد بس انا لية تعليق على الموضوع بتاعك ....؟؟؟؟؟.....؟؟؟ وهو انك لزم تقول ان الاكواد دة بتاعة VB6 علشان ممكن في ناس مش تعرف ان الـ VB فية نوعين منة ..... زي مثلاً : VB.NET .... وده الي انا شغال بية وعلى العموم لغة الـ VB.NET اسهال بكتير من VB6 .... انا كنت شغال الاول بـ VB6 ولما عرفت ان في لغة اسمها VB
__________________
((وَمَا تَدْرِي نَفْسٌ مَّاذَا تَكْسِبُ غَداً وَمَا تَدْرِي نَفْسٌ بِأَيِّ أَرْضٍ تَمُوتُ)) ![]() سانقطع عن المنتدي لفترة لا يعلمها الا الله
|
|
#3
|
||||
|
||||
|
مساء الخير ::::
شكرا يا amora2222 على الاكواد بس انا لية تعليق على الموضوع بتاعك ....؟؟؟؟؟.....؟؟؟ وهو انك لزم تقول ان الاكواد دة بتاعة VB6 علشان ممكن في ناس مش تعرف ان الـ VB فية نوعين منة ..... زي مثلاً : VB.NET .... وعلى العموم لغة الـ VB.NET اسهال بكتير من VB6 .... انا كنت شغال الاول بـ VB6 ولما عرفت ان في لغة اسمها VB.net احسن من ال VB6 اتعلمتها وان شغال بيها حالياً .... ودة مش يمنع ان الواحد لما يعرف ان في حاجة جديدة احسن من الي معاة اكيد بيروح للي احسن علشان يدرسها ويتعلمها ...... اكيد الواحد بيتقدم مش بيفضل مكانة ......... والا مش هايبقي في تقدم في العلم .....؟؟؟؟؟ وعلى فكرة انا سعيد جدا بالمشاركة الجميلة دة ويا ريت يكون في تبادل معلومات ما بينا ..... وعلى فكرة انا ترجمت الاكواد دة الي اكواد VB.NET والحمد للة شغالة كويس ............ انا بشكرك للمرة التانية على المشاركة ....؟؟ وشكراً ........ |
|
#4
|
||||
|
||||
|
نبدأ ولا اية؟؟؟
السلام عليكم
اولا احب اشكر الناس الي دخلت وشافت وشاركت في الموضوع :clap0000: بس انا نفسي ان الي يخش ويحب يشارك يعرف الموضوع الاول قبل ما يبتدي يشارك ويكتب برامج واكواد ,,, انا بصراحة كنت فرحان لما لاقيت ان اول موضوع اكتبه في ناس بتشوفه وبتشارك فيه لكن.... مش مهم ... هنبدأ من تاني وعشان خاطر عيون المنتدي وكل الي فيه :clap0000: مش عارف بقا انتوا رأيكم اية نبدأ في الفيجول بيسك . نت Visual Basic.NET ولا نسك علي الموضوع وخلاص مستني رودوكم عشان نبدأ اخوكم الجديد هشام :clap0000: أخر تعديل بواسطة hashem897 ، 11-12-2005 الساعة 09:41 PM |
|
#5
|
||||
|
||||
|
اول مثال بالكود
يلا يا جماعة هنبدأ مع اول برنامج
البرنامج بسيط وهو مسؤول عن تغير لون الخط في الازرار عند مرور الماوس عليها هنستخدم في المثال دة زر وليكن Button2 وهنشتغل علي خاصيتين في الزر دة وهما MouseMove و MouseLeave وعشان احنا عايزين نغير اللون هنستخدم خاصية ForeColor وخاصية ForeColor بتكون بالشكل دة ForeColor = Color.Color والوقتي هنعمل الكلام دة في المثال بتاعنا اولا خاصية MouseMove Private Sub Button2_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button2.MouseMove والوقتي بقا MouseLeave عشان اللون يرجع زي ما كان بعد ما الماوس يبعد وهتكون بالشكل دة Me.Button2.ForeColor = Color.Red() End Sub Private Sub Button2_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.MouseLeave Me.Button2.ForeColor = Color.Black() End Sub ودة هيكون اول مثال ومستني رودوكم بقا عشان نكمل يارب يكون الشرح كويس اخوكم هشام :bye10000: أخر تعديل بواسطة hashem897 ، 11-12-2005 الساعة 10:11 PM |
|
#6
|
||||
|
||||
|
والله يا897 hashem باشا الموضوع فكرته ممتازه....توكل على الله وإبدأوإن شاء الله حيستفيد منه ناس كتيير
__________________
|
|
#7
|
||||
|
||||
|
متشكر جدا يا REDMAN20102 وعقبالي كدة لماعضو نشيط زيك ويا رب الكل يستفيد ومحدش يزعل مني :blush-an:
|
|
#8
|
||||
|
||||
|
المثال التاني
اية يا جماعة اية رأيكم في الموضوع
هنبدأ تاني بالمثال التاني البرنامج المرة دي بسيط برضه لكن بجد مفيد جدا لو فهمنا فكرته البرنامج فكرته معرفة نوع الرقم اذا كان فردي ولا زوجي وهنستخدم في فكرة جديدة اسمها TextChanged هنبدأ المشروع كالتالي: 1- هنفتح مشروع جديد وفورم جديد 2- نضيف 2 ليبل وتكست بوكس Label1 و Label2 و TextBox1 3- هنفضي محتويات Label2 وTextBox1 من خاصية Textفي الخصائص 4- هنكتب في Label1 اي رسالة للمستخدم مثلا Enter The Number You Want To Chack 5- نرتب الفورم بتاعتنا بالترتيب دة Label1 فوق وتحيتيه TextBox1وتحتيه Label2 او اي ترتيب تاني زي ما تحب وكدة نبقا خلصنا مرحلة التصميم ونبدأ في مرحلة البرمجة 1-نروح لمنطقة الكود 2-هنا هنستخدم خاصية TextChanged لل TextBox1بالشكل دة TextBox1_TextChanged 3-نكتب فكرة البرنامج الي هيا التفريق بين الرقم الزوجي والفردي وطبعا الرقم الزوجي هو الي بيقبل القسمة علي 2 يبقا الكود هيكون بالشكل دة Val(TextBox1.Text) Mod 2 = 0 بس طبعا هنحط شرط بالشكل دة If Val(TextBox1.Text) Mod 2 = 0 Then Me.Label2.Text = "The Number Is Even " وهيكون المثال كله بالشكل دة Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged If Val(TextBox1.Text) Mod 2 = 0 Then Me.Label2.Text = "The Number Is Even " Else Me.Label2.Text = "The Number Is Odd" End If End Sub وكدة نبقا خلصنا تاني مثال وانتظروا المزيد وانا كمان مستني الردود ويا رب كلنا نستفيد اخوكم هشام :bye10000: |
|
#9
|
||||
|
||||
|
تابع المثال الاول
ودي صور توضيحية للمثال الاول
معلش الصور اتأخرت شوي عشان مكنتش اعرف طريقة التحميل وان شاء الله كل المواضيع الجاية هتكون بالصور ![]() ![]() ومستني الردود اخوكم هشام |
|
#10
|
||||
|
||||
|
تابع المثال التاني
ودي صورة البرنامج التاني ومرة تانية اسف علي التاخير
![]() ولسة مستني ردودكم عشان نكمل اخوكم هشام |
|
#11
|
||||
|
||||
|
مساء الخير :::::..........
بص يا ابني انتا خصارتك في البلد دة .........؟؟؟؟؟؟؟؟؟؟ انا مش عارف اققول اية كلمة شكراً قليلة ؟؟؟؟ بس انا هاقولها شكرا على الشرح الجامدة دة .....؟؟؟؟ كمل يا هشام ....؟؟؟؟ وانا ممكن اساعدك في الموضوع دة لو عوزت اي حاجة ........؟؟؟؟؟؟؟ |
|
#12
|
||||
|
||||
|
متشكر جدا يا mohsh12 باشا وطبعا شئ يشرفني انك تكون معايا وتساعدني بس المهم الكل يستفيد وهو دة الي يهمني واستنوا مني برامج كتير وشرح ان شاء الله :clap0000:
|
|
#13
|
||||
|
||||
|
عشان خاطر عيون المنتدي البرنامج التالت وبالصور
النهاردة بقا الموضوع جميل قوي ومفيد اوي كمان
المثال هيكون عبارة عن رسالة تظهر للمستخدم لما يحب يخرج من البرنامج تسأله اذا كان متاكد انه عايز يخرج ولا لا والحكاية دي بتستخدم كتير خصوصا عند مسح الملفات او اضافة ملفات الخ وفي الحقيقة الفكرة واحدة وبيكون التغير بس في مضمون الرسالة وهنستخدم في المثال دة حاجة اسمها MessageBox وعشان احنا عايزين نظهره فالكود هيكون كالتالي: MessageBox.Show نيجي بقي لمرحلة البرمجة او ازاي هنخلي الرسالة دي تظهر 1. هنفتح مشروع جديد وفورم جديدة 2. هنضيف زر وليكن Button1 ونغير خاصية ال Text الي close 3. هندوس مرتين علي الزر عشان نروح لمنطقة البرمجة وكتابة الكود الرسالة في المثال بتاعنا هتكون Are You Sure? وطبعا ممكن تحط الرسالة الي انت عايزها زي ما تحب الوقتي في حاجة مهمة وهي ان المستخدم لازم يكون عنده اختيارت yes او no وكمان الرسالة دي لازم يكون ليها عنوان والي هيكون في المثال بتاعنا Close Window ودي برضه ممكن انت تغيرها زي ما تحب بعدين نبدأ في كتابة الكود في حدث Click للزر والي بيكون بالشكل دة Button1_Click 4. الكود هيكون بالشكل دة MessageBox.Show("Are You Sure?", "Close Window", MessageBoxButtons.YesNo) لكن طبعا هنضيف شرط بحيث لو المستخدم ضغط yes البرنامج يتقفل ولو ضغط no يفضل شغال وهيكون بالشكل دةIf MessageBox.Show("Are You Sure?", "Close Window", MessageBoxButtons.YesNo) = DialogResult.Yes Then وبقا كود البرنامج كلة بالشكل دة Me.Close() End If Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click وبكدة نبقا خلصنا تالت برنامج ويا رب يكون الشرح كويس والكل استفاد ولسة في برامج وافكار كتير ولسة مستني ردود منكم ويارب كلنا نستفيدIf MessageBox.Show("Are You Sure?", "Close Window", MessageBoxButtons.YesNo) = DialogResult.Yes Then Me.Close() End If End Sub ودي صور البرنامج ![]() ![]() اخوكم هشام :clap0000: |
|
#14
|
|||
|
|||
|
الف شكر يا باشا على مجهودك الجميل ارجو شرح المزيد
|
|
#15
|
||||
|
||||
|
متشكر جدا يا avsf باشا وانا محضر برنامج جميل جدا واعتقد انكم هتحبوا الشرح بتاعه بس فين الردود يا جماعة :clap0000:
|
![]() |
| أدوات الموضوع | |
|
|