|
أشكرك أستاذ حسن علي ردك و اهتمامك
بارك الله لك أخوك سمير صبري |
ياريت حد يضيف تحضير الفصل الدراسي الثاني للصف الثالث الإعدادي ويكون تحضير معتمد
|
صح او خطأ
لا يجوز ان يحتوي الاسم علي الشرطي السفلي(خطأ) أكمل علامة .الشرطة السفلي.. توضع في نهاية سطر الكود لكتابة الكود علي اكثر من سطر تخير يبدأ اسم المتغير بــ ( الشرطة السفلي - كلمة محجوزة - حرف - كل من الاختيار الاول والثالث صحيح ) الاسطر التي تبدأ بــ ......... او ...... تسمي ملاحظات او تعليقات ويهملها المترجم عند ترجمة كود البرنامج أ - Dim أو As ب - Const أو Dim ج - (‘) أو Rem د - Rem أو Dim __________________ |
المثال ده محتاج أجابة بالشرح الوافى جزاكم الله كل خير ولكن الأن
C = 10 For N = 1 To 10 Step 5 K = K + N Next IF N >= C Then C = C + 1 End IF |
اذا ذكرت قيمة العداد بعد الحلقة التكرارية فأنها تأخذ القيمة الأعلى من End
و هنا العداد N بعد Next أى بعد نهاية الحلقة فكانت القيم داخل الحلقة ( 1 , 6 ) و قيمته بعد Next ستكون بزيادة 5 و هى (11) و بالتالى فى الشرط (N > = C) ستكون N تساوى 11 و C تساوى 10 فيكون قيمة الشرط (True) و سيتم تنفيذ ما بعد (Then) أى (C= C + 1) و ستكون c تساوى 11 و هذا المثال الوحيد الذى تم فيه ذكر العداد بعد Next |
في البداية عند For ثيمة العداد تساوي واحد فيبدأ التكرار حتى نصل إلي Next فنويد قية N بمقدار 5 فتصبح 6 ونقارن هل هي أكبر من قيمة النهاية فالاجابة خطأ فيتم تنفيذ التكرار مرة أخرى حتي نصل إلي Next فنويد N بمقدار 5 فتصبح 11 ونقارن هل هي أكبر من قيمة النهاية فالاجابة صحيحة فينتهي التكرار ويبدأ بتنفيذ الاوامر التي تلي Next وبذلك تصبح n تساوي 11
|
اقتباس:
|
لا ن 11 اكبر من قيمة نهايه العداد وهى 10 وايضا عدد مرات التكرار 2 فقط وبالتوفبق |
استفسار وتوضيح للاستاذ تامر
علمنا ان الدالة Isnumeric من الدوال المعرفة والتى لها ناتج True او False حسب محتوى مربع الكتابة سواء اذا كان عددى ام حرفى واذا كان عددى تاخذ الدالة القيمة True غير ذلك تأخذ القيمة False ولكن بتنفيذى لهذ الكود Dim a As Boolean MsgBox(IsNumeric(a)) أعطى ناتج True مع العلم ان المتغير a ليس له ناتج عددى بل ناتجه منطقى فما تفسير ذلك وجزاكم الله خيراً |
تحية طيبة لحضرتك
تحية طيبة لحضرتك
أما بعد Dim a As Boolean ((MsgBox(IsNumeric(a حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له بناء علية يأخذ القيمة الأفتراضية True عند استخدام الدالة IsNumeric الوسيط a وتستقبله على شكل Object ( عددي - حرفي - ...الخ) تستخدمه الدالة في أسطر الكود الخاصة بها وهي مخفية عنا وفقا لقاعدة التغليف وذلك لتقييمة هل هو قيمة رقمية أم لا وبناء عليه تم اعتبار a كقيمة رقمية مثال عند عمل تحويل للقيمة True ل Integer تأخذ القيمة -1 عند عمل تحويل للقيمة false ل Integer تأخذ القيمة 0 وهذا لا يعني أن الدالة IsNumeric تقوم بهذا النوع من التحويل Parameters: Expression: Required. Object expression. Return Values: Returns a Boolean value indicating whether an expression can be evaluated as a number. وشكرا |
الخير كل الخير لكم ان شاء الله
|
الخير كل الخير لك ان شاء الله ولكل اعضاء المنتدى
|
اقتباس:
أستاذنا العزيز شكرا لحضرتك لكن لى تعليق و هو خاص بالعبارة حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له بناء علية يأخذ القيمة الأفتراضية True و الأدق هو من وجهة نظرى حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له بناء علية يأخذ القيمة الأفتراضية False Dim x as Boolean MsgBox(x)0 قيمة المتغير x التى تظهر فى مربع الرسالة هى False عاطف حسان / ميت موسى |
Dim sum, x As Integer sum = 0 x = 6 Do While x < 10 s um= s um+ x x = x + 1 Loop عدد مرات التكرار وياريت الشرح بشء من التفصيل |
اقتباس:
IsNumeric returns True if the data type of Expression is Boolean, Byte, Decimal, Double, Integer, Long, SByte, Short, Single, UInteger, ULong, or UShort, or an Object that contains one of those numeric types. It also returns True if Expression is a Char or String that can be successfully converted to a number. IsNumeric returns False if Expression is of data type Date or of data type Object and it does not contain a numeric type. IsNumeric returns False if Expression is a Char or String that cannot be converted to a number. هذه هي الدالةبدون تغليف او فلسفة لانتصار لرأي |
اقتباس:
IsNumeric لها حالات true وحالات false من بين حالات ال true هي boolean وخير الكلام ما قل ودل بس الان على رأي اخوك الاستاذ حسن. سمك لبن تمر هندي |
محتاج شرح الدالة و الإجراء
نلجأ للإعلان عن دالة Function فى حالة إذا ما كان لدينا Code سينتج ( تعود ) منه قيمة نحتاجها
يعني اية ينتج منه قيمة نحتاجها الإجراء Sub لا يمكن تخصيص قيمة لها ، وإنما تستدعى باسمها فتنفذ الأوامر التى بها ، ليس لها قيمة مخزنة فى الذاكرة لأنها لا تعود بقيمة وليس لها ناتج ليس لها نوع بيان Data Type لأنها لا تعود بقيمة لا يجوز أن تكتب فى أى جمل تخصيص نهائياً قد يكون لها وسائط ومعاملات قد تكون قيم مجردة أو متغيرات أو ثوابت أو دوال تكتب فى سطر أوامر بحد ذاتها الدالة Function لا يمكن تخصيص قيمة لها ، وإنما تستدعى باسمها فتنتج قيمة تخزن بها يمكن استخدام القيم المخزنة بها فى الذاكرة و لها ناتج لها نوع بيان Data Type هو نفس نوع بيان القيمة الراجعة تكتب فى جمل التخصيص على يمين معامل التخصيص فقط ، لأنها لا يخصص لها قيمة قد يكون لها وسائط ومعاملات قد تكون قيم مجردة أو متغيرات أو ثوابت لا يجوز أن تكتب كما هى فى سطر أوامر بحد ذاتها انا مش فاهم الكلام دا ارجوكم محتاج شرح ضروري |
اقتباس:
- إذا تم الإعلان عن متغير من النوع Boolean ولم يخصص له قيمة فإن قيمته الافتراضية تكون False - إذا تم اختبار متغير من النوع Boolean باستخدام الدالة IsNumeric فإن الناتج في حالة قيمته True أو False يكون True وذلك لأن القيمة True أو القيمة False تعتبر قيمة عددية مع هذه الدالة. وللجميع وافر التقدير والاحترام |
تستخدم جملة Select Case فى حالة اختبار أكثر من تعبير شرطى بجملة شرطية واحدة. (صح ) لو سمحتوا حد يوضح لى هذه العبارة وللجميع وافر التقدير والاحترام |
اقتباس:
تصحيح القيمة الأفتراضية false |
اقتباس:
|
اقتباس:
الجملة الشرطية Conditional Statement يقصد بها جملة Select Case أو جملة If التي من خلالها يحدث التفرع. Conditional Statements Conditional statements allow conditional execution of statements based on expressions evaluated at run time. ConditionalStatement ::= IfStatement | SelectStatement من كتاب "Visual Basic Language Specification 10.0" التي تحتوى على تعبير expression أو أكثر الذي يلي كل كلمة Case والذي يتم اختباره حتى ينفذ الكود الذي يليه او لا ينفذ ثم ينتقل للتعبير التالي في حالة لا وفي حالة نعم ينفذ الكود الذي يلية ثم يتفرع إلى ما بعد جملة select case موضع السؤال اذا السؤال : تستخدم جملة (Select Case) فى حالة اختبار أكثر من تعبير شرطى بجملة شرطية واحدة إجابتة تكون صح من يريد المزيد من التفاصيل استخدم العبارة "Conditional statements" في عملية البحث وشكرا |
:av4056bb7jp3:كلمة else اجبارية افتراضية حيث:
1- اجبارية : حيث الجملة If ..then ..else.. وليست if ..then حتى تكون اختيارية 2- افتراضية : حيث تفترض شرط غير مكتوت بعد كلمة else عكس الشرط الذى بعد if ولذلك كلمة elseاحبارية افتراضية فى جملة If ..then ..else |
السلام عليكم أرجوا الجواب علي السؤال الآتي وتوضيحه بارك الله فيكم وهو في كتاب المدرسة في الفصل الرابع القيمة الراجعة للدالة (Area) هى (Single) كما هو موضح فى إعلانها : Function Area(ByVal radius As Single) As Integer. هل هي صح أم خطأ مع التوضيح بوركتم |
:av4056bb7jp3:كلمة else اجبارية افتراضية حيث:
1- اجبارية : حيث الجملة If ..then ..else.. وليست if ..then حتى تكون اختيارية 2- افتراضية : حيث تفترض شرط غير مكتوت بعد كلمة else عكس الشرط الذى بعد if ولذلك كلمة elseاحبارية افتراضية فى جملة If ..then ..else:av4056bb7jp3: |
:av4056bb7jp3:كلمة else اجبارية افتراضية حيث:
1- اجبارية : حيث الجملة If ..then ..else.. وليست if ..then حتى تكون اختيارية 2- افتراضية : حيث تفترض شرط غير مكتوت بعد كلمة else عكس الشرط الذى بعد if ولذلك كلمة elseاحبارية افتراضية فى جملة If ..then ..else:av4056bb7jp3: |
اقتباس:
1- اجبارية : حيث الجملة If ..then ..else.. وليست if ..then حتى تكون اختيارية 2- افتراضية : حيث تفترض شرط غير مكتوت بعد كلمة else عكس الشرط الذى بعد if ولذلك كلمة elseاحبارية افتراضية فى جملة If ..then ..else:av4056bb7jp3: |
اقتباس:
Function Area(ByVal radius As Single) As Integer وانما ناتج الدالة من النوع Single ( أى نوع البيان) أما ناتج الدالة كما فى باقى المثال هو ناتج مضروب العددres :bosyht9: |
اقتباس:
:bosyht9: |
اقتباس:
مكتوب في السؤال نصا هكذا القيمة الراجعة للدالة (Area) هى (Single) كما هو موضح فى إعلانها : Function Area(ByVal radius As Single) As Integer. ( ) فهل هي خطأ أم صح مع التوضيح |
اقتباس:
Dim r As Integer = 1 Do While r <= 1 r = r + 2 Loop MsgBox(r) الشرط فى الحالة الأولى صحيح r <= 1 حيث قيمة r=1 فتتغير قيمة r وتزيد بمقدار 2 وتصبح 3 وعند التحقق من الشرط للمرة الثانية يكون الشرط خطا فلا يحدث التكرار وتصبح قيمة r النهائية 3 وتظهر فى مربع الرسالة ويكون الاختيار من بين الاجابات (0-2-overflow) وتكون الاجابة هى overflowحيث هى قيمة أكبر من 0 أو 2 :022yb4: |
اقتباس:
رايت السؤال فى الكتاب العبارة خطا حيث نوع البيان للدالة هو integer Function Area(ByVal radius As Single) As Integer أما وسائط الدلة هى من النوع Single :av4056bb7jp3: |
Dim sum, x As Integer sum = 0 x = 6 Do While x < 10 s um= s um+ x x = x + 1 Loop عدد مرات التكرار وياريت الشرح بشء من التفصيل |
اقتباس:
يا أخت منى هى الاجابة فعلا overflow ولكن ليس للسبب الذى ذكرتيه لان r=r-2 فيظل الشرط true إلى أن يصل إلى مدى أكبر من مدى النوع integer فيحدث خطـأ من النوع runtime error فيكون الناتج overflow |
نوع البيان للدالة او بمعنى اخر نوع البيان القيمة الراجعة دائما بكون مثل
نوع وسائط الدلة و لكم كل الشكر |
1- تستخدم الإجراءات Sub فى طرفى جملة التخصيص أما الدوال Functions لا يجوز استخدامها فى أى جملة تخصيص.
2- الإجراء Sub لا يعود بأى قيمة أما الدالة Function تعود بقيمة. 3- يشترط عند الإعلان عن الإجراءات Procedures أن تستخدم وسيط واحد على الأقل Parameter 4- وسيط الإجراء Procedure إما أن يكون قيمة مجردة أو متغير Variable أو ثابت Constant أو دالة Function محتاج شرح للاسئلة |
السؤال الرابع ص 98 الفصل الرابع المفروض ازاي بيسأل علي اسم الاجرا وهي دالة
السؤال الرابع : استخرج من الكود Code الآتى : Function Area(ByVal radius As Single) As Single Const x As Single = 22 / 7 Dim res As Single res = x * radius ^ 2 Return res End Function 1 – اسم الإجراء : 2 – وسائط هذا الإجراء : 3 – القيمة الراجعة : 4 – نوع البيان الخاص بـ : أ – الدالة : ب – وسيط الدالة : ج – القيمة الراجعة : |
– اسم الإجراء : هنا Function
2 – وسائط هذا الإجراء : مايكتب بين القوسين بعد ByVal وهنا وسيط واحد هو radius 3 – القيمة الراجعة : ماتكتب بعد Return وهنا اسمها res 4 – نوع البيان الخاص بـ : أ – الدالة : هو نفسه نوع البيان الخاص بـ القيمة الراجعة وهو Single ب – وسيط الدالة : ماياتى بعد اسم الوسيط وهو مايكتب بين القوسين بعد ByVal ونوعه هنا Single ج – القيمة الراجعة : وهى مايكتب بعد As ونوعه هنا Single ايضا وبالله التوفيق |
اقتباس:
ممكن شرح الاسئلة والف الف شكر علي الاجابة |
1- تستخدم الإجراءات Sub فى طرفى جملة التخصيص أما الدوال Functions لا يجوز استخدامها فى أى جملة تخصيص.
هذه العبارة خطأ والعكس صحيح الدوال Functions تستخدم فى طرف جملة التخصيص الايمن فقط مثال ( 8) label1.text=isnueric الدالة فى الطرف الايمن و الإجراءات Sub لا يجوز استخدامها فى أى جملة تخصيص. راجع جملة التخصيص 2- الإجراء Sub لا يعود بأى قيمة أما الدالة Function تعود بقيمة. يعني االإجراء Sub لايرجع لنا قيمة جديدة وانما يقوم بتنفيذ مايطلب منه فقط اما الدالة تقوم بارجاع قيم مختلفة عن القيم التي تحدد للوسائط مثل عملية جمع او ضرب هكذا تاحذ قيم والناتج مختلف 3- يشترط عند الإعلان عن الإجراءات Procedures أن تستخدم وسيط واحد على الأقل Parameter لانه يعرض وبالتالى لابد من ادخال مايتم عرضه 4- وسيط الإجراء Procedure إما أن يكون قيمة مجردة أو متغير Variable أو ثابت Constant أو دالة Function اي ان الوسيط قد يكون قيمة مجردة يحدد له اى رقم مثل (5,6)sum أو متغير اى كتابة اسماء متغيرات بدل من الارقام مثل x,y Function مثل( ( )messagebox.show (now الوسيط هنا دالة وبالله التوفيق |
نوع البيان للدالة او بمعنى اخر نوع البيان القيمة الراجعة دائما بكون مثل
نوع وسائط الدلة و لكم كل الشكر |
يا جماعه محتاج تفسير بسيط منكم للسؤال ده :
في الكتاب المدرسي بيقول ان ()now تعتبر داله في حين اني لما وقفت عليها في البرنامج كتب انها خاصية وفي المنهج القديم كان بيقول انها خاصيه تابعه للتكوين date يعني هيا خاصية ولا داله وهل من الممكن ان تكون الداله خاصية او العكس |
افادكم الله
|
سؤال
ضع علامة صح او خطأ
استخدام else اختيارى فى جملة if |
اقتباس:
صـــــــــــــــــــــــح وبالتوفيق |
مواعيد امتحانات المحافظات أرجو التثبيت
نرجو من السادة رواد المنتدى وضع مواعيد المحافظات
موعد محافظة الدقهلية هو : السبت 18/5/2013 اللغة العربية الاحد 19/5 لغة انجليزية + حاسب الى الاثنين 20/5 جبر + دين الثلاثاء 21/5 هندسة + تربية فنية الاربعاء 22/5 العلوم الخميس 23/5 الدراسات |
اقتباس:
الإجابة خطأ فقط اللي يكون إختياري في جملة " If " يمكن كتابة جملة " If "في سطر واحد بدون كلمة " End If " ويكون مثلا الكود : http://im42.gulfup.com/cmMM8.png هنا في المثال لم أستخدم " End If " |
ارجو الرد بسرعة
ارجو من السادة الافاضل حد يقولى ايه هى فائدة الدالةFunction فى المثال الخاص بجمع رقمين استخدم المتغير first والمتغير last كوسيط وأعلن عنهم على مستوي التصنيف
عند استدعاء الدالة : ليه اعلن عن متغيراتx,y ومستخدمش first, last |
ارجو الرد بسرعة
فى الدالة Function المثال الخاص بجمع رقمين استخدم المتغير first , last كوسيط وتم الاعلان عنهم على مستوى التصنيف فى الدالة ولكن عند استدعاء الدالة ليه أعلن عن المتغير x , y ومستخدمش المتغير first , last
ارجو الايضاح |
الغربية الأحد 19/5 موعد امتحان الحاسب
|
| جميع الأوقات بتوقيت GMT +2. الساعة الآن 07:54 PM. |
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.