تعليمات هامة يرجى اتباعها عند مذاكرة مادة البرمجة الشيئيئة 3 + تمارين على الدوآل

[albt00l_]

السلام عليكم
كيفكم؟
بخصوص الاعلان الموجود بلوحه الاعلانات حق ماده البرمجه مستوى 3 الفصل 13 لم اجد ياليت اللي تحصله تضعه هنا وشكرا

[Mano.92]

بنااااااااات ادخلو على منتدى جامعة الدمام الرسمي بعدين اختارو كلية المجتمع باالقطيف أستاذه مها حاطه معلومات مهمة و طريقة المذاكرة والأشياء الي لازم نركز عليها ....الخ وكمان اسئلة الفصل 13 نفسها الي اعطتنياها أستاذه هيام بس حاذفه بعض الأسئلة . والله يوفقكم .:love080::106::119: *

[Sara Ali]

تعليمات
http://forum.ud.edu.sa/vb/showthread.php?2979-تعليمات-هامة-يرجى-اتباعها-عند-مذاكرة-مادة-البرمجة-الشيئيئة-3
مراجعة على الدوال
http://forum.ud.edu.sa/vb/showthread.php?2980-تمارين-مراجعة-على-الدوال-الموجودة-للفصل-13مادة-البرمجة-الشيئية-3
ملف تمارين المراجعة للفصل 13
http://forum.ud.edu.sa/vb/showthread.php?2982-ملف-تمارين-المراجعة-لمادة-البرمجة-الشيئية-3

[أخـُفيْ غلآهـــأآ..]

تمارين مراجعة على الدوال الموجودة للفصل 13مادة البرمجة الشيئية 3

[LEFT][SIZE=5]طالبتي العزيزة
راجعي الدوال في الفصل الثالث عشر أولا ثم اقرئي الأمثلة الموجودة في الكتاب ومن ثم ابدئي في حل التمارين الموجودة في هذا الملف
مع تمنياتي لكن بالتوفيق
طالبتي العزيزة أرجو تنفيذ هذه الجمل البرمجية (الشفرات)
على جهازك لمعرفة الناتج الصحيح لكل منها
إذا كتبت الجمل الآتية وتم تنفيذ البرنامج ما هي النتيجة دون شرح.

1- MID("what is your name?",7)
.................................................. ....................

2- "what is your name?".substring(7)
.................................................. .....

3- Ucase(mid("happy week end",2,8))
.................................................. ....................
4- Dim pass As String = "124_abc+r"
If pass.indexof("n") < 0 Then
MsgBox(pass.remove(6))
Else
Beep()
End If
................................................
5- "haow you".insert(5,"are ")
..............................................
6- MyText =StrComp("TafTaf","TafTaf", CompareMethod.Text)
...................................نتيجة الدالة
7- Dim test As String = "abc"
If Len(test) - 1 > 0 Then
MsgBox(Mid(test, Len(test) - 1))
End If
ما محتوى الرسالة ..............................................
8-Label1.Text = String.Concat("Are", "You", "Happy?")
…………………………………………………………
9- msgbox(ASC("Apple"))
...................................محتوى الرسالة
10- Dim reat As String = "s_logn"
For i = 1 To reat.Length - 2
MsgBox("السلام عليكم")
Next


كم مرة تنفذ الحلقة وتظهر الرساله .........................
ماهو الناتج لهذه الجملة 11

Len(Mid( "Open new file",10,4)) = label1.text
.................................................. ................
ماهو الناتج لهذه الجملة 12
Dim X As Integer
X = TextBox1.Text.IndexOf("/")
TextBox1.Text = TextBox1.Text.Remove(X, 1)
إذا كان مربع النص يحتوي على النص MR\ Mohamed Aly
.................................................. ..................
13 - الجملة ("welcome in vb.net",Mid(“I am Agirl”,8,1)) Instr تعيد :
‌أ. 9
‌ب. 8
‌ج. 1
‌د. -1

14- السطر البرمجي الذي يعيد أربع أحرف من السلسلة النصية "This is VB.NET Test" بداية من الحرف الثانى هو:
‌أ. "welcome in vb studio 2008".Insert(2,4)
‌ب. "welcome in vb studio 2008".Substring(2,4)
‌ج. Substring("welcome in vb studio 2008",2,4)
Insert("welcome in vb studio 2008",2,4)

15- الجملة ("welcome in vb.net",Mid(“I am Agirl”,8,1)) Instr تعيد :
‌ه. 9
‌و. 8
‌ز. 1
‌ح. -1

16 - السطر البرمجي الذي يعيد أربع أحرف من السلسلة النصية "This is VB.NET Test" بداية من الحرف الثانى هو:
‌د. "welcome in vb studio 2008".Insert(2,4)
‌ه. "welcome in vb studio 2008".Substring(2,4)
‌و. Substring("welcome in vb studio 2008",2,4)
Insert("welcome in vb studio 2008",2,4)

17- ما هى الدالة البرمجية المناسبة التى تكتب مكان الفراغ لاكمال الشفرة الاتية Label1.text=.....(65) ويكون الناتج هو حرف A
‌أ. Chr
‌ب. Asc
‌ج. Char
‌د. ANSI

أوجدي مخرج كل شفرة مما يلى دون شرح الشفرة:
18 Sub x()
Dim str As String = "This is VB.NET Test"
Dim insStr As String = "Insert "
Dim strRes As String = str.Insert(15, insStr)
MsgBox(strRes)
End Sub
إذا استدعي الروتين السابق بالجملة x() فما هو مخرج الروتين .
………………………………………………

19
Function Total(x as integer, ByVal y as integer, z as integer )
Dim Sum As Integer Sum = x + y + z
If Sum > 20 Then
Sum = Sum + 3
Else
Sum = Sum / 2
End If
Return(int(sum))
End Function
إذا تم استدعاء الدالة بالجملة الآتية فما نتيجة تنفيذ الإجراء :
MsgBox(Total(5,3,7))
………………………………………………………………………

20
label1.text= StrComp ("The Test”,”The TestS”, CompearMethod.Text)
………………………………………………………………………

طالبتي
راجعي الدوال أولا ثم اقرئي الأمثلة الموجودة في الكتاب ومن ثم ابدئي في حل التمارين الموجودة في هذا الملف

[أخـُفيْ غلآهـــأآ..]

1. تعليمات هامة يرجى اتباعها عند مذاكرة مادة البرمجة الشيئيئة 3

إعلان هام إلى طالبات السنة الثانية من أستاذة مها حماد
( أستاذة مادة البرمجة3 )
السلام عليكم وتمنياتي لكن بالتوفيق في اختبار المادة
طالباتي
سيغطي الاختبار
الفصول العاشر و الثالث عشر و الرابع عشر
صيغة الاختبار
اختاري الإجابة الصحيحة لكل مما يلي
صح أم خطأ
ماهو ناتج الشفرة
عند المذاكرة أرجو مراعاة الآتي :
الفصل العاشر
(أرجو مذاكرة الفصل كاملا النظري + العملي + تمارين العملي التي تم إعطاؤها لكن من قبل أستاذات العملي مع التركيز على )
1. مراجعة تعريف الـ module الوحدة النمطية و كيفية إنشائها و حذفها و التعديل فيها
2. مراجعة تعريف نوعي الإجراءات و هما الـ function و الـ sub
3. و مراجعة تعريف الإجراءات العامة
4. واستخدام العبارة public للإعلان عن المتغير العام في البرنامج
5. الجزء النظري الذي تم توضيحه في عرض البوربوينت للفصل الثالث عشر
الفصل الثالث عشر
(أرجو مذاكرة الفصل كاملا النظري + العملي + تمارين العملي التي تم إعطاؤها لكن من قبل أستاذات العملي مع التركيز على )
1. معرفة الطرق الثلاثة المستخدمة لفتح الملفات النصية وهي :
a)
My فضاء الأسماء
_ read all text الطريقة
b) Stream reader الفئة
close الطريقة _ readtoend الطريقة
c) استخدام الـ openfiledialog
الدوال fileOpen , fileClose , lineInput, EOF
2
. انشاء ملف نصي جديد على القرص
3. string الفئة
4. الدوال
5. العمل مع شفرات الآسكي
ملاحظة هامة
ابتداء من الصفحة 380 و حتى نهاية الفصل الثالث عشر هذا الجزءغير مقرر
الفصل الرابع عشر
(أرجو مذاكرة الفصل كاملا النظري + العملي + تمارين العملي التي تم إعطاؤها لكن من قبل أستاذات العملي مع التركيز على )
1. كيفية اضافة نموذج جديد عن طريق قائمة project أو الشفرة
2. كيفية اضافة أدوات على الفورم باستخدام الشفرة
3. كيفية ضبط الخصائص للفورم و الأدوات باستخدام الشفرة
4. التعريفات النظرية التي تم عرضها في العرض أثناء المحاضرة
5. معرفة تعريف الخصائص التالية و مثال بسيط على كل خاصية
6. STARTPOSITION
7. DESKTOPBOUNDS
8. DIALOGRESULT (الكتاب صفحة 401 )
9. MAXIMISEBOX
10. WINDOWSTATE
11. MAXIMUMSIZE
12. DOCK
13. ANCHOR
14. وبقية ما تم شرحه في المحاضرة و عرضه على البوربوينت
مع تمنياتي للجميع بالتوفيق

[مكه]

يعطيك الف عافية ماقصرتي والله ...

وبالتوفيق ان شاء الله للجميع .. :106:

[أمبراطورة الذوق]

مشكورين:d5:

[albt00l_]

مشكوووووريييين

[Mano.92]

مشكوووورين :106:

[مسويه دفره]

السلام عليكم ورحمة الله وبركاته

بناااااات بليييييييييز اللي حلت اسئلة مراجعة الدوال الله يوفقها تنزلهم لي

حاولت احلهم بس طلعت بدون نتيجه





؟؟؟؟؟؟؟؟؟

[أخـُفيْ غلآهـــأآ..]

السلام عليكم ورحمة الله وبركاته



بناااااات بليييييييييز اللي حلت اسئلة مراجعة الدوال الله يوفقها تنزلهم لي

حاولت احلهم بس طلعت بدون نتيجه






؟؟؟؟؟؟؟؟؟


يدمج مع

تعليمات هامة يرجى اتباعها عند مذاكرة مادة البرمجة الشيئيئة 3 + تمارين على الدوآل (http://www.ckfu.org/vb/t255595.html)

[مسويه دفره]

محد حلهم يعني؟؟؟؟؟؟؟؟؟؟؟؟:Cry111:

[لامعه في سمائها]

مشكوين عل نقل ملاحظات الاستاذه يعطيكم العافيه

[همس**]

بنات بليززز الي حلت الفصل الثالث عشر تنزل الاجووبه
ماعندي فيجوول على جهازي بللللللللللللللللليز ارجووكم

[زهآآري]

هذا ملفات الحل بس اذا فيه شي خطاء

مايخصني هع :(269):

ان شاء الله افيدكم

[أمبراطورة الذوق]

يعطيك العافيه ...:d5:

[همس**]

متشكرين اووووي:106::106:

[Mano.92]

Thanks:106: