درست کارنکردن تابع تشخیص صحت شماره همراه

[iavaduu 38]

باسلام خدمت همگی بنده ازاین تابع برای تشخیص درست یا درست نبودن شماره همراه استفاده میکنم اما متاسفانه روی بعضی شماره های جدید جواب نمیده:

نقل قول

Sub ValidateMobileNumber(Number As String) As Boolean
	Try
		Dim Valid As Boolean
		Valid = Regex.IsMatch("09(1[0-9]|3[1-9]|2[1-9])-?[0-9]{3}-?[0-9]{4}", Number)
		If Not(Valid) Then 
			Return False
		Else 
			Return True
		End If
	Catch
		Return False
	End Try
End Sub

 

لطفا راهنمایی کنید.

[امین مهدی نژاد 2,142]

من مشکل رو اینجا می بینم

(1[0-9]|3[1-9]|2[1-9])

سه تا شرط گذاشتین (قسمت قرمز در توضیحات زیر)

1-عدد سوم یک و یک عدد دیگه مثلا 09151111111

2-عدد سوم 3 و چهارمی از 1تا 9 مثلا 09351111111

3-عدد سوم 2 و چهارمی از 1 تا 9 مثلا 09211111111

خب برای  0901  و پیش شماره های دیگه هم باید شرط رو بزارید.

«موفق باشید.»