طلبات الأعضاء للعام الدراسي 2012-2013

[سيف سالم]

الموضوع عايز بحث كبير
واطلاع اكثر
وحيث ان المادة ستكون نشاط
اري تأجيل المناقشات وانا على يقين
انه لن يكون هناك اي اختلاف بعد الان
وستكون الحياة التكنولوجية والبرمجية المصرية بنى بنى بنى
وان النهضة التى ستشهدها مصر في عالم تعليم الكمبيوتر لاطفال وشباب مصر
قد تفوق بعشرات المرات النهضة الكهربائية التى نعيشها الان
اللهم وفق الرئيس د محمد مرسي الى ما يفرضه عليه مستشاري وزير التربية والتعليم
وسنحيا كراما

[hassanalhawy]

إنا لله وإنا إليه راجعون

[MR : ABO BATTA]

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

الموضوع عايز بحث كبير

واطلاع اكثر
وحيث ان المادة ستكون نشاط
اري تأجيل المناقشات وانا على يقين
انه لن يكون هناك اي اختلاف بعد الان
وستكون الحياة التكنولوجية والبرمجية المصرية بنى بنى بنى
وان النهضة التى ستشهدها مصر في عالم تعليم الكمبيوتر لاطفال وشباب مصر
قد تفوق بعشرات المرات النهضة الكهربائية التى نعيشها الان
اللهم وفق الرئيس د محمد مرسي الى ما يفرضه عليه مستشاري وزير التربية والتعليم

وسنحيا كراما

قدر الله وما شاء فعل
وله سبحانه الأمر من قبل ومن بعد

[tmrmsr]

المشاركة الأصلية كتبت بواسطة hass****hawy

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

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim total As Short
Dim first, Second As Byte
first = 255
Second = 1
total = first + Second
MsgBox(total)
End Sub

ولكن ما علاقة ناتج الجمع 256 بالـ Byte
هل هذا له علاقة بكيفية معالجة البيانات داخل المعالج .؟
وإذا كان الأمر كذلك فهل هذه المعالجة لها إمتداد فى الذاكرة ؟
وهل عملية الإستدعاء من الذاكرة قبل المعالجة لها تأثير فى عملية التخزين؟
نريد توضيح لأن الأمر مبهم

256 خارج الحد
التعليمات تتم وفقا للمترجم Compiler الخاص باللغة وكذلك وفقا لما يقوم به Jit Compiler وكله باستخدام المعالج
الذي يدير الذاكرة الفرام ورك عن طريق CLR
وهذة المشاكل نتجت نتيجة اعتماد المبرمج على التحويل الضمني الذي يوفره لغة الفيجوال بيزيك
على عكس لغة C# لذلك كثير يفضلونها عن الفيجوال بيزيك

[tmrmsr]

المشاركة الأصلية كتبت بواسطة hass****hawy

وممكن توضح بنفس الكيفية ما الذى يحث عند تنفيذ الكود التالى

function sum(byval first as byte, byval second as short) as byte
dim total as short
total = first + second
return total

end function

private sub button1_click(byval sender as system.object, byval e as system.eventargs) handles button1.click
msgbox(sum(255, 1))

end sub

عملية التخصيص للمتغير Total سوف تتم بنجاح
لكن عملية التحويل من Short إلى Byte
لن تنجح بسبب تخطي القيمة للحد ونجد الخطأ يظهر عند سطر Return

[سيف سالم]

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

1- يجوز الإعلان عن متغير أو غيره نوع بيانه يختلف عن نوع بيان الدالة ثم نجعله القيمة الراجعة (Value)
2- عندما تستقبله الدالة عند استدعائها يتم تحويله لنفس نوع بيان الدالة
حيث أن الدالة Sum نوع بيانها Byte وتم استخدام المتغير Total المعلن في نطاق الدالة Sum بنوع بيان Short كقيمة راجعة

3- عند استدعاء الدالة Sum في نطاق معالج الحدث الخاص ب Button1
تم تخصيص قيمة للوسيط الأول والوسيط الثاني أكبر من مدى نوع بيان الدالة وهذا لا يجوز فيتسبب في خطأ Runtime
منها نخلص
عند استدعاء الدالة لابد من تخصيص قيم من نفس نوع بيان وسائط الدالة أو يمكن تحويلها لهذا النوع وأن تكون في مدى القيم المسموح بها
الإعلان عن الدالة سليم لكن الاستدعاء لم يلتزم بمواصفات الدالة (مجازا)

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

في زر Button 2
تم تخصيص قيمة من خلال ناتج تعبير 255+1
التي هي في حدود نطاق مدى نوع المتغير

لذلك عرضت الرسالة
ولم يحدث خطأ

لكن في زر Button1
المتغير استقبل القيمة لأنها تناسبه لكن عند تحويلها لنوع بيان الدالة القيمة أصبحت خارج نطاق نوع بيان الدالة
فحدث خطأ Overflow
وشكرا

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

معذرة
ناتج الجمع وعند التحويل لنوع بيان الدالةbyte

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

الأمر يحتاج لبحث واطلاع امهلني بعض من الوقت

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

الخطأ حدث عن تنفيذ السطر total = First + second
بسبب عندما يتم جمع قيمة المتغير First الذي نوعه Byte والمتغير Second الذي نوع Byte
ناتج الجمع يتم تمثيله أيضا في شكل Byte
وبما أن ناتج الجمع أكبر من الحد المسموع يحدث خطأ Runtime

لو القيمة في الحد المسموح يتم تحويل الناتج الذي نوعه Byte إلى Short
ليخزن في المتغير Total

ثم يتم تحويل المتغير Total إلى Byte ويرجع للدالة

وحلا لهذا الوضع
قم بعمل تحويل صريح
total =CShort( First) +CShort ( second)

ستجد الخطأ يظهر في سطر Return Total

اولا نتوجه بالشكر للاستاذ تامر
"تم تخصيص قيمة للوسيط الأول والوسيط الثاني أكبر من مدى نوع بيان الدالة وهذا لا يجوز فيتسبب في خطأ Runtime"
هل هذا استنتاج ام مسند الى رأي علمى
"المتغير استقبل القيمة لأنها تناسبه"
طبعا المتغير لم يستقبله من الاساس رغم ان القيمة تناسبة تماما ولم تتخطى المدى short
"حدث عن تنفيذ السطر total = First + second
بسبب عندما يتم جمع قيمة المتغير First الذي نوعه Byte والمتغير Second الذي نوع Byte
ناتج الجمع يتم تمثيله أيضا في شكل Byte
وبما أن ناتج الجمع أكبر من الحد المسموع يحدث خطأ Runtime "
طبعا ناتج الجمع 256 يناسب النوع short تماما بعكس ما ذكرتم وحدث الخطأ وهذا هو المطلوب تفسيره لماذا لم يقبل النوع short تخزين 256 التى تناسب معه
"لو القيمة في الحد المسموح يتم تحويل الناتج الذي نوعه Byte إلى Short
ليخزن في المتغير Total"
القيمة 256 في الحد المسموح للمكان التى ستخصص له total
وحلا لهذا الوضع
نحن لا نريد حلا ولكن نريد تفسير ليه متغير يرفض قبول قيمة مسموح بها في نطاقه في مكان ويقبلها في مكان اخر

طبعا الهدف ليس سوى الوصول الصح ايه
هل ما بعد return القيمة الراجعة نوعها هو النوع ما بعد as في تعريف الدالة ام لا

[سيف سالم]

المشاركة الأصلية كتبت بواسطة hass****hawy

ماذا تقصد بهذا التفسير

طبعا التفسير
كان فسر
2+1=4
لما نيجى نفسر هكذا
صيغة عملية الجمع صحيحة ولا غبار عليها
حيث تم جمع عدد مع عدد فيكون الناتج عدد لان عملية الدمج عملية مغلقة
ولكن قيمة 1+2 ليست هي دي القيمة 4
هل هذا تفسير
طبعا دا اسمه لف ودوران
وسفسطة فقط ولا غير
اما التفسير
يكون هكذا
1+2=4
عملية حسابية خاطئة
فقط ولاغير وبكل بساطة

[سيف سالم]

Function procedure performs a task and then returns control to the calling code. When it returns control, it also returns a value to the calling code.
Each time the procedure is called, its statements run, starting with the first executable statement after the Function statement and ending with the first End Function, Exit Function, or Return statement encountered.
You can define a Function procedure in a module, class, or structure. It is Public by default, which means you can call it from anywhere in your application that has access to the module, class, or structure in which you defined it.
A Function procedure can take arguments, such as constants, variables, or expressions, which are passed to it by the calling code.

Declaration Syntax

The syntax for declaring a Function procedure is as follows:
[modifiers] Function functionname[(parameterlist)] As returntype
' Statements of the Function procedure.
End Function
The modifiers can specify access level and information regarding overloading, overriding, sharing, and shadowing. For more information, see Function Statement (Visual Basic).
You declare each parameter the same way you do for Sub Procedures.
Data Type

Every Function procedure has a data type, just as every variable does. This data type is specified by the As clause in the Function statement, and it determines the data type of the value the function returns to the calling code. The following sample declarations illustrate this.
Copy Code Function yesterday() As Date End Function Function findSqrt(ByVal radicand As Single) As Single End Function
For more information, see "Parts" in Function Statement (Visual Basic).


Returning Values

The value a Function procedure sends back to the calling code is called its return value. The procedure returns this value in one of two ways:

• It assigns a value to its own function name in one or more statements of the procedure. Control does not return to the calling program until an Exit Function or End Function statement is executed. The following example illustrates this.
  Function functionname[(parameterlist)] As returntype
  ' The following statement does not transfer control back to the calling code.
  functionname = expression
  ' When control returns to the calling code, expression is the return value.
  End Function
• It uses the Return statement to specify the return value, and returns control immediately to the calling program. The following example illustrates this.
  Function functionname[(parameterlist)] As returntype
  ' The following statement immediately transfers control back to the calling code and returns the value of expression.
  Returnexpression
  End Function

The advantage of assigning the return value to the function name is that control does not return from the procedure until it encounters an Exit Function or End Function statement. This allows you to assign a preliminary value and adjust it later if necessary.
For more information, see "Return Value" in Function Statement (Visual Basic).
Returning Arrays

If the Function procedure returns an array data type, you cannot access the individual elements of the array within the function. If you attempt to do this, the compiler interprets it as a recursive call to the procedure. The following example illustrates this.
Function allOnes(ByVal n As Integer) As Integer()
For i As Integer = 1 To n - 1
' The following statement generates a COMPILER ERROR.
allOnes(i) = 1
Next i
' The following statement generates a COMPILER ERROR.
Return allOnes()
End Function
In the preceding example, the compiler interprets the attempted assignment allOnes(i) = 1 as a call to allOnes on the left side of an assignment statement. It interprets the attempted Return allOnes() as a call with no argument. Both statements generate compiler errors.


Calling Syntax

You invoke a Function procedure by including its name and arguments either on the right side of an assignment statement or in an expression. You must provide values for all arguments that are not optional, and you must enclose the argument list in parentheses. If no arguments are supplied, you can optionally omit the parentheses.
The syntax for a call to a Function procedure is as follows:
lvalue = functionname[(argumentlist)]
If ((functionname[(argumentlist)] / 3) <= expression) Then
When you call a Function procedure, you do not have to use its return value. If you do not, all the actions of the function are performed, but the return value is ignored. MsgBox is often called in this manner.
Illustration of Declaration and Call

The following Function procedure calculates the longest side, or hypotenuse, of a right triangle, given the values for the other two sides.
Visual Basic Copy Code Function hypotenuse(ByVal side1 As Single, ByVal side2 As Single) As Single Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2)) End Function

The following example shows a typical call to hypotenuse.
Visual Basic Copy Code Dim testLength, testHypotenuse As Single testHypotenuse = hypotenuse(testLength, 10.7)



Visual Basic Runtime Functions

The Visual Basic runtime provides many functions, located in the Microsoft

ms-help://MS.VSCC.v90/MS.msdnexpress.v90.en/dv_vbalr/html/1b9f632c-553b-4cb6-920a-ded117ead8c0.htm

طبعا
مين حيفهم كلام بتاع الشركة المنتجة
تحس انهم بيكتروا الكلام علشان يكون كلامهم كتير
الغريبة في الامر رغم كتر كلام الشركة المنتجة بلا لازم لم تثار نقطة الاختلاف بيننا نحن من يستخدم المنتج - لسنا من انتجنا ولن يحدث في ظل وزيرنا ومستشاريه -
بس لفت نظري الالوان السابقة
من يجيد الترجمة
او على الاقل
يكون فهمة متوسط باللغة الانجليزي
علشان ان فهمتها بالشبه
ممكن تفسير لمثلي الذي ياخذها بالشبه

[سيف سالم]

المشاركة الأصلية كتبت بواسطة hass****hawy

الغريب أن نوع بيان المعاملات First و second يؤثر فى مكان حدوث الخطأ
فعندما يكون نوع بيان المعاملات First و second نفس نوع بيان الدالة وهو Byte يحدث الخطأ عند الأمر total = First + second
و عندما يكون نوع بيان المعاملات First و second نفس نوع بيان القيمة الراجعة total وهو مثلاً Short يحدث الخطأ عند الأمر Return total

فعندما يكون نوع بيان المعاملات First و second نفس نوع بيان الدالة وهو Byte يحدث الخطأ عند الأمر total = First + second
لماذا لا تفسر هكذا
فعندما يكون نوع بيان المعاملات First و second نفس نوع بيان الدالة وهو Byte يحدث الخطأ عند الأمر total = First + second لانه لايمكن التخزين في نوع مغاير الا هو نوع المتغير داخل الدالة

اما

و عندما يكون نوع بيان المعاملات First و second نفس نوع بيان القيمة الراجعة total وهو مثلاً Short يحدث الخطأ عند الأمر Return total
تفسر هكذا
و عندما يكون نوع بيان المعاملات First و second مغايرنوع بيان الدالة وهو Byte ومتفق مع نوع بيان المتغير داخل الدالة total وهو مثلاً Short يحدث الخطأ عند الأمر Return total لانه ليس نوع بيان الدالة byte

[tigerload]

[QUOTE=سيف سالم;5289582]سؤال نرجو الرد عليه مع التفسير

Public Class Form1


Function Sum(ByVal First As Byte, ByVal second As Byte) As Byte
Dim total As Short
total = First + second
Return total

End Function

مع خالص تقديري للاراء ولاكن الصورة المرفقة موضحة المشكلة ولا ادري لما الجدال
1- لاحظ التظليل اتي اين في الصورة اتى على السطر الخاص بجملة التخصيص
total = First + second
مع سطر اعلان الدالة
Function Sum(ByVal First As Byte, ByVal second As Byte) As Byte
تمام
2 - وقال ان الخطأ overflow تمام
نوضح
انت جمعت byte + byte وخصصته في short تمام
ورجعت ال Short ل byte تمام
لحد هنا عادي
بس لما تستخدم قيم تعدي الحد بتاع الدالة byte لن يستطيع المترجم تحويلها ضمنيا كما في التخصيص العادي : - إزاي تحط مثلا 2 لتر في ازازة 1 لتر مثلاً ماشي الحال
عشان كدة المترجم علملك على سطر الجمع وظللك بالرصاصي سطر اعلان الدالة عشان يقلك خلي بالك انت معلن ايع وجا تخصص ايه
فين بقى القيمة overflow ؟
فين طبعا في سطر التخصيص
عشان كدة علملك عليه اصفر وقالك overflow مع سطر الاعلان عشان طلاحظ الي انت اخطأته كأنه بيقلك متصحى يا عم انت نايم خلي بالك
وشكراً
أخوكم سعد

[سيف سالم]

[QUOTE=tigerload;5292797]

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

سؤال نرجو الرد عليه مع التفسير

Public Class Form1


Function Sum(ByVal First As Byte, ByVal second As Byte) As Byte
Dim total As Short
total = First + second
Return total

End Function

مع خالص تقديري للاراء ولاكن الصورة المرفقة موضحة المشكلة ولا ادري لما الجدال
1- لاحظ التظليل اتي اين في الصورة اتى على السطر الخاص بجملة التخصيص
total = First + second
مع سطر اعلان الدالة
Function Sum(ByVal First As Byte, ByVal second As Byte) As Byte
تمام
2 - وقال ان الخطأ overflow تمام
نوضح
انت جمعت byte + byte وخصصته في short تمام
ورجعت ال Short ل byte تمام
لحد هنا عادي
بس لما تستخدم قيم تعدي الحد بتاع الدالة byte لن يستطيع المترجم تحويلها ضمنيا كما في التخصيص العادي : - إزاي تحط مثلا 2 لتر في ازازة 1 لتر مثلاً ماشي الحال
عشان كدة المترجم علملك على سطر الجمع وظللك بالرصاصي سطر اعلان الدالة عشان يقلك خلي بالك انت معلن ايع وجا تخصص ايه
فين بقى القيمة overflow ؟
فين طبعا في سطر التخصيص
عشان كدة علملك عليه اصفر وقالك overflow مع سطر الاعلان عشان طلاحظ الي انت اخطأته كأنه بيقلك متصحى يا عم انت نايم خلي بالك
وشكراً
أخوكم سعد

نشكر الاستاذ سعد
يعنى تقصد الجهاز بيقولك انك اخطأت لان short ليس هو نوع القيمة الراجعة وان نوع القيمة الراجعة هو byte

[برنس القومية]

انا من الاسكندرية و كان السؤال الاخير احابته النموذجية

السؤال الرابع
1- Case 0

2- Case Is < 0

3- Case Is > 0 او Case Else

4- End Select



انا عملت 1 - Case Degree=0


2- Case degree <0

3-Case Degree >0

4-End Selcect

فهل ده ينقصني درجة و نص و انا متاكد ان مفيش اخطاء تانية في الامتحان علشان لو دة صح اعمل اعادة تصحيح بعد اذنكم

[mandoohassan]

شكررررررررررررررررررررررررررررا

[hassanalhawy]

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

طبعا
مين حيفهم كلام بتاع الشركة المنتجة
تحس انهم بيكتروا الكلام علشان يكون كلامهم كتير
الغريبة في الامر رغم كتر كلام الشركة المنتجة بلا لازم لم تثار نقطة الاختلاف بيننا نحن من يستخدم المنتج - لسنا من انتجنا ولن يحدث في ظل وزيرنا ومستشاريه -
بس لفت نظري الالوان السابقة
من يجيد الترجمة
او على الاقل
يكون فهمة متوسط باللغة الانجليزي
علشان ان فهمتها بالشبه
ممكن تفسير لمثلي الذي ياخذها بالشبه

آسف أستاذ / سيف و أستاذ / تامر
على عدم مشاركتى فى اليومين السابقين بسبب إنقطاع الإنترنت

[سيف سالم]

المشاركة الأصلية كتبت بواسطة hass****hawy

آسف أستاذ / سيف و أستاذ / تامر
على عدم مشاركتى فى اليومين السابقين بسبب إنقطاع الإنترنت

مبارك عودة النت

لو ممكن تعلق على كلام بتاع الشركة المنتجة
او على الاقل ترجمتع
وكذالك الملاحظ

اما الاستاذ تامر كلامه تناقض
مرة شمال ومرة يمين