|
أرشيف المنتدى هنا نقل الموضوعات المكررة والروابط التى لا تعمل |
مشاهدة نتائج الإستطلاع: هل تريد البرنامج المقرر Visual Basic 2008 express | |||
نعم أريدة وأحتاجة |
![]() ![]() ![]() ![]() |
74 | 86.05% |
لا شكراً غير مهم |
![]() ![]() ![]() ![]() |
12 | 13.95% |
المصوتون: 86. أنت لم تصوت في هذا الإستطلاع |
|
أدوات الموضوع | ابحث في الموضوع | انواع عرض الموضوع |
#661
|
|||
|
|||
![]()
Dim A , B ,N As Integer
A=5 FOR N = 1 TO 8 STEP 2 B= A+N NEXT IF N >A A= A+1 END If المطلوب قيمة المتغير A , B , N , ناتج الشرط ؟؟ |
#662
|
|||
|
|||
![]()
قيمة a= 6 b= 17 n n=7 و قيمة الشرط True
|
#663
|
|||
|
|||
![]()
Dim x , sum As Integer
sum = 2 For x = 3 To 10 Step 3 sum = sum + 2 Next Msgbox ( sum وما هى اول قيمة للمتغير sum هل هى 2 أما 4 فى التكرار ؟؟ ومتى يتوقف التكرار ؟؟ ولماذا ؟؟ Dim M , Total As Integer M = 3 Total = 5 Do while M < 20 M = M + 3 Total = Total + 2 Loop Msg box ( Total ) ما هى قيمة كل من المتغيرين M .. Total بعد نهاية الحلقة التكرارية ؟؟ ولماذا ؟؟ أرجو الرد من السادة الأفاضل على وجه السرعة مع الشرح المفصل رجاء لوجه الله وشاكر لحضراتكم مجهوداكم وجزاكم الله كل الخير |
#664
|
|||
|
|||
![]()
portal.moe.gov.eg/AboutMinistry/Departments/ecd/quesbank/prep3/Documents/Answers_ChaptersQ.pdf
|
#665
|
|||
|
|||
![]()
أكتب المصطلح العلمى الدال على العبارات التالية
المسئولة عن معرفة القيمة الراجعة فى الإجراء Function - دالة معرفة تستخدم فى الخروج من الحلقات فى جملة Do….. While - خاصية تستخدم لتحديد ترتيب العنصر المحدد داخل أداة ListBox - الخاصية Interval نوع البيان لها ( string – Boolean – integer ) [IMG]file:///C:\DOCUME~1\NewLook\LOCALS~1\Temp\msohtml1\01\clip _image001.gif[/IMG] أكتب برنامج لطباعة الاعداد الفردية من صفر الى 25 وعرض كل قيمة فى سطر - القيمة العائدة للخاصية SelectedIndex قيمتها ( عددية – حرفية – منطقية) |
#666
|
|||
|
|||
![]()
تتبع الاوامر التالية ثم أجب :
Dim x, M, K As Integer Dim y As Integer = 4 For x = 1 To 5 If x <= y Then M = M + x Label1.Text = Label1.Text & M & vbCrLf End If Next K = M / x 1- قيمة المتغير M = ................2- قيمة المتغير K = ................. 3- قم بإعادة كتابة الكود السابق باستخدام جملة Do While |
#667
|
|||
|
|||
![]()
: تتبع البرنامج التالى ثم أجب :
Function Total(ByVal c As Integer) As Long Dim A As Integer = 12 Dim b As Integer = 5.8 Dim sum As Long If A > b And A < c Then sum = A + b + c - اسم الاجراء ...............- وسيط الاجراء .................. - نوع بيان الدالة ................. - القيمة الراجعة ................. - قيمة الدالة عند تنفيذ الكود التالى MsgBox(Total(5)) MsgBox(sum) Else A = 5 b = 15 c = 22 sum = A + b + c MsgBox(sum) End If Return Sum End Function |
#668
|
|||
|
|||
![]() اقتباس:
اجابات المجموعة الأولى 1 - Return 2 - Exit Do ولو ان صيغة السؤال خاطئة 3 - Selected Index 4 - Integer البرنامج Dim x as integer for x = 1 to 25 step 2 label1.text = label1.text & VBCRLF & X Next القيمة العائدة من الخاصية Selected Index قيمة عددية |
#669
|
||||
|
||||
![]() اقتباس:
Dim x, M, K As Integer Dim y As Integer = 4 x = 1 Do While x <= 5 If x <= y Then M = M + x Label1.Text = Label1.Text & M & vbCrLf End If x = x + 1 Loop K = M / x
__________________
يخطئ من يظن أن للذئاب ديناً
|
#670
|
||||
|
||||
![]() اقتباس:
قيمة الدالة عند تنفيذ الكود التالى MsgBox(Total(5)) هى 42
__________________
يخطئ من يظن أن للذئاب ديناً
|
#671
|
|||
|
|||
![]()
[QUOTE=التدريس مهنتى;5261187]Dim x , sum As Integer
sum = 2 For x = 3 To 10 Step 3 sum = sum + 2 Next Msgbox ( sum وما هى اول قيمة للمتغير sum هل هى 2 أما 4 فى التكرار ؟؟ ومتى يتوقف التكرار ؟؟ ولماذا ؟؟ Dim M , Total As Integer M = 3 Total = 5 Do while M < 20 M = M + 3 Total = Total + 2 Loop Msg box ( Total ) ما هى قيمة كل من المتغيرين M .. Total بعد نهاية الحلقة التكرارية ؟؟ ولماذا ؟؟ أرجو الرد من السادة الأفاضل على وجه السرعة مع الشرح المفصل رجاء لوجه الله وشاكر لحضراتكم وجزاكم الله كل الخير |
#672
|
|||
|
|||
![]()
متى يتوقف التكرار فى جملتى التكرار For ... Next ** Do while ... Loop Dim x , sum As Integer
sum = 2 For x = 3 To 10 Step 3 sum = sum + 2 Next Msgbox ( sum وما هى اول قيمة للمتغير sum هل هى 2 أما 4 فى التكرار ؟؟ ومتى يتوقف التكرار ؟؟ ولماذا ؟؟ Dim M , Total As Integer M = 3 Total = 5 Do while M < 20 M = M + 3 Total = Total + 2 Loop Msg box ( Total ) ما هى قيمة كل من المتغيرين M .. Total بعد نهاية الحلقة التكرارية ؟؟ ولماذا ؟؟ أرجو الرد من السادة الأفاضل على وجه السرعة مع الشرح المفصل رجاء لوجه الله وشاكر لحضراتكم مجهوداكم وجزاكم الله كل الخير |
#673
|
|||
|
|||
![]()
قبل التكرار تساوى 2
اول قيمه للمتغير sum بعد بداية التكرار هى 4 وبعد نهاية التكرار 8 يتوقف التكرار عندما تكون x بـ 12 لانه اكبر من قيمة النهايه قيمة M بعد نهاية التكرار هى 21 قيمة TOTAL بعد نهاية التكرار هى 17 |
#674
|
||||
|
||||
![]()
[QUOTE=التدريس مهنتى;5262423]متى يتوقف التكرار فى جملتى التكرار For ... Next ** Do while ... Loop Dim x , sum As Integer
sum = 2 For x = 3 To 10 Step 3 sum = sum + 2 Next Msgbox ( sum وما هى اول قيمة للمتغير sum هل هى 2 أما 4 فى التكرار ؟؟ ومتى يتوقف التكرار ؟؟ ولماذا ؟؟ Dim M , Total As Integer M = 3 Total = 5 Do while M < 20 M = M + 3 Total = Total + 2 Loop Msg box ( Total ) ما هى قيمة كل من المتغيرين M .. Total بعد نهاية الحلقة التكرارية ؟؟ ولماذا ؟؟ أرجو الرد من السادة الأفاضل على وجه السرعة مع الشرح المفصل رجاء لوجه الله وشاكر لحضراتكم مجهوداكم وجزاكم الله كل الخير[/QUOTE] اقتباس:
بارك الله لكم
__________________
يخطئ من يظن أن للذئاب ديناً
|
#675
|
||||
|
||||
![]() اقتباس:
N = 9 و B = 12 و A = 6 و ناتج الشرط True
__________________
يخطئ من يظن أن للذئاب ديناً
|
العلامات المرجعية |
الكلمات الدلالية (Tags) |
أبوزياد, اتفة الفصل الرابع وورد, شرح الترم الثاني فيديو |
|
|