InstagramTwitterSnapChat


 
وصف

العودة   منتديات سكاو > الكليات الجامعية > منتدى كــلــية الاقــتصاد والإدارة > قسم نظم المعلومات الإدارية والتسويق
   
   


هنا : تجمع طالبات وطلاب نظم المعلومات الإداريه (دفعة 2010 ) حياكم الله,,

قسم نظم المعلومات الإدارية والتسويق

 
 
أدوات الموضوع إبحث في الموضوع انواع عرض الموضوع
منتديات طلاب وطالبات جامعة الملك عبد العزيز منتديات طلاب وطالبات جامعة الملك عبد العزيز
قديم 15-03-2012, 01:06 AM   #11

ALEMBRA6OR

الصورة الرمزية ALEMBRA6OR

 
تاريخ التسجيل: Feb 2010
كلية: كلية الاقتصاد والادارة
التخصص: M.I.S
نوع الدراسة: إنتظام
المستوى: متخرج
البلد: جــــدة
الجنس: ذكر
المشاركات: 1,637
افتراضي رد: هنا : تجمع طالبات وطلاب نظم المعلومات الإداريه (دفعة 2010 ) حياكم الله,,

المشاركة الأصلية كتبت بواسطة امبراطور الشبكه مشاهدة المشاركة


اهااا صح .. طيب اوك بس ضيف ليبل ثاني , وعدل الكود .. كل الليبل 1 عدلها الى الليبل 2 في كامل الكود بأستثناء اخر وحده الي تساوي c لأن بنخلي تظهر فيها النتيجه هذي ..

كذا الكوود بيصير ../



public class form1
dim a, b, c as double
private sub button1_click(byval sender as system.object, byval e as system.eventargs) handles button1.click
a = val(textbox1.text)

label2.text = "+"


textbox1.text = ""
textbox1.focus()
end sub





private sub button2_click(byval sender as system.object, byval e as system.eventargs) handles button2.click
a = val(textbox1.text)

label2.text = "-"


textbox1.text = ""
textbox1.focus()
end sub


private sub button3_click(byval sender as system.object, byval e as system.eventargs) handles button3.click
a = val(textbox1.text)

label2.text = "*"


textbox1.text = ""
textbox1.focus()
end sub



private sub button4_click(byval sender as system.object, byval e as system.eventargs) handles button4.click
a = val(textbox1.text)

label2.text = "/"


textbox1.text = ""
textbox1.focus()
end sub



private sub button5_click(byval sender as system.object, byval e as system.eventargs) handles button5.click
b = val(textbox1.text)
textbox1.text = ""
if label2.text = "+" then
c = a + b
end if
if label2.text = "-" then
c = a - b
end if
if label2.text = "*" then
c = a * b
end if
if label2.text = "/" then
c = a / b
end if
if label2.text = "^" then
c = a ^ b
end if
label1.text = c.tostring

end sub

private sub form1_load(sender as system.object, e as system.eventargs) handles mybase.load

end sub
end class



وبالعكس ياغالي مافي تعب ,, بالعكس كذا احسن عشان نتعلم تمام اسألني اذا احتجت شي وانا بسألك اذا احتجت منك شي ..

بيض الله وجهك ومشكور والطريقة ممتازة .

جزاك الله خير يالسمي .

 

ALEMBRA6OR غير متواجد حالياً   رد مع اقتباس
 

 

أدوات الموضوع إبحث في الموضوع
إبحث في الموضوع:

البحث المتقدم
انواع عرض الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع

 


الساعة الآن 08:46 AM


Powered by vBulletin® Version 3.8.9 Beta 3
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Ads Organizer 3.0.3 by Analytics - Distance Education

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

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

2003-2025