+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : التعرف على رقم الجوال (/showthread.php?tid=16425)
التعرف على رقم الجوال - فراس صلاح - 12-07-16
السلام عليكم ورحمة الله وبركاته
اخواني انا اصمم برنامج لإرسال رسائل ال SMS ولكن واجهتني مشكلة في حساب عدد أرقام الجوال الموجودة في التيكست بوكس وكما هو معروف فإن هناك أكثر من طريقة لإدخال رقم الجوال والطرق هي:-
00966 ---
05---
966--
طبعاً هذه الطرق في السعودية
الآن سؤالي هو كيف أجعل البرنامج يحصي أرقام الجوال الموجودة في التيكست بوكس مثلاً موجود في التيكست بوكس القيمة التالية
0534745266,966553322744
أريد البرنامج أن يعرض لي عدد الأرقام في ليبل وهي 2
أرجوكم من يعلم الطريقة يخبرني جزاكم الله خير ... وكل عام وانتم بخير ..
RE: التعرف على رقم الجوال - الوادي - 12-07-16
يا فراس،
ممكن نستخدم التقسيم أو التجزئة بواسطة الأمر Split على النص من خلال الرمز (فاصلة) وتقرأ عدد عناصر المصفوفة المعادة من التقسيم مثل
PHP كود :
Dim n() As String = Split(TextBox1.Text.Trim, ",")
If TextBox1.Text.Trim = "" Then
Me.Label1.Text = 0
Else
Me.Label1.Text = n.Count
End If