كيفية عمل الالة حاسبة بلفيجوال بيسك

[Best__wizard]

انا انهاردة جايبلكم شرح عمل الالة حاسبة
نبتدى
هنحتاج 2 textbox
3 label
11 button
الفروم هيبقابلشكل دا

قبل ما نكتب اى كود هنستدعى الاداة import system.math
هانكتب الكود هنا

هنبتدى الاكواد

هتكتب فى الزر cos

كود PHP:

 Dim x As Integer
x = Decimal.Parse(Me.TextBox1.Text)
Label1.Text = Math.Cos(Integer.Parse(TextBox1.Text)) 


هتكتب فى الزر tan

كود PHP:

 Dim x As Integer
x = Decimal.Parse(Me.TextBox1.Text)
Label1.Text = Math.Tan(Integer.Parse(TextBox1.Text)) 


هتكتب فى الزر sin

كود PHP:

 Dim x As Integer
x = Decimal.Parse(Me.TextBox1.Text)
Label1.Text = Math.Sin(Integer.Parse(TextBox1.Text)) 


هتكتب فى الزر sqrt

كود PHP:

 Dim x As Integer
x = Decimal.Parse(Me.TextBox1.Text)
Label1.Text = Math.Sqrt(Integer.Parse(TextBox1.Text)) 


هتكتب فى الزر abs

كود PHP:

Dim x As Integer
x = Decimal.Parse(Me.TextBox1.Text)
Label1.Text = Math.Abs(Integer.Parse(TextBox1.Text)) 


هتكتب فى الزر round

كود PHP:

 Dim x As Integer
x = Decimal.Parse(Me.TextBox1.Text)
Label1.Text = Math.Round(Integer.Parse(TextBox1.Text)) 


هتكتب فى الزر sgin

كود PHP:

 Dim x As Integer
x = Decimal.Parse(Me.TextBox1.Text)
Label1.Text = Math.Sign(Integer.Parse(TextBox1.Text)) 


هتكتب فى الز ر acos

كود PHP:

 Dim x As Integer
x = Decimal.Parse(Me.TextBox1.Text)
Label1.Text = Math.Acos(Integer.Parse(TextBox1.Text)) 


هتكتب فى الزر -

كود PHP:

Dim x As Decimal
x = Decimal.Parse(Me.TextBox1.Text)
x = TextBox1.Text - TextBox2.Text
Label1.Text = x.ToString 


هتكتب فى الزر *

كود PHP:

 Dim x As Decimal
x = Decimal.Parse(Me.TextBox1.Text)
x = TextBox1.Text * TextBox2.Text
Label1.Text = x.ToString 


هتكتب فى الزر ^

كود PHP:

 Dim x As Decimal
x = Decimal.Parse(Me.TextBox1.Text)
x = TextBox1.Text ^ TextBox2.Text
Label1.Text = x.ToString 


هتكتب فى الزر /

كود PHP:

 Dim x As Decimal
x = Decimal.Parse(Me.TextBox1.Text)
Try
x = TextBox1.Text / TextBox2.Text
Catch ex As Exception
MsgBox("second value must not be zero")

 Label1.Text = x.ToString 


خلاص كدا خلصنا

[HandSome]

شكرا على الشرح

[Best__wizard]

المشاركة الأصلية كتبت بواسطة ™TheEnd™ عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

شكرا على الشرح

العفو

[™_ BodY _™]

nice thx for it :goof:

[iMido]

ممتاز يا برنس

[Best__wizard]

شكرا على الردود

[CHeeToS]

تسلم يامعلم

[AhmedDiesel]

كلام زي الفل بس الواحد هيعمله
اذا مش فاهم Fundamental ولا كأنه فهم حاجة

اقتراح

انت تشرح Fundamental احسن وتسيب الاعضاء هما الي يعملو مواضيع

فتره الكوبي خلاص راحت لحالها

عاوزين الناس الزاي تعمل الحاجة من غير ما تنقلها

وشكرا اذا كنت اطالت عليكم

[iMido]

المشاركة الأصلية كتبت بواسطة ahmeddiesel عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

كلام زي الفل بس الواحد هيعمله
اذا مش فاهم fundamental ولا كأنه فهم حاجة

اقتراح

انت تشرح fundamental احسن وتسيب الاعضاء هما الي يعملو مواضيع

فتره الكوبي خلاص راحت لحالها

عاوزين الناس الزاي تعمل الحاجة من غير ما تنقلها

وشكرا اذا كنت اطالت عليكم

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

و الدروس كلها كده :)

[FightToDie]

شــكـــرا يــا غــالــى

[mazenkhaled]

تسلم

[°•.♥ H3ll King ♥.•°]

Nice Topic

[™~Mody~™]

مشكــــــــــــــــــور

[{viper}]

مشكور

[Stǿρ_Iąm_Tǿρ]

تسلم : )