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

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

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

مشاهدة نتائج الإستطلاع: هل تريد البرنامج المقرر 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
العمر: 36
المشاركات: 101
معدل تقييم المستوى: 13
مدرس . كمبيوتر 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
معدل تقييم المستوى: 13
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
العمر: 36
المشاركات: 101
معدل تقييم المستوى: 13
مدرس . كمبيوتر 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
معدل تقييم المستوى: 13
tmrmsr is on a distinguished road
Smile

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

شكرا استاذ تامر
طيب لو عملتها كدة صح
messagebox.show(sum( 4 , 6 )
صحيح
  #8  
قديم 20-02-2013, 05:53 PM
مدرس . كمبيوتر مدرس . كمبيوتر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2012
العمر: 36
المشاركات: 101
معدل تقييم المستوى: 13
مدرس . كمبيوتر 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
العمر: 36
المشاركات: 101
معدل تقييم المستوى: 13
مدرس . كمبيوتر 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. الساعة الآن 06:45 AM.