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

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

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

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

 
 
أدوات الموضوع ابحث في الموضوع انواع عرض الموضوع
  #121  
قديم 20-02-2013, 01:06 PM
مدرس . كمبيوتر مدرس . كمبيوتر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2012
المشاركات: 101
معدل تقييم المستوى: 12
مدرس . كمبيوتر 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 )
  #122  
قديم 20-02-2013, 03:02 PM
tmrmsr tmrmsr غير متواجد حالياً
عضو ممتاز
 
تاريخ التسجيل: Aug 2012
المشاركات: 303
معدل تقييم المستوى: 12
tmrmsr is on a distinguished road
Smile

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

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

استفسار اخر

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

هو مش المفروض اصلا ان قيمة تاريخ الميلاد ثابتة ولا تتغير طيب ليه استخدمنا فى الاول الامر Dim هل هناك غرض من ذلك
  #124  
قديم 20-02-2013, 06:39 PM
tmrmsr tmrmsr غير متواجد حالياً
عضو ممتاز
 
تاريخ التسجيل: Aug 2012
المشاركات: 303
معدل تقييم المستوى: 12
tmrmsr is on a distinguished road
Smile

اقتباس:
المشاركة الأصلية كتبت بواسطة مدرس . كمبيوتر مشاهدة المشاركة
استفسار اخر

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

هو مش المفروض اصلا ان قيمة تاريخ الميلاد ثابتة ولا تتغير طيب ليه استخدمنا فى الاول الامر dim هل هناك غرض من ذلك
الاعلان عن الثابت أو المتغير يتوقف على أساس تحليل متطلبات النظام وطبيعة البرنامج
لو تاريخ الميلاد يخص شخص واحد فقط استخدم ثابت مثلا
لو تاريخ الميلاد يخص أكثر من واحد استخدم متغير مثلا
  #125  
قديم 20-02-2013, 08:40 PM
مهندس رضا مهندس رضا غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: May 2008
المشاركات: 110
معدل تقييم المستوى: 17
مهندس رضا is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة مدرس . كمبيوتر مشاهدة المشاركة
استفسار اخر

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

هو مش المفروض اصلا ان قيمة تاريخ الميلاد ثابتة ولا تتغير طيب ليه استخدمنا فى الاول الامر Dim هل هناك غرض من ذلك
التاريخ قد يكون ثابت أو متغير مثال :
1- التاريخ الذي يحسب علية السن في 1-10 يكون ثابت لكل المدرسة
const dateoctober as date =#1/10/2012#
2- و قد يكون التاريخ متغير مثل تاريخ ميلاد كل طالب يختلف عن الاخر مثلا
Dim birthdate as Date

  #126  
قديم 21-02-2013, 10:35 AM
tmrmsr tmrmsr غير متواجد حالياً
عضو ممتاز
 
تاريخ التسجيل: Aug 2012
المشاركات: 303
معدل تقييم المستوى: 12
tmrmsr is on a distinguished road
Icon114

اقتباس:
المشاركة الأصلية كتبت بواسطة مهندس رضا مشاهدة المشاركة
التاريخ قد يكون ثابت أو متغير مثال :
1- التاريخ الذي يحسب علية السن في 1-10 يكون ثابت لكل المدرسة
const dateoctober as date =#1/10/2012#
2- و قد يكون التاريخ متغير مثل تاريخ ميلاد كل طالب يختلف عن الاخر مثلا
dim birthdate as date

مثال جيد وشكرا لك
  #127  
قديم 21-02-2013, 11:52 AM
مدرس . كمبيوتر مدرس . كمبيوتر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2012
المشاركات: 101
معدل تقييم المستوى: 12
مدرس . كمبيوتر 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 وتركنا للتخمينات
  #128  
قديم 21-02-2013, 06:48 PM
مهندس رضا مهندس رضا غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: May 2008
المشاركات: 110
معدل تقييم المستوى: 17
مهندس رضا is on a distinguished road
افتراضي

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

قيمة m=3
لأن مربع الرسالة قبل كلمة next
  #130  
قديم 21-02-2013, 08:18 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
المشاركات: 4,644
معدل تقييم المستوى: 21
سيف سالم 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 - لا شئ مما سبق )
  #131  
قديم 21-02-2013, 08:30 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
المشاركات: 4,644
معدل تقييم المستوى: 21
سيف سالم is on a distinguished road
افتراضي

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

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

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

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

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

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

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

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

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

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

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

الاجابة (0 - 2 - overflow - لا شئ مما سبق )
  #135  
قديم 21-02-2013, 09:01 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
المشاركات: 4,644
معدل تقييم المستوى: 21
سيف سالم is on a distinguished road
افتراضي سؤال موازي لاسئلة الكتاب والتى يوضح انه لا يوجد اجابة صحيحة في السؤال الاصلي

الفصل الثاني السؤال الخامس رقم 4
Dim a As Integer = 7
Dim b As Integer = 9
MsgBox(a & "x" & b & "=" & " " & a * b)1
اختر الاجابة الصحيحة بعد التنفيذ
1- axb=63
2- 7x9=63
3- 7x9=a*b
4- 7x9= 63
 

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

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


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

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

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


جميع الأوقات بتوقيت GMT +2. الساعة الآن 09:23 PM.