اهلا وسهلا بك فى بوابة الثانوية العامة ... سجل الان

العودة   بوابة الثانوية العامة المصرية > القسم الإداري > أرشيف المنتدى

أرشيف المنتدى هنا نقل الموضوعات المكررة والروابط التى لا تعمل

مشاهدة نتائج الإستطلاع: هل تريد البرنامج المقرر Visual Basic 2008 express
نعم أريدة وأحتاجة 74 86.05%
لا شكراً غير مهم 12 13.95%
المصوتون: 86. أنت لم تصوت في هذا الإستطلاع

 
 
أدوات الموضوع ابحث في الموضوع انواع عرض الموضوع
  #1  
قديم 17-02-2013, 06:12 PM
الصورة الرمزية sir_belal
sir_belal sir_belal غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Feb 2009
المشاركات: 274
معدل تقييم المستوى: 17
sir_belal is on a distinguished road
افتراضي

5 درجات للنجاح
  #2  
قديم 17-02-2013, 06:41 PM
أحمد هاشم الزيدي أحمد هاشم الزيدي غير متواجد حالياً
معلم حاسب ألى
 
تاريخ التسجيل: Feb 2009
المشاركات: 14,659
معدل تقييم المستوى: 31
أحمد هاشم الزيدي will become famous soon enough
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة fathy_oa مشاهدة المشاركة
ماهى درجة النجاح فى مادة الكمبيوتر للصف الثالث الإعدادى ؟
5 درجات للترم الأول و 5 دراجات للترم الثاني
المجموع عشرون درجة
درجة النحاح للترمين 10 درجات
__________________
كفي بالله سندا وكفي به هاديا وحبيبا وكفي به معطيا وكفي بالله عن كل شئ
  #3  
قديم 18-02-2013, 08:18 AM
abdalla177 abdalla177 غير متواجد حالياً
عضو جديد
 
تاريخ التسجيل: Jan 2011
المشاركات: 29
معدل تقييم المستوى: 0
abdalla177 is on a distinguished road
افتراضي

ممكن التحضير الالكتروني للصف الثالث الترم الثاني
  #4  
قديم 20-02-2013, 12:22 PM
مدرس . كمبيوتر مدرس . كمبيوتر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2012
العمر: 37
المشاركات: 101
معدل تقييم المستوى: 14
مدرس . كمبيوتر is on a distinguished road
افتراضي سؤااااااااااااااااااال عن الدوال ضرووووووورى

Function Sum ( Byval First as single , byval second as single ) as single
Dim total as single
Total = first + second
Return total
End function

ممكن كود استدعاء هذه الدالة
  #5  
قديم 20-02-2013, 12:50 PM
tmrmsr tmrmsr غير متواجد حالياً
عضو ممتاز
 
تاريخ التسجيل: Aug 2012
المشاركات: 303
معدل تقييم المستوى: 14
tmrmsr is on a distinguished road
Smile

[QUOTE=مدرس . كمبيوتر;5144954][LEFT][LEFT]Function Sum ( Byval First as single , byval second as single ) as single
Dim total as single
Total = first + second
Return total
End function


مثال لعملية الاستدعاء
Dim x as Single
x=sum(4,6)

MessageBox.show(x)
  #6  
قديم 20-02-2013, 01:06 PM
مدرس . كمبيوتر مدرس . كمبيوتر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2012
العمر: 37
المشاركات: 101
معدل تقييم المستوى: 14
مدرس . كمبيوتر is on a distinguished road
افتراضي

[QUOTE=tmrmsr;5144998]
اقتباس:
المشاركة الأصلية كتبت بواسطة مدرس . كمبيوتر مشاهدة المشاركة
[LEFT][LEFT]Function Sum ( Byval First as single , byval second as single ) as single
Dim total as single
Total = first + second
Return total
End function


مثال لعملية الاستدعاء
Dim x as Single
x=sum(4,6)

MessageBox.show(x)
شكرا استاذ تامر
طيب لو عملتها كدة صح
MessageBox.show(sum( 4 , 6 )
  #7  
قديم 20-02-2013, 03:02 PM
tmrmsr tmrmsr غير متواجد حالياً
عضو ممتاز
 
تاريخ التسجيل: Aug 2012
المشاركات: 303
معدل تقييم المستوى: 14
tmrmsr is on a distinguished road
Smile

[quote=مدرس . كمبيوتر;5145027]
اقتباس:
المشاركة الأصلية كتبت بواسطة tmrmsr مشاهدة المشاركة

شكرا استاذ تامر
طيب لو عملتها كدة صح
messagebox.show(sum( 4 , 6 )
صحيح
  #8  
قديم 20-02-2013, 05:53 PM
مدرس . كمبيوتر مدرس . كمبيوتر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2012
العمر: 37
المشاركات: 101
معدل تقييم المستوى: 14
مدرس . كمبيوتر is on a distinguished road
افتراضي

استفسار اخر

كتاب المدرسة اعلن عن تاريخ الميلاد على انه متغير باستخدام DIM فى ص 13
وبعد كدة فى ص 15 اعلن عنه على انه ثابت باستخدام CONST

هو مش المفروض اصلا ان قيمة تاريخ الميلاد ثابتة ولا تتغير طيب ليه استخدمنا فى الاول الامر Dim هل هناك غرض من ذلك
  #9  
قديم 02-03-2013, 05:55 PM
الثائر الحق1 الثائر الحق1 غير متواجد حالياً
معلم التعليم الثانوى التجارى
 
تاريخ التسجيل: Apr 2011
العمر: 43
المشاركات: 58
معدل تقييم المستوى: 15
الثائر الحق1 is on a distinguished road
افتراضي

مامعني ان الدالة تعود بقيمة راجعة وكيف يتم ذلك؟
  #10  
قديم 21-02-2013, 11:52 AM
مدرس . كمبيوتر مدرس . كمبيوتر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2012
العمر: 37
المشاركات: 101
معدل تقييم المستوى: 14
مدرس . كمبيوتر is on a distinguished road
افتراضي مثال كتب المدرسة ص 60 واحتمال تكرار مشكلة امتحان البحيرة

dim m as integer
for m = 1 to 3
msgbox ( m )
next

السؤال ياتى فى الامتحان بكذا طريقة
مثلا ناتج تنفيذ الكود السابق
مفيش مشكلة هنا هتكون m 1 2 3

2- ما قيمة المتغير m بعد انتهاء التكرار ( 2 - 3 - 4 )
ناس هتقول 3 عشان دى اخر قيمة ظهرت فى مربع الرسالة ، وناس تقول 4 لان دى القيمة اللى انتهى عندها التكرار

3- ما قيمة المتغير m التى توقف عندها التكرار ( 2 - 3 - 4 )
ناس هتقول 3 عشان دى اخر قيمة ظهرت فى مربع الرسالة وبعدها لم يكرر ، وناس تقول 4 لان دى القيمة اللى انتهى عندها التكرار وانهائه

وطبعا كتاب المدرسة جاب القيميتن القيمة 3 والقيمة 4 وتركنا للتخمينات
  #11  
قديم 21-02-2013, 06:48 PM
مهندس رضا مهندس رضا غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: May 2008
المشاركات: 110
معدل تقييم المستوى: 18
مهندس رضا is on a distinguished road
افتراضي

قيمة m تكون 4 بتجربة البرنامج على فيجوال بيزيك دوت نت .. بالتالي الحل يكون 4
  #12  
قديم 21-02-2013, 07:21 PM
يوسف محمود عبد المنعم يوسف محمود عبد المنعم غير متواجد حالياً
عضو جديد
 
تاريخ التسجيل: Mar 2010
المشاركات: 22
معدل تقييم المستوى: 0
يوسف محمود عبد المنعم is on a distinguished road
افتراضي

قيمة m=3
لأن مربع الرسالة قبل كلمة next
  #13  
قديم 24-02-2013, 01:11 PM
magdy3030 magdy3030 غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: May 2010
المشاركات: 98
معدل تقييم المستوى: 16
magdy3030 is on a distinguished road
افتراضي

44444444444444444444
  #14  
قديم 21-02-2013, 08:18 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
العمر: 57
المشاركات: 4,642
معدل تقييم المستوى: 22
سيف سالم is on a distinguished road
افتراضي سؤال موازي لاسئلة الكتاب والتى لم يتم شرحها وغير مقررة على الطلاب

الفصل الثالث السؤال الثالث رقم 2
ما اجابة السؤال الموازي
dim r as short = 1
do while r <=1
r=r-2
if r<-40000 then
r=2
end if
loop
msgbox(r)1
الاجابة (0 - 2 - overflow - لا شئ مما سبق )

ولو تم تعديل السؤال

dim r as short = 1
do while r <=1
r=r-2
if r<-30000 then
r=2
end if
loop
msgbox(r)1

الاجابة (0 - 2 - overflow - لا شئ مما سبق )
  #15  
قديم 21-02-2013, 08:30 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
العمر: 57
المشاركات: 4,642
معدل تقييم المستوى: 22
سيف سالم is on a distinguished road
افتراضي

ولو تم تعديل السؤال

dim r as double= 1
do while r <=1
r=r-2
loop
msgbox(r)1

الاجابة (0 - 2 - overflow - لا شئ مما سبق )
 

العلامات المرجعية

الكلمات الدلالية (Tags)
أبوزياد, اتفة الفصل الرابع وورد, شرح الترم الثاني فيديو

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

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

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

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

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


جميع الأوقات بتوقيت GMT +2. الساعة الآن 05:04 AM.