09-07-19, 01:58 PM
10-07-19, 01:33 AM
وعليكم السلام ورحمة الله وبركاته
-----------
وان كنت تريد نتيجة ادق
-----------
كود :
If IO.Path.GetExtension(TextBox1.Text) = Nothing Then
MessageBox.Show("مسار مجلد")
Else
MessageBox.Show("مسار ملف")
End Ifكود :
If System.Text.RegularExpressions.Regex.IsMatch(TextBox1.Text, "^\w{1}:\\.+\.(\w{2,4})$") = True Then
MessageBox.Show("مسار ملف")
Else
MessageBox.Show("مسار مجلد")
End If10-07-19, 02:23 PM
(10-07-19, 01:33 AM)سامي محمد كتب : [ -> ]وعليكم السلام ورحمة الله وبركاته
-----------
وان كنت تريد نتيجة ادقكود :
If IO.Path.GetExtension(TextBox1.Text) = Nothing Then
MessageBox.Show("مسار مجلد")
Else
MessageBox.Show("مسار ملف")
End If
كود :
If System.Text.RegularExpressions.Regex.IsMatch(TextBox1.Text, "^\w{1}:\\.+\.(\w{2,4})$") = True Then
MessageBox.Show("مسار ملف")
Else
MessageBox.Show("مسار مجلد")
End If
شكرا لك استاذي العزيز