منتدى فيجوال بيسك لكل العرب
[VB.NET] جمعه مباركه عليكم استفسار بسيط - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] جمعه مباركه عليكم استفسار بسيط (/showthread.php?tid=30691)



جمعه مباركه عليكم استفسار بسيط - bakriano30@yahoo.com - 02-08-19

السلام عليكم ورحمه الله اعضاء المنتدي الكرام 
لو انا عندي في الفورم ريتش بوكس وليبل كيف يتم احتساب عدد المسافات في الجمله المكتوبه واظهار العدد في الليبل


RE: جمعه مباركه عليكم استفسار بسيط - سامي محمد - 02-08-19

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

كود :
 Label1.Text = RichTextBox1.Text.Split(Space(1)).Count - 1



RE: جمعه مباركه عليكم استفسار بسيط - bakriano30@yahoo.com - 02-08-19

(02-08-19, 02:16 PM)سامي محمد كتب : وعليكم السلام ورحمة الله وبركاته

كود :
 Label1.Text = RichTextBox1.Text.Split(Space(1)).Count - 1

شكرا جدا اخي سامي هذا هو المطلوب طيب لو عايز عند وصول عدد معين في الليبل يظهر رساله مثلا عندما يكون الليبك وصل لي رقم 10 يظهر رساله كيف ذلك


RE: جمعه مباركه عليكم استفسار بسيط - سامي محمد - 02-08-19

كود :
 If RichTextBox1.Text.Split(Space(1)).Count - 1 >= 10 Then
            MessageBox.Show("عدد المسافات (10) ")
        End If
        Label1.Text = RichTextBox1.Text.Split(Space(1)).Count - 1
اذا كان العدد عشرة فما فوقها ستظهر الرسالة


RE: جمعه مباركه عليكم استفسار بسيط - bakriano30@yahoo.com - 02-08-19

(02-08-19, 02:28 PM)سامي محمد كتب :
كود :
 If RichTextBox1.Text.Split(Space(1)).Count - 1 >= 10 Then
            MessageBox.Show("عدد المسافات (10) ")
        End If
        Label1.Text = RichTextBox1.Text.Split(Space(1)).Count - 1
اذا كان العدد عشرة فما فوقها ستظهر الرسالة

اوفيت شرحك علي اكمل وجه شكرا لك اخي سامي Heart Heart Heart