الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

طريقة صنع اله حاسبة بسيطة بالفيجوال بيسك . نت 2008 او 2010

بدأه صلاح الدين محمد في 27 يوليو 2013 · 2 رد · 15,382 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

انا مش هرغي كتير طريقة صنعها سهلة جدآ :) :)
 اولآ اعمل مشروع جديد و سميه اي حاجة

ثم ضع فيه 5 ازرار (butons) قم بتسمية الأول جمع
و الثاني طرح و الثالث قسمة و الرابع ضرب و الخامس خروج
ثم ضع 2 صندوق نص (textbox)مع مراعة وضع text box 1 فوق تكست بوكس 2 
و واحد لابل (label) و امسح ما به

و الان مع مرحلة الأكواد

قم بكتابة هذا الكود في زر جمع

 Dim x As Single
        Dim y As Single
        x = TextBox1.Text
        y = TextBox2.Text
        Label1.Text = x + y


و في زر طرح  


Dim x As Single
        Dim y As Single
        x = TextBox1.Text
        y = TextBox2.Text
        Label1.Text = x - y




و في زر قسمة

Dim x As Single
        Dim y As Single
        x = TextBox1.Text
        y = TextBox2.Text
        Label1.Text = x / y







في زر ضرب

Dim x As Single
        Dim y As Single
        x = TextBox1.Text
        y = TextBox2.Text
        Label1.Text = x * y


في زر خروج (end)



ثم اضغط f5 لتجربة المشروع ثم قم بكتابة مثلآ 20 فوق و 10 تحت ثم اضغط جمع ستجد الناتج في lable الذي وضعته و طرح ستجد الناتج في lable الذي وضعته و كذلك مع ضرب و قسمة  :lol:
:huh:  :huh:  :huh:  :huh:  :huh:  :huh:  :huh:                                                                                     :huh:  :huh:  :huh:  :huh:  :huh:  :huh: 


               و مع دروس اخري إن شاء الله






 

#2

مشكور جدا صلاح ولكن أريد برنامج فيجوال بيسيك الذي تستخدمه

:D 

‎لا تيأسن إذا كبوتم مرة ** إن النجاح حليف كل مثابر‎

 

Import AnyCodeYouLearned Project = findNewProjecthasProject = Truewhile (!dead&&hasProject) { codeingisDone = try_Codeif (isDone)  Project = findNewProjectelse learn_code

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…