منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
دالة لفحص التاريخ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مقالات VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=184)
+--- الموضوع : دالة لفحص التاريخ (/showthread.php?tid=5012)

دالة لفحص التاريخ - RaggiTech - 03-10-12

كاتب الموضوع : جهاد العريقي


كود :
Public Function IsDate(ByVal DateIn As String) As Boolean
Dim datDateTime As DateTime
Dim blnIsDate As Boolean = True
Try
' Attempt to parse date

datDateTime = DateTime.Parse(DateIn)
Catch e As FormatException
' Error parsing, return False
blnIsDate = False
End Try
Return blnIsDate
End Function


لا تبخلو علينا بدعائكم