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

[ تمت الإجابة ]كود آله حاسبه ,,

بدأه إشراقة فجر في 21 نوفمبر 2008 · 10 رد · 824 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

عندي كــــــــود آله حاسبه ,,

وماعرفت كود للعمليه الأس

وكيف الحفظ في الميموري والمسح من الميموري ؟؟

ما فهمت قصد الدكتوور هل أتعامل مع إيقونه الحفظ على أنها متغيـــــر ولا كيـــــــف ؟؟

وهـــــــذا كـــــــــودي

	Private Sub equal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles equal.Click

		Select Case OP
			Case "+"
				T1.Text = A + Val(T1.Text)
			Case "-"
				T1.Text = A - Val(T1.Text)
			Case "*"
				T1.Text = A * Val(T1.Text)
			Case "\"
				T1.Text = A \ Val(T1.Text)
			Case "^"
		.....................................؟؟؟؟
		End Select
	End Sub

ساااااااااااااااااااااااااااااعدووني ,,

الله يجزاكم ألف خيييييييييييير ,,

آخر موعد للتسليم اليوم ,,

تم تعديل هذه المشاركة بواسطة إشراقــه فجــر في 21 نوفمبر 2008 في 17:47

سبحآن الله وبحمده .. سبحآن الله العظيم .. ,

#2

اليووم آخــــــــــــر يووم للتسليم ,,

سااااااعدوني الله يوفقكم ,,,

سبحآن الله وبحمده .. سبحآن الله العظيم .. ,

#3
  1. Case "^"
  2. T1.Text = A ^ Val(T1.Text)
  3.  

سبحان الله وبحمده ... سبحان الله العظيم

#4
اقتباس
ما فهمت قصد الدكتوور هل أتعامل مع إيقونه الحفظ على أنها متغيـــــر ولا كيـــــــف ؟؟

إيقونة الحفظ :wacko: .. والله من طيب أصل التعليم .. طالبة بالكلية تدرس تخصص حاسب آلي .. ما تعرف تصمم آله حاسبه ولا عندها فكره عن المتغيرات .

المشكله العضمى لو كانت مستوى ثالث .. وفي الاخير مشروع التخرج يطلع برنامج لعرض ملف فيديو فقط .

نورت المحكمه يا باشا ..

تم تعديل هذه المشاركة بواسطة العقده في 21 نوفمبر 2008 في 19:06

ليس كل ما يتمناه المرء يدركه

arabteam2000.gif

#5

انا حليته بهالطريقه

  Private Sub equal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles equal.Click
		Dim i As Integer = 1
		Dim x As Integer = 1
		Select Case OP
			Case "+"
				T1.Text = A + Val(T1.Text)
			Case "-"
				T1.Text = A - Val(T1.Text)
			Case "*"
				T1.Text = A * Val(T1.Text)
			Case "\"
				T1.Text = A \ Val(T1.Text)
			Case "^"
				For i = 1 To T1.Text

					x = x * A

				Next i
				T1.Text = x
		End Select

End Sub

وما كنت أعرف ان لغه الفيجول ما تعترض ع الاس مثل لغه السي

الله يجزآآآآآآآآآآك ألف خيييييييير ,,

تم تعديل هذه المشاركة بواسطة إشراقــه فجــر في 21 نوفمبر 2008 في 19:07

سبحآن الله وبحمده .. سبحآن الله العظيم .. ,

#6
العقده كتب:
إيقونة الحفظ :wacko: .. والله من طيب أصل التعليم .. طالبة بالكلية تدرس تخصص حاسب آلي .. ما تعرف تصمم آله حاسبه ولا عندها فكره عن المتغيرات .

المشكله العضمى لو كانت مستوى ثالث .. وفي الاخير مشروع التخرج يطلع برنامج لعرض ملف فيديو فقط .

نورت المحكمه يا باشا ..

مشكوووره ع الــرد

تم تعديل هذه المشاركة بواسطة إشراقــه فجــر في 21 نوفمبر 2008 في 19:44

سبحآن الله وبحمده .. سبحآن الله العظيم .. ,

#7

بالنسبة لأيقونة الحفظ ، يمكن تخزين القيمة في متغير .. والرجوع إليها عند الحاجة كما هو الحال مع الحاسبة التي تأتي مع الويندوز

post-28945-1227284672_thumb.jpg

تم تعديل هذه المشاركة بواسطة المبرمج أحمد في 21 نوفمبر 2008 في 19:24

سبحان الله وبحمده ... سبحان الله العظيم

#8
المبرمج أحمد كتب:
بالنسبة لأيقونة الحفظ ، يمكن تخزين القيمة في متغير .. والرجوع إليها عند الحاجة

وهذا اللي سويته

وخلاص أرسلت الوآآجب للدكتــــــــور ,,,

الله يجزآآآآآآآك ألف خيييير ,,

سبحآن الله وبحمده .. سبحآن الله العظيم .. ,

#9

عندك مشكلة في كود عملية القسمة ، لمزيد من التوضيح جربي الكود التالي ولاحظي الفرق بين العمليتين :

  1. MsgBox 4 / 3
  2. MsgBox 4 3 
  3.  

في السطر الثاني يتم التخلص من الفواصل العشرية أي أن الناتج فقط 1 بينما في السطر الأول الناتج 1.33333333

تم تعديل هذه المشاركة بواسطة المبرمج أحمد في 21 نوفمبر 2008 في 19:31

سبحان الله وبحمده ... سبحان الله العظيم

#10

مشكووووور ع التووضيح

ما أنتبهت لها

والله يوفقك دنيا وآخره ,,,

بس مشكله قد أرسلت للدكتور ,, إن شاء الله ما ينتبه لها ..

تم تعديل هذه المشاركة بواسطة إشراقــه فجــر في 21 نوفمبر 2008 في 19:49

سبحآن الله وبحمده .. سبحآن الله العظيم .. ,

#11

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

تمت الإجابة على الموضوع

إدارة الفريق العربي للبرمجة

سبحان الله وبحمده ... سبحان الله العظيم

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