الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كود غير مفهوم

مغلق
بدأه mahmoodx5 في 10 سبتمبر 2006 · 2 رد · 644 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

مرحبا إخواني

لديناالكود التالي

Public Class Form1
	Dim m As Integer
	Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles search.Click
		m = 0

		For Each a As Char In Textbox.Text
			If a = lettersch.Text Then
				m = m + 1

			End If
		Next
		Label1.Text = m
	End Sub

ولم أفهم التالي منه 

For Each a As Char In Textbox.Text

وما وظيفة next

وأرجو شرح خاصة for each

وجزاكم الله كل الخيييييييييييييييييييييييييييييييييييييييييييييييييييييييير

_____________________________________________

mahmoodx522@maktoob.com & mahmoodx522@hotmail.com

وأفضل الناس مابين الورى رجـل :) :) تقضى على يده للناس حـــــــاجات

لا تمنعن يد المعروف عن أحد إن :) :) كنت مقتدرا فالسعد تــــــــــــــارات

قد مات قوم وما ماتت مــكارمهـم :) :) وعاش قوم وهم في الناس أموات

#3

السلام عليكم

إنّ جملة التكرار "لكل عنصر في" For Each.. Next جديدة نوعا، وهي تقوم بوظيفة جملة "من إلى" العاديّة، ولكنّها لا تأخذ بداية ونهاية.. إنّ هذه الجملة خاصّة بالمجموعات Collections، تلك الكائنات التي يحتوي كلّ منها على مجموعة من العناصر من نوع ما، ويوضع اسم هذه المجموعة بعد كلمة In في رأس جملة "لكل عنصر في".

وتقوم جملة "لكل عنصر في" بالمرور على عناصر المجموعة واحدا بعد الآخر، وفي كل مرّة، يتم وضع هذا العنصر في متغيّر الجملة التكراريّة (ذلك الذي يلي كلمة Each)، والذي بالطبع يجب أن يكون من نوع عناصر المجموعة.

و وظيفة الأمر Next هي الانتقال إلى العنصر التالي في المجموعة التي وضعتها حيث في الكود الذي وضعته تعمل Next على الانتقال إلى الحرف (char) التالي في المجموعة إلى أن تنتهي عناصر هذه المجموعة

ملاحظة : إن الكلمة each تقرأ كما قلت لك أخي إيتش و ليس إيك

بالتوفيق

هذا الموضوع مغلق.

مواضيع مشابهة