السلام عليكم ورحمة الله وبركاتة
لدي TextBox بة نصوص وعلامات استفهام
اريد ان اعرف كم علامة استفهام في الـ TextBox بمجرد الضغط على Button
فيأتي بعدد علامات الاستفهام في msgbox
وجزاكم الله خير
السلام عليكم ورحمة الله وبركاتة
لدي TextBox بة نصوص وعلامات استفهام
اريد ان اعرف كم علامة استفهام في الـ TextBox بمجرد الضغط على Button
فيأتي بعدد علامات الاستفهام في msgbox
وجزاكم الله خير
تم تعديل هذه المشاركة بواسطة Yemen VB6 في 14 مارس 2008 في 16:03
رُب ( وامعتصماه ) إنطلقت *** ملْء أفـواه الصبايا اليُتـم
لامـسـت أسْـماعـهـم لاكـنهـا *** لمْ تلامس نخْوة المعتصم
إحدى الطرق لعمل ذلك باستخدام Linq هو كما يلي
بفرض لدينا نموذج يحتوي على صندوق نصوص مسمى TextBox1 وفيه النص
How ?????? much ??
يمكننا الحصول على عدد علامات الاستفهام بكل سهولة باستخدام كود Linq التالي
Dim i = From s In Me.TextBox1.Text.ToCharArray _ Where s = "?" MsgBox(i.Count)
عن عائشة رضي الله عنها أن النبي صلى الله عليه وسلم قال: إن الله يحب إذا عمل أحدكم عملا أن يتقنه
نعيب زماننا والعيب فينا ... وما لزماننا عيب سوانا
ونهجو ذا الزمان بغير ذنب ... ولو نطق الزمان لنا هجانا
محمد سامر أبو سلو
مشرفنا جزاك الله على الرد لكن هناك خطاء بالكود ارجوا تصحيحة
مع العلم انني حاولت ان اعملها بالـ Len لكن لم اتوصل لنتيجة مرجوة
ارجوا منك التاكد من الكود اللى كتبتة .
رُب ( وامعتصماه ) إنطلقت *** ملْء أفـواه الصبايا اليُتـم
لامـسـت أسْـماعـهـم لاكـنهـا *** لمْ تلامس نخْوة المعتصم
ليس هناك أخطاء بالكود الذى تفضل وقدمه الأستاذ محمد ولكن هذا الكود لا يعمل الا مع الأصدار 2008 ولا يعمل مع 2005 ولا 2003
ويمكنك ان تستخدم على سبيل المثال دالة Split فهذه الدالة قوية ويكون الكود مثلاً كالتالى
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim str() As String = Split(TextBox1.Text, "?") TextBox2.Text = str.Length - 1 End Sub
على أساس ال Textbox1 هو الذى يحتوى على علامات الأستفهام ضع هذا الكود فى Button وعند الضغط عليه يظهر لك فى ال textbox2 عدد حروف الأستفهام
كل من فى الوجود يطلب صيداً :::: غير ان الشباك مختلفات
جزاكم الله خير وجعلكم ذخراً للأمة
شكرا استاذي اشرف شكرا مشرفنا
رُب ( وامعتصماه ) إنطلقت *** ملْء أفـواه الصبايا اليُتـم
لامـسـت أسْـماعـهـم لاكـنهـا *** لمْ تلامس نخْوة المعتصم
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…